diff options
| author | Rich Hickey <richhickey@gmail.com> | 2008-04-06 12:39:43 +0000 |
|---|---|---|
| committer | Rich Hickey <richhickey@gmail.com> | 2008-04-06 12:39:43 +0000 |
| commit | 2c63d7b933fb7a02714cc7864498dea96ca87618 (patch) | |
| tree | 9612b8a5ff361fbbb53747f569079aa50872e668 /src | |
| parent | 353cb958642c2230236e59eb65f974a21ad6eb8e (diff) | |
throw exception on (.member) with no target
Diffstat (limited to 'src')
| -rw-r--r-- | src/jvm/clojure/lang/Compiler.java | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/jvm/clojure/lang/Compiler.java b/src/jvm/clojure/lang/Compiler.java index 6428c06f..910b2841 100644 --- a/src/jvm/clojure/lang/Compiler.java +++ b/src/jvm/clojure/lang/Compiler.java @@ -3371,6 +3371,8 @@ public static Object macroexpand1(Object x) throws Exception{ //(.substring s 2 5) => (. s substring 2 5) if(sym.name.charAt(0) == '.') { + if(RT.length(form) < 2) + throw new IllegalArgumentException("Malformed member expression, expecting (.member target ...)"); Symbol meth = Symbol.intern(sname.substring(1)); return RT.listStar(DOT, RT.second(form), meth, form.rest().rest()); } |