Class Closure

java.lang.Object

org.armedbear.lisp.LispObject

org.armedbear.lisp.Operator

org.armedbear.lisp.Function

org.armedbear.lisp.Closure

All Implemented Interfaces:

Serializable

Direct Known Subclasses:

CompiledClosure

public class Closure
extends Function

See Also:

• Serialized Form

Nested Class Summary

Nested classes/interfaces inherited from class Function

Function.ObjectInputStreamWithClassLoader, Function.pf_function_class_bytes, Function.SerializedLocalFunction, Function.SerializedNamedFunction

Field Summary

Fields

Modifier and Type	Field	Description
static final int	AUX
static final int	KEYWORD
static final int	OPTIONAL
static final int	REQUIRED
static final int	REST

Fields inherited from class Function

FUNCTION_CLASS_BYTES, loadedFrom

Fields inherited from class Operator

lambdaName

Constructor Summary

Constructors

Constructor	Description
Closure(ArgumentListProcessor arglist)	Construct a closure object with a lambda-list described by these parameters.
Closure(LispObject lambdaExpression, Environment env)
Closure(LispObject name, LispObject lambdaExpression, Environment env)

Method Summary

Modifier and Type	Method	Description
LispObject	execute()
LispObject	execute(LispObject arg)
LispObject	execute(LispObject[] args)
LispObject	execute(LispObject first, LispObject second)
LispObject	execute(LispObject first, LispObject second, LispObject third)
LispObject	execute(LispObject first, LispObject second, LispObject third, LispObject fourth)
LispObject	execute(LispObject first, LispObject second, LispObject third, LispObject fourth, LispObject fifth)
LispObject	execute(LispObject first, LispObject second, LispObject third, LispObject fourth, LispObject fifth, LispObject sixth)
LispObject	execute(LispObject first, LispObject second, LispObject third, LispObject fourth, LispObject fifth, LispObject sixth, LispObject seventh)
LispObject	execute(LispObject first, LispObject second, LispObject third, LispObject fourth, LispObject fifth, LispObject sixth, LispObject seventh, LispObject eighth)
final LispObject	getBody()
final Environment	getEnvironment()
final LispObject	getVariableList()
protected final LispObject[]	processArgs(LispObject[] args, LispThread thread)
protected boolean	shouldSerializeByName()
LispObject	typep(LispObject typeSpecifier)

Methods inherited from class Function

argCountError, classOf, getCallCount, getClassBytes, getHotCount, getPropertyList, incrementCallCount, incrementHotCount, printObject, setCallCount, setClassBytes, setHotCount, setPropertyList, typeOf, writeReplace

Methods inherited from class Operator

getLambdaList, getLambdaName, getParts, setLambdaList, setLambdaName

Methods inherited from class 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, floatp, FLOATP, floatValue, getBooleanValue, getDescription, getDocumentation, getFixnumSlotValue, getInstance, getSlotValue, getSlotValue_0, getSlotValue_1, getSlotValue_2, getSlotValue_3, getSlotValueAsBoolean, getStringChars, getStringValue, getSymbolFunction, getSymbolFunctionOrDie, getSymbolSetfFunction, getSymbolSetfFunctionOrDie, getSymbolValue, incr, 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, setCar, setCdr, setDocumentation, setSlotValue, setSlotValue, setSlotValue_0, setSlotValue_1, setSlotValue_2, setSlotValue_3, SIMPLE_STRING_P, SLOT_VALUE, STRING, stringp, STRINGP, subtract, subtract, SVREF, svset, sxhash, SYMBOLP, truncate, unreadableString, unreadableString, VECTOR_PUSH_EXTEND, VECTOR_PUSH_EXTEND, vectorp, VECTORP, vectorPushExtend, zerop, ZEROP

Methods inherited from class Object

clone, equals, finalize, getClass, hashCode, notify, notifyAll, toString, wait, wait, wait

Field Details

REQUIRED

public static final int REQUIRED

See Also:

• Constant Field Values

OPTIONAL

public static final int OPTIONAL

See Also:

• Constant Field Values

KEYWORD

public static final int KEYWORD

See Also:

• Constant Field Values

REST

public static final int REST

See Also:

• Constant Field Values

AUX

public static final int AUX

See Also:

• Constant Field Values

Constructor Details

Closure

public Closure(ArgumentListProcessor arglist)

Construct a closure object with a lambda-list described by these parameters.

Parameters:

required - Required parameters or an empty array for none

optional - Optional parameters or an empty array for none

keyword - Keyword parameters or an empty array for none

keys - NIL if the lambda-list doesn't contain &key, T otherwise

rest - the &rest parameter, or NIL if none

moreKeys - NIL if &allow-other-keys not present, T otherwise

Closure

public Closure(LispObject lambdaExpression,
 Environment env)

Closure

public Closure(LispObject name,
 LispObject lambdaExpression,
 Environment env)

Method Details

typep

public LispObject typep(LispObject typeSpecifier)

Overrides:

typep in class Function

getVariableList

public final LispObject getVariableList()

getBody

public final LispObject getBody()

getEnvironment

public final Environment getEnvironment()

execute

public LispObject execute()

Overrides:

execute in class Function

execute

public LispObject execute(LispObject arg)

Overrides:

execute in class Function

execute

public LispObject execute(LispObject first,
 LispObject second)

Overrides:

execute in class Function

execute

public LispObject execute(LispObject first,
 LispObject second,
 LispObject third)

Overrides:

execute in class Function

execute

public LispObject execute(LispObject first,
 LispObject second,
 LispObject third,
 LispObject fourth)

Overrides:

execute in class Function

execute

public LispObject execute(LispObject first,
 LispObject second,
 LispObject third,
 LispObject fourth,
 LispObject fifth)

Overrides:

execute in class Function

execute

public LispObject execute(LispObject first,
 LispObject second,
 LispObject third,
 LispObject fourth,
 LispObject fifth,
 LispObject sixth)

Overrides:

execute in class Function

execute

public LispObject execute(LispObject first,
 LispObject second,
 LispObject third,
 LispObject fourth,
 LispObject fifth,
 LispObject sixth,
 LispObject seventh)

Overrides:

execute in class Function

execute

public LispObject execute(LispObject first,
 LispObject second,
 LispObject third,
 LispObject fourth,
 LispObject fifth,
 LispObject sixth,
 LispObject seventh,
 LispObject eighth)

Overrides:

execute in class Function

execute

public LispObject execute(LispObject[] args)

Overrides:

execute in class Function

processArgs

protected final LispObject[] processArgs(LispObject[] args,
 LispThread thread)

shouldSerializeByName

protected boolean shouldSerializeByName()

Overrides:

shouldSerializeByName in class Function