diff options
author | Rich Hickey <richhickey@gmail.com> | 2009-11-11 21:57:47 -0500 |
---|---|---|
committer | Rich Hickey <richhickey@gmail.com> | 2009-11-11 21:57:47 -0500 |
commit | c58a6cfaf5788a104f4a1dcb488f731ad94a2da0 (patch) | |
tree | d0cca7643f445c8b85ceb2fef3730d814dd5b474 | |
parent | 8b93c4fb1672cc2808d135df8cb98ece5cc8717c (diff) |
munge field names in lookup thunks
-rw-r--r-- | src/jvm/clojure/lang/Compiler.java | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/jvm/clojure/lang/Compiler.java b/src/jvm/clojure/lang/Compiler.java index 0c33dbad..5bdfb95c 100644 --- a/src/jvm/clojure/lang/Compiler.java +++ b/src/jvm/clojure/lang/Compiler.java @@ -5648,7 +5648,7 @@ static public class NewInstanceExpr extends ObjExpr{ gen.instanceOf(ret.objtype); gen.ifZCmp(GeneratorAdapter.EQ, faultLabel); gen.checkCast(ret.objtype); - gen.getField(ret.objtype, fld.name, ftype); + gen.getField(ret.objtype, munge(fld.name), ftype); HostExpr.emitBoxReturn(ret,gen,fclass); gen.goTo(endLabel); |