Add tests for nested comprehensions

2 files changed, 5 insertions, 0 deletions

diff --git a/test/arrays.tm b/test/arrays.tm
index 3f00f186..07a89e19 100644
--- a/test/arrays.tm
+++ b/test/arrays.tm
@@ -57,6 +57,9 @@ if yes
 >> [i*10 for i in 5 if i mod 2 != 0]
 = [10, 30, 50]
 
+>> [x for x in y if x > 1 for y in [3, 4, 5] if y < 5]
+= [2, 3, 2, 3, 4]
+
 if yes
 	>> arr := @[10, 20]
 	>> copy := arr[]
diff --git a/test/tables.tm b/test/tables.tm
index 27b176bf..53e81d48 100644
--- a/test/tables.tm
+++ b/test/tables.tm
@@ -54,3 +54,5 @@ for k,v in t2
 = {1=>10, 2=>20, 3=>30, 4=>40, 5=>50}
 >> {i=>10*i for i in 5 if i mod 2 != 0}
 = {1=>10, 3=>30, 5=>50}
+>> {x=>10*x for x in y if x > 1 for y in [3, 4, 5] if y < 5}
+= {2=>20, 3=>30, 4=>40}