- Switched from TupleT to ProdT (type-wise).

1 files changed, 7 insertions, 1 deletions

diff --git a/src/lux/compiler/case.clj b/src/lux/compiler/case.clj
index e0d1b886e..1a4006312 100644
--- a/src/lux/compiler/case.clj
+++ b/src/lux/compiler/case.clj
@@ -86,10 +86,16 @@
         (.visitJumpInsn Opcodes/GOTO $target))
 
       (&a-case/$TupleTestAC ?members)
-      (if (&/|empty? ?members)
+      (|case ?members
+        (&/$Nil)
         (doto writer
           (.visitInsn Opcodes/POP)
           (.visitJumpInsn Opcodes/GOTO $target))
+
+        (&/$Cons ?member (&/$Nil))
+        (compile-match ?member $target $else)
+
+        _
         (doto writer
           (.visitTypeInsn Opcodes/CHECKCAST "[Ljava/lang/Object;")
           (-> (doto (.visitInsn Opcodes/DUP)