[armedbear-cvs] r11500 - trunk/abcl/src/org/armedbear/lisp

[Erik Huelsmann]

Author: ehuelsmann
Date: Sun Dec 28 21:54:02 2008
New Revision: 11500

Log:
EMIT-LOAD-VARIABLE was actually renamed to EMIT-LOAD-LOCAL-VARIABLE.

Modified:
   trunk/abcl/src/org/armedbear/lisp/compiler-pass2.lisp

Modified: trunk/abcl/src/org/armedbear/lisp/compiler-pass2.lisp
==============================================================================
--- trunk/abcl/src/org/armedbear/lisp/compiler-pass2.lisp	(original)
+++ trunk/abcl/src/org/armedbear/lisp/compiler-pass2.lisp	Sun Dec 28 21:54:02 2008
@@ -473,10 +473,10 @@
                                           (t
                                            (symbol-name expected-type))))
         (LABEL1 (gensym)))
-    (emit-load-variable variable)
+    (emit-load-local-variable variable)
     (emit 'instanceof instanceof-class)
     (emit 'ifne LABEL1)
-    (emit-load-variable variable)
+    (emit-load-local-variable variable)
     (emit 'getstatic +lisp-symbol-class+ expected-type-java-symbol-name
           +lisp-symbol+)
     (emit-invokestatic +lisp-class+ "type_error"