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

[Erik Huelsmann]

Author: ehuelsmann
Date: Tue May 18 17:48:42 2010
New Revision: 12704

Log:
Fix typo.

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	Tue May 18 17:48:42 2010
@@ -3185,7 +3185,7 @@
            (assert (local-function-references-allowed-p local-function))
            (assert (not *file-compilation*))
            (emit-load-externalized-object
-            (local-function-environmont local-function)
+            (local-function-environment local-function)
             +lisp-environment-class+)
            (emit-load-externalized-object (local-function-name local-function))
            (emit-invokevirtual +lisp-environment-class+ "lookupFunction"