Changeset 11316

Timestamp:

09/13/08 16:53:16 (14 years ago)

Author:

ehuelsmann

Message:

Fix FLET.40, special variables related.

File:

• trunk/j/src/org/armedbear/lisp/Closure.java (modified) (1 diff)

trunk/j/src/org/armedbear/lisp/Closure.java

@@ -1297 +1297 @@
         throws ConditionThrowable
     {
-        if (isSpecial(sym) && ! sym.isSpecialVariable())
+        if (isSpecial(sym)) {
             env.declareSpecial(sym);
-
-        bind(sym, value, env);
+            thread.bindSpecial(sym, value);
+        }
+        else
+            env.bind(sym, value);
     }