Package org.armedbear.lisp
Class StructureObject
- java.lang.Object
-
- org.armedbear.lisp.LispObject
-
- org.armedbear.lisp.StructureObject
-
- Direct Known Subclasses:
Stream
public class StructureObject extends LispObject
-
-
Constructor Summary
Constructors Constructor Description StructureObject()StructureObject(StructureObject obj)StructureObject(Symbol symbol)StructureObject(Symbol symbol, LispObject obj0)StructureObject(Symbol symbol, LispObject[] slots)StructureObject(Symbol symbol, LispObject obj0, LispObject obj1)StructureObject(Symbol symbol, LispObject obj0, LispObject obj1, LispObject obj2)StructureObject(Symbol symbol, LispObject obj0, LispObject obj1, LispObject obj2, LispObject obj3)StructureObject(Symbol symbol, LispObject obj0, LispObject obj1, LispObject obj2, LispObject obj3, LispObject obj4)StructureObject(Symbol symbol, LispObject obj0, LispObject obj1, LispObject obj2, LispObject obj3, LispObject obj4, LispObject obj5)
-
Method Summary
All Methods Instance Methods Concrete Methods Modifier and Type Method Description LispObjectclassOf()booleanequalp(LispObject obj)intgetFixnumSlotValue(int index)LispObjectgetParts()Implementing the getParts() protocol will allow INSPECT to return information about the substructure of a descendent of LispObject.protected intgetSlotIndex(LispObject slotName)LispObjectgetSlotValue(int index)LispObjectgetSlotValue_0()LispObjectgetSlotValue_1()LispObjectgetSlotValue_2()LispObjectgetSlotValue_3()booleangetSlotValueAsBoolean(int index)java.lang.StringprintObject()intpsxhash()intpsxhash(int depth)voidsetSlotValue(int index, LispObject value)voidsetSlotValue(LispObject slotName, LispObject newValue)voidsetSlotValue_0(LispObject value)voidsetSlotValue_1(LispObject value)voidsetSlotValue_2(LispObject value)voidsetSlotValue_3(LispObject value)LispObjectSLOT_VALUE(LispObject slotName)LispObjecttypeOf()LispObjecttypep(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, evenp, EVENP, execute, execute, execute, execute, execute, execute, execute, execute, execute, execute, execute, floatp, FLOATP, floatValue, getBooleanValue, getCallCount, getDescription, getDocumentation, getHotCount, getInstance, getPropertyList, 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, push, rationalp, RATIONALP, realp, REALP, resolve, reverse, RPLACA, RPLACD, SCHAR, setCallCount, setCar, setCdr, setDocumentation, setHotCount, setPropertyList, 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
-
-
-
-
Constructor Detail
-
StructureObject
public StructureObject()
-
StructureObject
public StructureObject(Symbol symbol)
-
StructureObject
public StructureObject(Symbol symbol, LispObject[] slots)
-
StructureObject
public StructureObject(Symbol symbol, LispObject obj0)
-
StructureObject
public StructureObject(Symbol symbol, LispObject obj0, LispObject obj1)
-
StructureObject
public StructureObject(Symbol symbol, LispObject obj0, LispObject obj1, LispObject obj2)
-
StructureObject
public StructureObject(Symbol symbol, LispObject obj0, LispObject obj1, LispObject obj2, LispObject obj3)
-
StructureObject
public StructureObject(Symbol symbol, LispObject obj0, LispObject obj1, LispObject obj2, LispObject obj3, LispObject obj4)
-
StructureObject
public StructureObject(Symbol symbol, LispObject obj0, LispObject obj1, LispObject obj2, LispObject obj3, LispObject obj4, LispObject obj5)
-
StructureObject
public StructureObject(StructureObject obj)
-
-
Method Detail
-
typeOf
public LispObject typeOf()
- Overrides:
typeOfin classLispObject
-
classOf
public LispObject classOf()
- Overrides:
classOfin classLispObject
-
getSlotIndex
protected int getSlotIndex(LispObject slotName)
-
SLOT_VALUE
public LispObject SLOT_VALUE(LispObject slotName)
- Overrides:
SLOT_VALUEin classLispObject
-
setSlotValue
public void setSlotValue(LispObject slotName, LispObject newValue)
- Overrides:
setSlotValuein classLispObject
-
getParts
public LispObject getParts()
Description copied from class:LispObjectImplementing 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:
getPartsin classLispObject
-
typep
public LispObject typep(LispObject type)
- Overrides:
typepin classLispObject
-
equalp
public boolean equalp(LispObject obj)
- Overrides:
equalpin classLispObject
-
getSlotValue_0
public LispObject getSlotValue_0()
- Overrides:
getSlotValue_0in classLispObject
-
getSlotValue_1
public LispObject getSlotValue_1()
- Overrides:
getSlotValue_1in classLispObject
-
getSlotValue_2
public LispObject getSlotValue_2()
- Overrides:
getSlotValue_2in classLispObject
-
getSlotValue_3
public LispObject getSlotValue_3()
- Overrides:
getSlotValue_3in classLispObject
-
getSlotValue
public LispObject getSlotValue(int index)
- Overrides:
getSlotValuein classLispObject
-
getFixnumSlotValue
public int getFixnumSlotValue(int index)
- Overrides:
getFixnumSlotValuein classLispObject
-
getSlotValueAsBoolean
public boolean getSlotValueAsBoolean(int index)
- Overrides:
getSlotValueAsBooleanin classLispObject
-
setSlotValue_0
public void setSlotValue_0(LispObject value)
- Overrides:
setSlotValue_0in classLispObject
-
setSlotValue_1
public void setSlotValue_1(LispObject value)
- Overrides:
setSlotValue_1in classLispObject
-
setSlotValue_2
public void setSlotValue_2(LispObject value)
- Overrides:
setSlotValue_2in classLispObject
-
setSlotValue_3
public void setSlotValue_3(LispObject value)
- Overrides:
setSlotValue_3in classLispObject
-
setSlotValue
public void setSlotValue(int index, LispObject value)- Overrides:
setSlotValuein classLispObject
-
psxhash
public final int psxhash()
- Overrides:
psxhashin classLispObject
-
psxhash
public final int psxhash(int depth)
- Overrides:
psxhashin classLispObject
-
printObject
public java.lang.String printObject()
- Overrides:
printObjectin classLispObject
-
-