diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/jvm/clojure/lang/Compiler.java | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/src/jvm/clojure/lang/Compiler.java b/src/jvm/clojure/lang/Compiler.java index c43b4d5e..799c2aaa 100644 --- a/src/jvm/clojure/lang/Compiler.java +++ b/src/jvm/clojure/lang/Compiler.java @@ -1464,7 +1464,11 @@ static class ThrowExpr extends UntypedExpr{ public Object eval() throws Exception{ - throw (Exception) excExpr.eval(); + Object t = excExpr.eval(); + if(t instanceof Exception) + throw (Exception) t; + else + throw (Error) t; } public void emit(C context, FnExpr fn, GeneratorAdapter gen){ |