diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/jvm/clojure/lang/Compiler.java | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/jvm/clojure/lang/Compiler.java b/src/jvm/clojure/lang/Compiler.java index e7829aab..d9028ed1 100644 --- a/src/jvm/clojure/lang/Compiler.java +++ b/src/jvm/clojure/lang/Compiler.java @@ -1732,7 +1732,9 @@ static class TryExpr implements Expr{ try { Var.pushThreadBindings(dynamicBindings); - LocalBinding lb = registerLocal(sym, null, null); + LocalBinding lb = registerLocal(sym, + (Symbol) (RT.second(f) instanceof Symbol ? RT.second(f) + : null), null); Expr handler = (new BodyExpr.Parser()).parse(context, RT.rest(RT.rest(RT.rest(f)))); catches = catches.cons(new CatchClause(c, lb, handler)); } |