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 LispObject
classOf()
boolean
equalp(LispObject obj)
int
getFixnumSlotValue(int index)
LispObject
getParts()
Implementing the getParts() protocol will allow INSPECT to return information about the substructure of a descendent of LispObject.protected int
getSlotIndex(LispObject slotName)
LispObject
getSlotValue(int index)
LispObject
getSlotValue_0()
LispObject
getSlotValue_1()
LispObject
getSlotValue_2()
LispObject
getSlotValue_3()
boolean
getSlotValueAsBoolean(int index)
java.lang.String
printObject()
int
psxhash()
int
psxhash(int depth)
void
setSlotValue(int index, LispObject value)
void
setSlotValue(LispObject slotName, LispObject newValue)
void
setSlotValue_0(LispObject value)
void
setSlotValue_1(LispObject value)
void
setSlotValue_2(LispObject value)
void
setSlotValue_3(LispObject value)
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, 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:
typeOf
in classLispObject
-
classOf
public LispObject classOf()
- Overrides:
classOf
in classLispObject
-
getSlotIndex
protected int getSlotIndex(LispObject slotName)
-
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
-
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
-
typep
public LispObject typep(LispObject type)
- Overrides:
typep
in classLispObject
-
equalp
public boolean equalp(LispObject obj)
- Overrides:
equalp
in classLispObject
-
getSlotValue_0
public LispObject getSlotValue_0()
- Overrides:
getSlotValue_0
in classLispObject
-
getSlotValue_1
public LispObject getSlotValue_1()
- Overrides:
getSlotValue_1
in classLispObject
-
getSlotValue_2
public LispObject getSlotValue_2()
- Overrides:
getSlotValue_2
in classLispObject
-
getSlotValue_3
public LispObject getSlotValue_3()
- Overrides:
getSlotValue_3
in classLispObject
-
getSlotValue
public LispObject getSlotValue(int index)
- Overrides:
getSlotValue
in classLispObject
-
getFixnumSlotValue
public int getFixnumSlotValue(int index)
- Overrides:
getFixnumSlotValue
in classLispObject
-
getSlotValueAsBoolean
public boolean getSlotValueAsBoolean(int index)
- Overrides:
getSlotValueAsBoolean
in classLispObject
-
setSlotValue_0
public void setSlotValue_0(LispObject value)
- Overrides:
setSlotValue_0
in classLispObject
-
setSlotValue_1
public void setSlotValue_1(LispObject value)
- Overrides:
setSlotValue_1
in classLispObject
-
setSlotValue_2
public void setSlotValue_2(LispObject value)
- Overrides:
setSlotValue_2
in classLispObject
-
setSlotValue_3
public void setSlotValue_3(LispObject value)
- Overrides:
setSlotValue_3
in classLispObject
-
setSlotValue
public void setSlotValue(int index, LispObject value)
- Overrides:
setSlotValue
in classLispObject
-
psxhash
public final int psxhash()
- Overrides:
psxhash
in classLispObject
-
psxhash
public final int psxhash(int depth)
- Overrides:
psxhash
in classLispObject
-
printObject
public java.lang.String printObject()
- Overrides:
printObject
in classLispObject
-
-