/dports/lang/abcl/abcl-src-1.8.0/src/org/armedbear/lisp/ |
H A D | LispClass.java | 39 public abstract class LispClass extends StandardObject class 44 public static <T extends LispClass> T addClass(Symbol symbol, T c) in addClass() 61 public static LispClass findClass(Symbol symbol) in findClass() 63 return (LispClass)map.get(symbol); in findClass() 97 protected LispClass(Layout layout) in LispClass() method in LispClass 103 protected LispClass(Symbol symbol) in LispClass() method in LispClass 108 protected LispClass(Layout layout, Symbol symbol) in LispClass() method in LispClass 115 protected LispClass(Layout layout, in LispClass() method in LispClass 297 if (cls instanceof LispClass) in subclassp() 298 cpl = ((LispClass)cls).getCPL(); in subclassp() [all …]
|
H A D | StructureClass.java | 59 return LispClass.findClass(Symbol.STRUCTURE_CLASS); in classOf() 67 if (type == LispClass.findClass(Symbol.STRUCTURE_CLASS)) in typep() 96 LispClass existingClass = LispClass.findClass(symbol); 114 LispClass includedClass = LispClass.findClass(include);
|
H A D | BuiltInClass.java | 38 public class BuiltInClass extends LispClass 153 public static final LispClass STREAM = 156 public static final LispClass SYSTEM_STREAM = 159 public static final LispClass TWO_WAY_STREAM = 165 public static final LispClass ECHO_STREAM = 171 public static final LispClass STRING_STREAM = 180 public static final LispClass SYNONYM_STREAM = 183 public static final LispClass FILE_STREAM = 186 public static final LispClass JAR_STREAM = 189 public static final LispClass URL_STREAM = [all …]
|
H A D | StandardObject.java | 63 protected StandardObject(LispClass cls, int length) in StandardObject() 71 protected StandardObject(LispClass cls) in StandardObject() 114 if (c1 instanceof LispClass) in helperGetClassName() 115 return ((LispClass)c1).getName(); in helperGetClassName() 123 if (c1 instanceof LispClass) in helperGetCPL() 124 return ((LispClass)c1).getCPL(); in helperGetCPL() 138 if (c1 instanceof LispClass) in typeOf() 139 name = ((LispClass)c1).getName(); in typeOf() 183 if (otherClass instanceof LispClass) { in typep() 221 if (cls instanceof LispClass) in updateLayout() [all …]
|
H A D | Layout.java | 270 if (lispClass instanceof LispClass) { 271 if (!((LispClass)lispClass).isFinalized()) 273 oldLayout = ((LispClass)lispClass).getClassLayout(); 284 if (lispClass instanceof LispClass) 285 ((LispClass)lispClass).setClassLayout(newLayout);
|
H A D | StructureObject.java | 46 structureClass = (StructureClass) LispClass.findClass(symbol/*, true*/); // Might return null. in StructureObject() 58 structureClass = (StructureClass) LispClass.findClass(symbol); // Might return null. in StructureObject() 65 structureClass = (StructureClass) LispClass.findClass(symbol); // Might return null. in StructureObject() 74 structureClass = (StructureClass) LispClass.findClass(symbol); // Might return null. in StructureObject() 85 structureClass = (StructureClass) LispClass.findClass(symbol); // Might return null. in StructureObject() 97 structureClass = (StructureClass) LispClass.findClass(symbol); // Might return null. in StructureObject() 110 structureClass = (StructureClass) LispClass.findClass(symbol); // Might return null. in StructureObject() 125 structureClass = (StructureClass) LispClass.findClass(symbol); // Might return null. in StructureObject() 229 LispClass c = LispClass.findClass((Symbol)type); in typep()
|
H A D | Condition.java | 49 protected Condition(LispClass cls) in Condition() 56 public Condition(LispClass cls, int length) in Condition() 145 if (c instanceof LispClass) in typeOf() 146 return ((LispClass)c).getName(); in typeOf()
|
H A D | make_condition.java | 54 else if (type instanceof LispClass) in execute() 55 symbol = checkSymbol(((LispClass)type).getName()); in execute()
|
H A D | SlotClass.java | 38 public class SlotClass extends LispClass 131 LispClass c = (LispClass) cpl.car(); in computeDefaultInitargs()
|
H A D | FuncallableStandardObject.java | 66 protected FuncallableStandardObject(LispClass cls, int length) in FuncallableStandardObject() 71 protected FuncallableStandardObject(LispClass cls) in FuncallableStandardObject()
|
H A D | Java.java | 53 private static final LispClass java_exception = LispClass.findClass(Symbol.JAVA_EXCEPTION); 55 static boolean isJavaException(LispClass lc) in isJavaException() 92 LispClass lispClass = (LispClass) LispClass.findClass(symbol, true); in execute() 128 LispClass lispClass = (LispClass) LispClass.findClass((Symbol) object, true); in getCondition()
|
H A D | Primitives.java | 5350 if (arg instanceof LispClass) in execute() 5368 if (second instanceof LispClass) in execute() 5387 if (arg instanceof LispClass) in execute() 5427 if (arg instanceof LispClass) in execute() 5444 if (second instanceof LispClass) in execute() 5461 if (arg instanceof LispClass) in execute() 5496 if (arg instanceof LispClass) in execute() 5531 if (arg instanceof LispClass) in execute() 5568 if (arg instanceof LispClass) in execute() 5586 if (first instanceof LispClass) in execute() [all …]
|
H A D | SeriousCondition.java | 44 protected SeriousCondition(LispClass cls) in SeriousCondition()
|
H A D | LispError.java | 44 protected LispError(LispClass cls) in LispError()
|
H A D | ProgramError.java | 40 protected ProgramError(LispClass cls) in ProgramError()
|
H A D | CellError.java | 40 protected CellError(LispClass cls) in CellError()
|
H A D | ArithmeticError.java | 40 protected ArithmeticError(LispClass cls) in ArithmeticError()
|
H A D | StreamError.java | 42 protected StreamError(LispClass cls) in StreamError()
|
H A D | TypeError.java | 45 protected TypeError(LispClass cls) in TypeError()
|
H A D | JavaObject.java | 111 cls = LispClass.findClass(type, false); in typep() 116 if(cls.typep(LispClass.findClass(JAVA_CLASS, false)) != NIL) { in typep()
|
H A D | StandardClass.java | 83 public LispClass getLispClass() 106 public LispClass getLispClass()
|
H A D | Cons.java | 107 else if (typeSpecifier instanceof LispClass) in typep()
|
H A D | Bignum.java | 135 else if (type instanceof LispClass) in typep()
|
H A D | Fixnum.java | 134 else if (type instanceof LispClass) in typep()
|
H A D | Stream.java | 641 LispClass c = LispClass.findClass(structure); in readStructure()
|