summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRich Hickey <richhickey@gmail.com>2009-11-11 21:57:47 -0500
committerRich Hickey <richhickey@gmail.com>2009-11-11 21:57:47 -0500
commitc58a6cfaf5788a104f4a1dcb488f731ad94a2da0 (patch)
treed0cca7643f445c8b85ceb2fef3730d814dd5b474
parent8b93c4fb1672cc2808d135df8cb98ece5cc8717c (diff)
munge field names in lookup thunks
-rw-r--r--src/jvm/clojure/lang/Compiler.java2
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);