summaryrefslogtreecommitdiff
path: root/src/jvm/clojure
diff options
context:
space:
mode:
authorRich Hickey <richhickey@gmail.com>2008-10-04 21:16:00 +0000
committerRich Hickey <richhickey@gmail.com>2008-10-04 21:16:00 +0000
commit75dcef321baeb94e4d35036fb7a7805e6350e662 (patch)
tree99addcd5ffe740059e447bdaee01e86aa01c6ca1 /src/jvm/clojure
parent2394b54131cb9c7f64176b354c75a98f066ffd73 (diff)
improved error on malformed let
Diffstat (limited to 'src/jvm/clojure')
-rw-r--r--src/jvm/clojure/lang/Compiler.java7
1 files changed, 7 insertions, 0 deletions
diff --git a/src/jvm/clojure/lang/Compiler.java b/src/jvm/clojure/lang/Compiler.java
index 6f1351cd..4b6c9ab7 100644
--- a/src/jvm/clojure/lang/Compiler.java
+++ b/src/jvm/clojure/lang/Compiler.java
@@ -3962,6 +3962,13 @@ private static Expr analyzeSeq(C context, ISeq form, String name) throws Excepti
else
return InvokeExpr.parse(context, form);
}
+ catch(Throwable e)
+ {
+ if(!(e instanceof CompilerException))
+ throw new CompilerException((String) SOURCE.get(), (Integer) LINE.get(), e);
+ else
+ throw (CompilerException) e;
+ }
finally
{
Var.popThreadBindings();