Changeset 11888


Ignore:
Timestamp:
05/17/09 06:13:37 (9 years ago)
Author:
ehuelsmann
Message:

Fix DISASSEMBLE.5: CompiledClosure? should return T
when asked if it's of type COMPILED-FUNCTION.

File:
1 edited

Legend:

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

    r11883 r11888  
    6262  }
    6363
     64  @Override
     65  public LispObject typep(LispObject typeSpecifier) throws ConditionThrowable
     66  {
     67    if (typeSpecifier == Symbol.COMPILED_FUNCTION)
     68      return T;
     69    return super.typep(typeSpecifier);
     70  }
    6471
    6572  private final LispObject notImplemented() throws ConditionThrowable
Note: See TracChangeset for help on using the changeset viewer.