Package org.armedbear.lisp
Class Lisp
- java.lang.Object
-
- org.armedbear.lisp.Lisp
-
public final class Lisp extends java.lang.Object
-
-
Field Summary
-
Constructor Summary
Constructors Constructor Description Lisp()
-
Method Summary
-
-
-
Field Detail
-
debug
public static final boolean debug
- See Also:
- Constant Field Values
-
cold
public static boolean cold
-
initialized
public static boolean initialized
-
PACKAGE_CL
public static final Package PACKAGE_CL
-
PACKAGE_CL_USER
public static final Package PACKAGE_CL_USER
-
PACKAGE_KEYWORD
public static final Package PACKAGE_KEYWORD
-
PACKAGE_SYS
public static final Package PACKAGE_SYS
-
PACKAGE_MOP
public static final Package PACKAGE_MOP
-
PACKAGE_TPL
public static final Package PACKAGE_TPL
-
PACKAGE_EXT
public static final Package PACKAGE_EXT
-
PACKAGE_JVM
public static final Package PACKAGE_JVM
-
PACKAGE_LOOP
public static final Package PACKAGE_LOOP
-
PACKAGE_PROF
public static final Package PACKAGE_PROF
-
PACKAGE_JAVA
public static final Package PACKAGE_JAVA
-
PACKAGE_LISP
public static final Package PACKAGE_LISP
-
PACKAGE_THREADS
public static final Package PACKAGE_THREADS
-
PACKAGE_FORMAT
public static final Package PACKAGE_FORMAT
-
PACKAGE_XP
public static final Package PACKAGE_XP
-
PACKAGE_PRECOMPILER
public static final Package PACKAGE_PRECOMPILER
-
PACKAGE_SEQUENCE
public static final Package PACKAGE_SEQUENCE
-
PACKAGE_GRAY_STREAMS_JAVA
public static final Package PACKAGE_GRAY_STREAMS_JAVA
-
NIL
public static final Symbol NIL
-
EOF
public static final LispObject EOF
-
randomStringHashBase
public static final int randomStringHashBase
-
profiling
public static boolean profiling
-
sampling
public static boolean sampling
-
sampleNow
public static volatile boolean sampleNow
-
interrupted
public static volatile boolean interrupted
-
threadToInterrupt
public static volatile LispThread threadToInterrupt
-
CALL_REGISTERS_MAX
public static final int CALL_REGISTERS_MAX
- See Also:
- Constant Field Values
-
FUNCTION_NAME
public static final LispObject FUNCTION_NAME
-
UNSIGNED_BYTE_8
public static final LispObject UNSIGNED_BYTE_8
-
UNSIGNED_BYTE_16
public static final LispObject UNSIGNED_BYTE_16
-
UNSIGNED_BYTE_32
public static final LispObject UNSIGNED_BYTE_32
-
UNSIGNED_BYTE_32_MAX_VALUE
public static final LispObject UNSIGNED_BYTE_32_MAX_VALUE
-
REMEMBER
public static final Primitive REMEMBER
-
STANDARD_READTABLE
public static final Symbol STANDARD_READTABLE
-
T
public static final Symbol T
-
DOUBLE_COLON_PACKAGE_SEPARATORS
public static final Symbol DOUBLE_COLON_PACKAGE_SEPARATORS
-
_LOAD_DEPTH_
public static final Symbol _LOAD_DEPTH_
-
_LOAD_STREAM_
public static final Symbol _LOAD_STREAM_
-
_FASL_LOADER_
public static final Symbol _FASL_LOADER_
-
_SOURCE_
public static final Symbol _SOURCE_
-
_SOURCE_POSITION_
public static final Symbol _SOURCE_POSITION_
-
_AUTOLOAD_VERBOSE_
public static final Symbol _AUTOLOAD_VERBOSE_
-
AUTOLOADING_CACHE
public static final Symbol AUTOLOADING_CACHE
-
_COMPILE_FILE_TYPE_
public static final Symbol _COMPILE_FILE_TYPE_
-
_COMPILE_FILE_CLASS_EXTENSION_
public static final Symbol _COMPILE_FILE_CLASS_EXTENSION_
-
_COMPILE_FILE_ZIP_
public static final Symbol _COMPILE_FILE_ZIP_
-
ARRAY_DIMENSION_MAX
public static final int ARRAY_DIMENSION_MAX
- See Also:
- Constant Field Values
-
CHAR_MAX
public static final int CHAR_MAX
- See Also:
- Constant Field Values
-
_PRINT_STRUCTURE_
public static final Symbol _PRINT_STRUCTURE_
-
_CURRENT_PRINT_LENGTH_
public static final Symbol _CURRENT_PRINT_LENGTH_
-
_CURRENT_PRINT_LEVEL_
public static final Symbol _CURRENT_PRINT_LEVEL_
-
_PRINT_FASL_
public static final Symbol _PRINT_FASL_
-
CALL_REGISTERS_LIMIT
public static final Symbol CALL_REGISTERS_LIMIT
-
_WARN_ON_REDEFINITION_
public static final Symbol _WARN_ON_REDEFINITION_
-
_SAVED_BACKTRACE_
public static final Symbol _SAVED_BACKTRACE_
-
_COMMAND_LINE_ARGUMENT_LIST_
public static final Symbol _COMMAND_LINE_ARGUMENT_LIST_
-
_BATCH_MODE_
public static final Symbol _BATCH_MODE_
-
_NOINFORM_
public static final Symbol _NOINFORM_
-
_DISASSEMBLER_
public static final Symbol _DISASSEMBLER_
-
_SPEED_
public static final Symbol _SPEED_
-
_SPACE_
public static final Symbol _SPACE_
-
_SAFETY_
public static final Symbol _SAFETY_
-
_DEBUG_
public static final Symbol _DEBUG_
-
_EXPLAIN_
public static final Symbol _EXPLAIN_
-
_ENABLE_INLINE_EXPANSION_
public static final Symbol _ENABLE_INLINE_EXPANSION_
-
_REQUIRE_STACK_FRAME_
public static final Symbol _REQUIRE_STACK_FRAME_
-
_COMPILE_FILE_ENVIRONMENT_
public static final Symbol _COMPILE_FILE_ENVIRONMENT_
-
UNBOUND_VALUE
public static final LispObject UNBOUND_VALUE
-
NULL_VALUE
public static final LispObject NULL_VALUE
-
_SLOT_UNBOUND_
public static final Symbol _SLOT_UNBOUND_
-
_CL_PACKAGE_
public static final Symbol _CL_PACKAGE_
-
_KEYWORD_PACKAGE_
public static final Symbol _KEYWORD_PACKAGE_
-
_BACKQUOTE_COUNT_
public static final Symbol _BACKQUOTE_COUNT_
-
_BQ_VECTOR_FLAG_
public static final Symbol _BQ_VECTOR_FLAG_
-
_TRACED_NAMES_
public static final Symbol _TRACED_NAMES_
-
TRAP_OVERFLOW
protected static boolean TRAP_OVERFLOW
-
TRAP_UNDERFLOW
protected static boolean TRAP_UNDERFLOW
-
UNREACHED
public static java.lang.Object UNREACHED
-
steppingTask
public static boolean steppingTask
-
stepping
public static boolean stepping
-
delimitedStepping
public static boolean delimitedStepping
-
stepperBlock
public static org.armedbear.lisp.Binding stepperBlock
-
stepNumber
public static long stepNumber
-
SET_STEPPING_TASK_ON
public static final Primitive SET_STEPPING_TASK_ON
-
SET_STEPPING_TASK_OFF
public static final Primitive SET_STEPPING_TASK_OFF
-
SET_STEPPER_ON
public static final Primitive SET_STEPPER_ON
-
RETURN_FROM_STEPPER
public static final Primitive RETURN_FROM_STEPPER
-
SET_STEPPER_OFF
public static final Primitive SET_STEPPER_OFF
-
SET_DELIMITED_STEPPING_OFF
public static final Primitive SET_DELIMITED_STEPPING_OFF
-
SET_DELIMITED_STEPPING_ON
public static final Primitive SET_DELIMITED_STEPPING_ON
-
INITIALIZE_STEP_COUNTER
public static final Primitive INITIALIZE_STEP_COUNTER
-
GET_STEP_COUNTER
public static final Primitive GET_STEP_COUNTER
-
INITIALIZE_STEP_BLOCK
public static final Primitive INITIALIZE_STEP_BLOCK
-
-
Method Detail
-
funcall
public static final LispObject funcall(LispObject fun, LispObject[] args, LispThread thread)
-
macroexpand
public static final LispObject macroexpand(LispObject form, Environment env, LispThread thread)
-
macroexpand_1
public static final LispObject macroexpand_1(LispObject form, Environment env, LispThread thread)
-
error
public static final LispObject error(LispObject condition)
-
stackError
public static final LispObject stackError()
-
memoryError
public static final LispObject memoryError(java.lang.OutOfMemoryError exception)
-
ierror
public static final int ierror(LispObject condition)
-
serror
public static final java.lang.String serror(LispObject condition)
-
error
public static final LispObject error(LispObject condition, LispObject message)
-
ierror
public static final int ierror(LispObject condition, LispObject message)
-
serror
public static final java.lang.String serror(LispObject condition, LispObject message)
-
parse_error
public static final LispObject parse_error(java.lang.String message)
-
simple_error
public static final LispObject simple_error(java.lang.String formatControl, java.lang.Object... args)
-
type_error
public static final LispObject type_error(LispObject datum, LispObject expectedType)
-
type_error
public static final LispObject type_error(java.lang.String message, LispObject datum, LispObject expectedType)
-
program_error
public static final LispObject program_error(java.lang.String message)
-
program_error
public static final LispObject program_error(LispObject initArgs)
-
setInterrupted
public static final void setInterrupted(LispThread thread, boolean b)
-
handleInterrupt
public static final void handleInterrupt()
-
loadTimeValue
public static final LispObject loadTimeValue(LispObject obj)
-
eval
public static final LispObject eval(LispObject obj)
-
eval
public static final LispObject eval(LispObject obj, Environment env, LispThread thread)
-
evalCall
public static final LispObject evalCall(LispObject function, LispObject args, Environment env, LispThread thread)
-
parseBody
public static final LispObject parseBody(LispObject body, boolean documentationAllowed)
-
parseSpecials
public static final LispObject parseSpecials(LispObject forms)
-
progn
public static final LispObject progn(LispObject body, Environment env, LispThread thread)
-
preprocessTagBody
public static final LispObject preprocessTagBody(LispObject body, Environment env)
-
nonLocalGo
public static final LispObject nonLocalGo(LispObject tagbody, LispObject tag)
Throws a Go exception to cause a non-local transfer of control event, after checking that the extent of the catching tagbody hasn't ended yet. This version is used by the compiler.
-
nonLocalReturn
public static final LispObject nonLocalReturn(LispObject blockId, LispObject blockName, LispObject result)
Throws a Return exception to cause a non-local transfer of control event, after checking that the extent of the catching block hasn't ended yet. This version is used by the compiler.
-
processTagBody
public static final LispObject processTagBody(LispObject body, LispObject localTags, Environment env)
-
bindArg
public static final void bindArg(LispObject ownSpecials, Symbol sym, LispObject value, Environment env, LispThread thread)
-
bindArg
public static void bindArg(boolean special, Symbol sym, LispObject value, Environment env, LispThread thread)
-
list
public static LispObject list(LispObject[] obj)
-
list
public static final Cons list(LispObject obj1, LispObject... remaining)
-
list1
@Deprecated public static final Cons list1(LispObject obj1)
Deprecated.
-
list2
@Deprecated public static final Cons list2(LispObject obj1, LispObject obj2)
Deprecated.
-
list3
@Deprecated public static final Cons list3(LispObject obj1, LispObject obj2, LispObject obj3)
Deprecated.
-
list4
@Deprecated public static final Cons list4(LispObject obj1, LispObject obj2, LispObject obj3, LispObject obj4)
Deprecated.
-
list5
@Deprecated public static final Cons list5(LispObject obj1, LispObject obj2, LispObject obj3, LispObject obj4, LispObject obj5)
Deprecated.
-
list6
@Deprecated public static final Cons list6(LispObject obj1, LispObject obj2, LispObject obj3, LispObject obj4, LispObject obj5, LispObject obj6)
Deprecated.
-
list7
@Deprecated public static final Cons list7(LispObject obj1, LispObject obj2, LispObject obj3, LispObject obj4, LispObject obj5, LispObject obj6, LispObject obj7)
Deprecated.
-
list8
@Deprecated public static final Cons list8(LispObject obj1, LispObject obj2, LispObject obj3, LispObject obj4, LispObject obj5, LispObject obj6, LispObject obj7, LispObject obj8)
Deprecated.
-
list9
@Deprecated public static final Cons list9(LispObject obj1, LispObject obj2, LispObject obj3, LispObject obj4, LispObject obj5, LispObject obj6, LispObject obj7, LispObject obj8, LispObject obj9)
Deprecated.
-
multipleValueList
public static final LispObject multipleValueList(LispObject result)
-
multipleValueCall1
public static final LispObject multipleValueCall1(LispObject result, LispObject function, LispThread thread)
-
progvBindVars
public static final void progvBindVars(LispObject symbols, LispObject values, LispThread thread)
-
checkInteger
public static final LispInteger checkInteger(LispObject obj)
-
checkSymbol
public static final Symbol checkSymbol(LispObject obj)
-
checkList
public static final LispObject checkList(LispObject obj)
-
checkArray
public static final AbstractArray checkArray(LispObject obj)
-
checkVector
public static final AbstractVector checkVector(LispObject obj)
-
checkDoubleFloat
public static final DoubleFloat checkDoubleFloat(LispObject obj)
-
checkSingleFloat
public static final SingleFloat checkSingleFloat(LispObject obj)
-
checkStackFrame
public static final StackFrame checkStackFrame(LispObject obj)
-
gensym
public static final Symbol gensym(LispThread thread)
-
gensym
public static final Symbol gensym(java.lang.String prefix, LispThread thread)
-
javaString
public static final java.lang.String javaString(LispObject arg)
-
number
public static final LispObject number(long n)
-
number
public static final LispObject number(java.math.BigInteger numerator, java.math.BigInteger denominator)
-
number
public static final LispObject number(java.math.BigInteger n)
-
mod
public static final int mod(int number, int divisor)
-
mix
public static final int mix(long x, long y)
-
readObjectFromString
public static LispObject readObjectFromString(java.lang.String s)
-
readObjectFromStream
public static LispObject readObjectFromStream(java.io.InputStream s)
-
readObjectFromReader
public static LispObject readObjectFromReader(java.io.Reader r)
-
loadCompiledFunction
@Deprecated public static final LispObject loadCompiledFunction(java.lang.String namestring)
Deprecated.
-
readFunctionBytes
public static byte[] readFunctionBytes(Pathname name)
-
makeCompiledFunctionFromClass
public static final Function makeCompiledFunctionFromClass(java.lang.Class<?> c)
-
loadCompiledFunction
public static final LispObject loadCompiledFunction(java.io.InputStream in, int size)
-
loadClassBytes
public static final Function loadClassBytes(byte[] bytes)
-
loadClassBytes
public static final Function loadClassBytes(byte[] bytes, JavaClassLoader cl)
-
makeCompiledClosure
public static final LispObject makeCompiledClosure(LispObject template, ClosureBinding[] context)
-
safeWriteToString
public static final java.lang.String safeWriteToString(LispObject obj)
-
isValidSetfFunctionName
public static final boolean isValidSetfFunctionName(LispObject obj)
-
isValidMacroFunctionName
public static final boolean isValidMacroFunctionName(LispObject obj)
-
getUpgradedArrayElementType
public static final LispObject getUpgradedArrayElementType(LispObject type)
-
coerceToJavaChar
public static final char coerceToJavaChar(LispObject obj)
-
coerceToJavaByte
public static final byte coerceToJavaByte(LispObject obj)
-
coerceToJavaUnsignedInt
public static final int coerceToJavaUnsignedInt(LispObject obj)
-
coerceFromJavaByte
public static final LispObject coerceFromJavaByte(byte b)
-
checkCharacter
public static final LispCharacter checkCharacter(LispObject obj)
-
checkPackage
public static final Package checkPackage(LispObject obj)
-
checkPathname
public static Pathname checkPathname(LispObject obj)
-
checkFunction
public static final Function checkFunction(LispObject obj)
-
checkStream
public static final Stream checkStream(LispObject obj)
-
checkCharacterInputStream
public static final Stream checkCharacterInputStream(LispObject obj)
-
checkCharacterOutputStream
public static final Stream checkCharacterOutputStream(LispObject obj)
-
checkBinaryInputStream
public static final Stream checkBinaryInputStream(LispObject obj)
-
outSynonymOf
public static final Stream outSynonymOf(LispObject obj)
-
inSynonymOf
public static final Stream inSynonymOf(LispObject obj)
-
writeByte
public static final void writeByte(int n, LispObject obj)
-
checkReadtable
public static final Readtable checkReadtable(LispObject obj)
-
checkString
public static final AbstractString checkString(LispObject obj)
-
checkLayout
public static final Layout checkLayout(LispObject obj)
-
designator_readtable
public static final Readtable designator_readtable(LispObject obj)
-
checkEnvironment
public static final Environment checkEnvironment(LispObject obj)
-
checkBounds
public static final void checkBounds(int start, int end, int length)
-
coerceToFunction
public static final LispObject coerceToFunction(LispObject obj)
-
coerceToPackage
public static final Package coerceToPackage(LispObject obj)
-
coerceToPathname
public static Pathname coerceToPathname(LispObject arg)
-
assq
public static LispObject assq(LispObject item, LispObject alist)
-
memq
public static final boolean memq(LispObject item, LispObject list)
-
memql
public static final boolean memql(LispObject item, LispObject list)
-
getf
public static final LispObject getf(LispObject plist, LispObject indicator, LispObject defaultValue)
-
get
public static final LispObject get(LispObject symbol, LispObject indicator)
-
get
public static final LispObject get(LispObject symbol, LispObject indicator, LispObject defaultValue)
-
put
public static final LispObject put(Symbol symbol, LispObject indicator, LispObject value)
-
putf
public static final LispObject putf(LispObject plist, LispObject indicator, LispObject value)
-
remprop
public static final LispObject remprop(Symbol symbol, LispObject indicator)
-
format
public static final java.lang.String format(LispObject formatControl, LispObject formatArguments)
-
internInPackage
public static final Symbol internInPackage(java.lang.String name, java.lang.String packageName)
-
internKeyword
public static final Symbol internKeyword(java.lang.String s)
-
recall
public static LispObject recall(java.lang.String key)
-
recall
public static LispObject recall(SimpleString key)
-
internSpecial
public static final Symbol internSpecial(java.lang.String name, Package pkg, LispObject value)
-
internConstant
public static final Symbol internConstant(java.lang.String name, Package pkg, LispObject value)
-
exportSpecial
public static final Symbol exportSpecial(java.lang.String name, Package pkg, LispObject value)
-
exportConstant
public static final Symbol exportConstant(java.lang.String name, Package pkg, LispObject value)
-
getCurrentPackage
public static final Package getCurrentPackage()
-
resetIO
public static final void resetIO()
-
getTerminalIO
public static final TwoWayStream getTerminalIO()
-
getStandardInput
public static final Stream getStandardInput()
-
getStandardOutput
public static final Stream getStandardOutput()
-
currentReadtable
public static final Readtable currentReadtable()
-
exit
public static void exit(int status)
-
stepInSymbolP
public static LispObject stepInSymbolP(LispObject fun, LispObject obj)
-
handleStepping
public static final void handleStepping(LispObject function, LispObject args, Environment env, LispInteger stepCount)
-
printStepValue
public static final void printStepValue(long stepNumberInternal, LispObject result, LispThread thread)
-
setStepCounterCompleted
public static final void setStepCounterCompleted(long stepNumberInternal)
-
setSteppingTaskOn
public static void setSteppingTaskOn()
-
setSteppingTaskOff
public static void setSteppingTaskOff()
-
setDelimitedSteppingOn
public static void setDelimitedSteppingOn()
-
setDelimitedSteppingOff
public static void setDelimitedSteppingOff()
-
setSteppingOn
public static void setSteppingOn()
-
initializeStepCounter
public static void initializeStepCounter()
-
getStepCounter
public static LispObject getStepCounter()
-
setSteppingOff
public static void setSteppingOff()
-
initializeStepBlock
public static void initializeStepBlock()
-
-