Changeset 12280


Ignore:
Timestamp:
11/22/09 14:35:12 (11 years ago)
Author:
ehuelsmann
Message:

Fix special bindings in case a symbol is bound to its own value,

where there are no other bindings, but the symbol does have a
value set. (bindSpecialToCurrentValue)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/abcl/src/org/armedbear/lisp/LispThread.java

    r12275 r12280  
    405405        return specials[idx]
    406406            = new SpecialBinding(idx,
    407                                  (binding == null) ? null : binding.value);
     407                                 (binding == null) ?
     408                                 name.getSymbolValue() : binding.value);
    408409    }
    409410
Note: See TracChangeset for help on using the changeset viewer.