diff --git a/tests/native_tests/language.hy b/tests/native_tests/language.hy
index 8c318d6..2d5ecd3 100644
--- a/tests/native_tests/language.hy
+++ b/tests/native_tests/language.hy
@@ -207,4 +207,6 @@
   (assert (= (list-comp (* x 2) (x (range 2))) [0 2]))
   (assert (= (list-comp (* x 2) (x (range 4)) (% x 2)) [2 6]))
   (assert (= (sorted (list-comp (* y 2) ((, x y) (.items {"1" 1 "2" 2}))))
-             [2 4])))
+             [2 4]))
+  (assert (= (list-comp (, x y) (x (range 2) y (range 2)))
+             [(, 0 0) (, 0 1) (, 1 0) (, 1 1)])))