From 73d51aef645c6103eb641dbc19a50dd868df64f1 Mon Sep 17 00:00:00 2001 From: Rich Hickey Date: Thu, 5 Nov 2009 11:27:13 -0500 Subject: workaround in lookup thunk until full support for type-hinted non-primitive fields --- src/jvm/clojure/lang/Compiler.java | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'src') diff --git a/src/jvm/clojure/lang/Compiler.java b/src/jvm/clojure/lang/Compiler.java index 5bcd7ad7..0c33dbad 100644 --- a/src/jvm/clojure/lang/Compiler.java +++ b/src/jvm/clojure/lang/Compiler.java @@ -5612,6 +5612,11 @@ static public class NewInstanceExpr extends ObjExpr{ String iname = ret.internalName + "$__lookup__" + fld.name; String cname = ret.name + "$__lookup__" + fld.name; Class fclass = tagClass(tagOf(fld)); + + //workaround until full support for type-hinted non-primitive fields + if(!fclass.isPrimitive()) + fclass = Object.class; + Type ftype = Type.getType(fclass); cv.visit(V1_5, ACC_PUBLIC + ACC_SUPER + ACC_FINAL, iname, null,"java/lang/Object",new String[]{"clojure/lang/ILookupThunk"}); -- cgit v1.2.3-18-g5258