Added test for table-from-rows exception brownplt#1758

ds26gte · Sep 10, 2024 · 2813a30 · 2813a30
1 parent 9cc314b
commit 2813a30
Showing 1 changed file with 6 additions and 1 deletion.
diff --git a/tests/pyret/tests/test-tables.arr b/tests/pyret/tests/test-tables.arr
@@ -687,8 +687,13 @@ check "table-from-rows":
   t4 = table-from-rows.make(raw-array-from-list(new-row-list))
 
   nothing does-not-raise # Dummy test to avoid well-formedness errors in the previous row
-end
 
+  [table-from-rows:
+    [list:
+      [raw-row: {"A"; 5}, {"B"; 7}, {"C"; 8}],
+      [raw-row: {"A"; 1}, {"B"; 2}, {"C"; 3}]]]
+    raises "is-raw-array-of-rows"
+end
 
 table-from-column = TS.table-from-column
 table-from-columns = TS.table-from-columns