diff options
-rw-r--r-- | src/jvm/clojure/lang/Compiler.java | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/jvm/clojure/lang/Compiler.java b/src/jvm/clojure/lang/Compiler.java index aea3b062..1f224938 100644 --- a/src/jvm/clojure/lang/Compiler.java +++ b/src/jvm/clojure/lang/Compiler.java @@ -6767,7 +6767,7 @@ public static class CaseExpr extends UntypedExpr{ try { Var.pushThreadBindings( RT.map(CLEAR_PATH, new PathNode(PATHTYPE.PATH,branch))); - thenExpr = analyze(C.EXPRESSION, me.getValue()); + thenExpr = analyze(context, me.getValue()); } finally{ Var.popThreadBindings(); @@ -6779,7 +6779,7 @@ public static class CaseExpr extends UntypedExpr{ try { Var.pushThreadBindings( RT.map(CLEAR_PATH, new PathNode(PATHTYPE.PATH,branch))); - defaultExpr = analyze(C.EXPRESSION, args.nth(5)); + defaultExpr = analyze(context, args.nth(5)); } finally{ Var.popThreadBindings(); |