Changeset 12309
- Timestamp:
- 12/25/09 22:34:53 (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/abcl/src/org/armedbear/lisp/compiler-pass2.lisp
r12306 r12309 221 221 (defconstant +lisp-fixnum+ "Lorg/armedbear/lisp/Fixnum;") 222 222 (defconstant +lisp-fixnum-array+ "[Lorg/armedbear/lisp/Fixnum;") 223 (defconstant +lisp-function-proxy-class+ 224 "org/armedbear/lisp/AutoloadedFunctionProxy") 223 225 (defconstant +lisp-bignum-class+ "org/armedbear/lisp/Bignum") 224 226 (defconstant +lisp-bignum+ "Lorg/armedbear/lisp/Bignum;") … … 2071 2073 (declare-field g +lisp-object+ +field-access-default+) 2072 2074 (emit 'ldc (pool-string (file-namestring pathname))) 2073 (emit-invokestatic "org/armedbear/lisp/AutoloadedFunctionProxy""loadPreloadedFunction"2075 (emit-invokestatic +lisp-function-proxy-class+ "loadPreloadedFunction" 2074 2076 (list +java-string+) +lisp-object+) 2075 2077 (emit 'putstatic *this-class* g +lisp-object+)
Note: See TracChangeset
for help on using the changeset viewer.