Package org.armedbear.lisp
Class StandardObject
- java.lang.Object
-
- org.armedbear.lisp.LispObject
-
- org.armedbear.lisp.StandardObject
-
- Direct Known Subclasses:
Condition
,FuncallableStandardObject
,LispClass
,SlotDefinition
public class StandardObject extends LispObject
-
-
Field Summary
Fields Modifier and Type Field Description protected Layout
layout
protected LispObject[]
slots
-
Constructor Summary
Constructors Modifier Constructor Description protected
StandardObject()
protected
StandardObject(Layout layout)
protected
StandardObject(Layout layout, int length)
protected
StandardObject(LispClass cls)
protected
StandardObject(LispClass cls, int length)
-
Method Summary
All Methods Static Methods Instance Methods Concrete Methods Modifier and Type Method Description static StandardObject
checkStandardObject(LispObject first)
LispObject
classOf()
LispObject
getInstanceSlotValue(LispObject slotName)
LispObject
getLispClass()
LispObject
getParts()
Implementing the getParts() protocol will allow INSPECT to return information about the substructure of a descendent of LispObject.java.lang.String
printObject()
void
setInstanceSlotValue(LispObject slotName, LispObject newValue)
void
setSlotValue(LispObject slotName, LispObject newValue)
LispObject
SLOT_VALUE(LispObject slotName)
LispObject
typeOf()
LispObject
typep(LispObject type)
-
Methods inherited from class org.armedbear.lisp.LispObject
ABS, add, add, aref, AREF, AREF, aref_long, aset, aset, aset, ash, ash, atom, ATOM, caddr, cadr, car, cddr, cdr, CHAR, characterp, CHARACTERP, chars, COMPLEXP, constantp, CONSTANTP, copyToArray, decr, DENOMINATOR, dispatch, divideBy, doubleValue, elt, endp, ENDP, EQ, eql, eql, eql, EQL, equal, equal, EQUAL, equalp, equalp, evenp, EVENP, execute, execute, execute, execute, execute, execute, execute, execute, execute, execute, execute, floatp, FLOATP, floatValue, getBooleanValue, getCallCount, getDescription, getDocumentation, getFixnumSlotValue, getHotCount, getInstance, getPropertyList, getSlotValue, getSlotValue_0, getSlotValue_1, getSlotValue_2, getSlotValue_3, getSlotValueAsBoolean, getStringChars, getStringValue, getSymbolFunction, getSymbolFunctionOrDie, getSymbolSetfFunction, getSymbolSetfFunctionOrDie, getSymbolValue, incr, incrementCallCount, incrementHotCount, integerp, INTEGERP, intValue, IS_E, IS_GE, IS_GT, IS_LE, IS_LT, IS_NE, isEqualTo, isEqualTo, isGreaterThan, isGreaterThan, isGreaterThanOrEqualTo, isGreaterThanOrEqualTo, isLessThan, isLessThan, isLessThanOrEqualTo, isLessThanOrEqualTo, isNotEqualTo, isNotEqualTo, isSpecialOperator, isSpecialVariable, javaInstance, javaInstance, LDB, length, LENGTH, listp, LISTP, lockableInstance, LOGAND, LOGAND, LOGIOR, LOGIOR, LOGNOT, LOGXOR, LOGXOR, longValue, minusp, MINUSP, MOD, MOD, multiplyBy, multiplyBy, negate, noFillPointer, NOT, nreverse, NTH, NTH, nthcdr, numberp, NUMBERP, NUMERATOR, oddp, ODDP, plusp, PLUSP, princToString, psxhash, psxhash, push, rationalp, RATIONALP, realp, REALP, resolve, reverse, RPLACA, RPLACD, SCHAR, setCallCount, setCar, setCdr, setDocumentation, setHotCount, setPropertyList, setSlotValue, setSlotValue_0, setSlotValue_1, setSlotValue_2, setSlotValue_3, SIMPLE_STRING_P, STRING, stringp, STRINGP, subtract, subtract, SVREF, svset, sxhash, SYMBOLP, truncate, unreadableString, unreadableString, VECTOR_PUSH_EXTEND, VECTOR_PUSH_EXTEND, vectorp, VECTORP, vectorPushExtend, zerop, ZEROP
-
-
-
-
Field Detail
-
layout
protected Layout layout
-
slots
protected LispObject[] slots
-
-
Constructor Detail
-
StandardObject
protected StandardObject()
-
StandardObject
protected StandardObject(Layout layout)
-
StandardObject
protected StandardObject(Layout layout, int length)
-
StandardObject
protected StandardObject(LispClass cls, int length)
-
StandardObject
protected StandardObject(LispClass cls)
-
-
Method Detail
-
getParts
public LispObject getParts()
Description copied from class:LispObject
Implementing the getParts() protocol will allow INSPECT to return information about the substructure of a descendent of LispObject. The protocol is to return a List of Cons pairs, where the car of each pair contains a decriptive string, and the cdr returns a subobject for inspection.- Overrides:
getParts
in classLispObject
-
getLispClass
public final LispObject getLispClass()
-
typeOf
public LispObject typeOf()
- Overrides:
typeOf
in classLispObject
-
classOf
public LispObject classOf()
- Overrides:
classOf
in classLispObject
-
typep
public LispObject typep(LispObject type)
- Overrides:
typep
in classLispObject
-
printObject
public java.lang.String printObject()
- Overrides:
printObject
in classLispObject
-
getInstanceSlotValue
public LispObject getInstanceSlotValue(LispObject slotName)
-
setInstanceSlotValue
public void setInstanceSlotValue(LispObject slotName, LispObject newValue)
-
checkStandardObject
public static final StandardObject checkStandardObject(LispObject first)
-
SLOT_VALUE
public LispObject SLOT_VALUE(LispObject slotName)
- Overrides:
SLOT_VALUE
in classLispObject
-
setSlotValue
public void setSlotValue(LispObject slotName, LispObject newValue)
- Overrides:
setSlotValue
in classLispObject
-
-