X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=package-data-list.lisp-expr;h=abb77ec234c6ed502245c6869cbb7fed39f8b88f;hb=1d68d81c3022715f83faeff6ccc9836975783462;hp=dd90ecc6ccbfbc32e70a671cab576afb6f11deae;hpb=a42403d202981a043e8e0b24f7bb2c45eb60016d;p=sbcl.git diff --git a/package-data-list.lisp-expr b/package-data-list.lisp-expr index dd90ecc..abb77ec 100644 --- a/package-data-list.lisp-expr +++ b/package-data-list.lisp-expr @@ -53,9 +53,14 @@ of SBCL which maintained the CMU-CL-style split into two packages.)" "INT" "LOAD-1-FOREIGN" "LOAD-FOREIGN" "LOAD-SHARED-OBJECT" "LONG" "LONG-LONG" "MAKE-ALIEN" + "MAKE-ALIEN-STRING" "NULL-ALIEN" - "SAP-ALIEN" "SHORT" "SIGNED" "SLOT" "STRUCT" + "OFF-T" + "SAP-ALIEN" "SHORT" "SIGNED" + "SIZE-T" + "SLOT" "STRUCT" "UNDEFINED-ALIEN-ERROR" + "UNLOAD-SHARED-OBJECT" "UNSIGNED" "UNSIGNED-CHAR" "UNSIGNED-INT" "UNSIGNED-LONG" "UNSIGNED-LONG-LONG" "UNSIGNED-SHORT" "UTF8-STRING" @@ -66,11 +71,13 @@ of SBCL which maintained the CMU-CL-style split into two packages.)" :name "SB!ALIEN-INTERNALS" :doc "private: stuff for implementing ALIENs and friends" :use ("CL") - :export ("%CAST" + :export ("%ALIEN-VALUE" + "%CAST" "%DEREF-ADDR" "%HEAP-ALIEN" "%HEAP-ALIEN-ADDR" "%LOCAL-ALIEN-ADDR" "%LOCAL-ALIEN-FORCED-TO-MEMORY-P" "%SAP-ALIEN" "%SET-DEREF" "%SET-HEAP-ALIEN" "%SET-LOCAL-ALIEN" "%SET-SLOT" - "%SLOT-ADDR" "*VALUES-TYPE-OKAY*" "ALIEN-ARRAY-TYPE" + "%SLOT-ADDR" "*SAVED-FP-AND-PCS*" "*VALUES-TYPE-OKAY*" + "ALIEN-ARRAY-TYPE" "ALIEN-ARRAY-TYPE-DIMENSIONS" "ALIEN-ARRAY-TYPE-ELEMENT-TYPE" "ALIEN-ARRAY-TYPE-P" "ALIEN-BOOLEAN-TYPE" "ALIEN-BOOLEAN-TYPE-P" "ALIEN-CALLBACK" @@ -92,7 +99,9 @@ of SBCL which maintained the CMU-CL-style split into two packages.)" "ALIEN-SINGLE-FLOAT-TYPE-P" "ALIEN-SUBTYPE-P" "ALIEN-TYPE" "ALIEN-TYPE-=" "ALIEN-TYPE-ALIGNMENT" "ALIEN-TYPE-BITS" "ALIEN-TYPE-P" "ALIEN-TYPEP" - "ALIEN-VALUE" "ALIEN-VALUE-TYPE" + "ALIEN-VALUE" + "ALIEN-VALUE-TYPE" + "ALIEN-VALUE-TYPEP" "ALIEN-VALUE-SAP" "ALIEN-VALUE-P" "ALIEN-VALUES-TYPE" "ALIEN-VALUES-TYPE-P" "ALIEN-VALUES-TYPE-VALUES" "ALIGN-OFFSET" "ALIEN-VOID-TYPE-P" @@ -102,11 +111,12 @@ of SBCL which maintained the CMU-CL-style split into two packages.)" "COMPUTE-NATURALIZE-LAMBDA" "DEFINE-ALIEN-TYPE-CLASS" "DEFINE-ALIEN-TYPE-METHOD" "DEFINE-ALIEN-TYPE-TRANSLATOR" "DEPORT" "DEPORT-ALLOC" - "DEPOSIT-ALIEN-VALUE" "DISPOSE-LOCAL-ALIEN" + "DISPOSE-LOCAL-ALIEN" "*ENTER-ALIEN-CALLBACK*" "ENTER-ALIEN-CALLBACK" - "EXTRACT-ALIEN-VALUE" + "FIND-SAVED-FP-AND-PC" "HEAP-ALIEN-INFO" "HEAP-ALIEN-INFO-P" "HEAP-ALIEN-INFO-SAP-FORM" - "HEAP-ALIEN-INFO-TYPE" "INVOKE-ALIEN-TYPE-METHOD" "LOCAL-ALIEN" + "HEAP-ALIEN-INFO-TYPE" "INVOKE-ALIEN-TYPE-METHOD" + "INVOKE-WITH-SAVED-FP-AND-PC" "LOCAL-ALIEN" "LOCAL-ALIEN-INFO" "LOCAL-ALIEN-INFO-FORCE-TO-MEMORY-P" "LOCAL-ALIEN-INFO-P" "LOCAL-ALIEN-INFO-TYPE" "MAKE-ALIEN-FUN-TYPE" "MAKE-ALIEN-POINTER-TYPE" @@ -125,13 +135,13 @@ of SBCL which maintained the CMU-CL-style split into two packages.)" "*ASSEM-INSTRUCTIONS*" "*ASSEM-MAX-LOCATIONS*" - "EMIT-BYTE" "EMIT-SKIP" "EMIT-BACK-PATCH" + "EMIT-ALIGNMENT" "EMIT-BYTE" "EMIT-SKIP" "EMIT-BACK-PATCH" "EMIT-CHOOSER" "DEFINE-BITFIELD-EMITTER" "DEFINE-INSTRUCTION" "DEFINE-INSTRUCTION-MACRO" "DEF-ASSEMBLER-PARAMS" "EMIT-POSTIT" - "MAKE-SEGMENT" "SEGMENT-NAME" "ASSEMBLE" - "ALIGN" "INST" "LABEL" "LABEL-P" "GEN-LABEL" + "MAKE-SEGMENT" "SEGMENT-TYPE" "ASSEMBLE" + "INST" "LABEL" "LABEL-P" "GEN-LABEL" "EMIT-LABEL" "LABEL-POSITION" "APPEND-SEGMENT" "FINALIZE-SEGMENT" "ON-SEGMENT-CONTENTS-VECTORLY" "WRITE-SEGMENT-CONTENTS" "READS" "WRITES" "SEGMENT" @@ -158,7 +168,7 @@ of SBCL which maintained the CMU-CL-style split into two packages.)" "%BIGNUM-SET-LENGTH" "%DIGIT-0-OR-PLUSP" "%DIGIT-LOGICAL-SHIFT-RIGHT" "%FIXNUM-DIGIT-WITH-CORRECT-SIGN" "%FIXNUM-TO-DIGIT" - "%FLOOR" "%LOGAND" "%LOGIOR" "%LOGNOT" "%LOGXOR" + "%BIGFLOOR" "%LOGAND" "%LOGIOR" "%LOGNOT" "%LOGXOR" "%MULTIPLY" "%MULTIPLY-AND-ADD" "%SUBTRACT-WITH-BORROW" "ADD-BIGNUMS" "BIGNUM-ASHIFT-LEFT" "BIGNUM-ASHIFT-RIGHT" @@ -173,7 +183,7 @@ of SBCL which maintained the CMU-CL-style split into two packages.)" "FLOAT-BIGNUM-RATIO" "MAKE-SMALL-BIGNUM" "MULTIPLY-BIGNUM-AND-FIXNUM" "MULTIPLY-BIGNUMS" "MULTIPLY-FIXNUMS" "NEGATE-BIGNUM" - "SUBTRACT-BIGNUM" "SXHASH-BIGNUM")) + "%RANDOM-BIGNUM" "SUBTRACT-BIGNUM" "SXHASH-BIGNUM")) #s(sb-cold:package-data :name "SB!C" @@ -197,7 +207,7 @@ of SBCL which maintained the CMU-CL-style split into two packages.)" "*BACKEND-BYTE-ORDER*" "*BACKEND-DISASSEM-PARAMS*" "*BACKEND-INSTRUCTION-FLAVORS*" "*BACKEND-INSTRUCTION-FORMATS*" - "*BACKEND-INTERNAL-ERRORS*" "*BACKEND-PAGE-SIZE*" + "*BACKEND-INTERNAL-ERRORS*" "*BACKEND-PAGE-BYTES*" "*BACKEND-REGISTER-SAVE-PENALTY*" "*BACKEND-SB-LIST*" "*BACKEND-SB-NAMES*" "*BACKEND-SC-NAMES*" "*BACKEND-SC-NUMBERS*" @@ -214,10 +224,12 @@ of SBCL which maintained the CMU-CL-style split into two packages.)" #!+x86 "SET-FPU-WORD-FOR-C" #!+x86 "SET-FPU-WORD-FOR-LISP" "ALIGN-STACK-POINTER" + "ALIEN-FUNCALL-SAVES-FP-AND-PC" "ALLOC-ALIEN-STACK-SPACE" "ALLOC-NUMBER-STACK-SPACE" "ALLOCATE-CODE-OBJECT" "ALLOCATE-FRAME" "ALLOCATE-DYNAMIC-CODE-OBJECT" "ALLOCATE-FULL-CALL-FRAME" "ALWAYS-TRANSLATABLE" + "ANCESTOR-FRAME-REF" "ANCESTOR-FRAME-SET" "ANY" "ARG-COUNT-ERROR" "ASSEMBLE-FILE" "ATTRIBUTES" "ATTRIBUTES-INTERSECTION" "ATTRIBUTES-UNION" "ATTRIBUTES=" "BIND" @@ -230,7 +242,7 @@ of SBCL which maintained the CMU-CL-style split into two packages.)" "CHECK-SYMBOL" ;; FIXME: 32/64-bit issues "CHECK-UNSIGNED-BYTE-32" "CHECK-UNSIGNED-BYTE-64" - "CLOSURE-INIT" "CLOSURE-REF" + "CLOSURE-INIT" "CLOSURE-REF" "CLOSURE-INIT-FROM-FP" "CODE-CONSTANT-REF" "CODE-CONSTANT-SET" "*CODE-COVERAGE-INFO*" "COMPARE-AND-SWAP-SLOT" @@ -261,9 +273,11 @@ of SBCL which maintained the CMU-CL-style split into two packages.)" "DEFINE-STORAGE-CLASS" "DEFINE-VOP" "DEFKNOWN" "DEFOPTIMIZER" "DEFTRANSFORM" "DERIVE-TYPE" + "EMIT-BLOCK-HEADER" "ENTRY-NODE-INFO-NLX-TAG" "ENTRY-NODE-INFO-ST-TOP" "PHYSENV-DEBUG-LIVE-TN" "PHYSENV-LIVE-TN" "FAST-SYMBOL-VALUE" + "FAST-SYMBOL-GLOBAL-VALUE" "FIXUP-NOTE-KIND" "FIXUP-NOTE-FIXUP" "FIXUP-NOTE-POSITION" @@ -272,8 +286,12 @@ of SBCL which maintained the CMU-CL-style split into two packages.)" "FUN-INFO-DERIVE-TYPE" "FUN-INFO-IR2-CONVERT" "FUN-INFO-LTN-ANNOTATE" "FUN-INFO-OPTIMIZER" "GET-VECTOR-SUBTYPE" + "GET-TOPLEVELISH-FILE-INFO" "HALT" - "IF-EQ" "INLINE-SYNTACTIC-CLOSURE-LAMBDA" + "IF-EQ" + "IMMEDIATE-TN-P" + "INHIBIT-SAFEPOINTS" + "INLINE-SYNTACTIC-CLOSURE-LAMBDA" "INSERT-STEP-CONDITIONS" "IR2-COMPONENT-CONSTANTS" "IR2-CONVERT" "IR2-PHYSENV-NUMBER-STACK-P" @@ -281,10 +299,10 @@ of SBCL which maintained the CMU-CL-style split into two packages.)" "LAMBDA-WITH-LEXENV" "LEXENV-FIND" "LOCATION=" "LTN-ANNOTATE" "MAKE-ALIAS-TN" "MAKE-CATCH-BLOCK" - "MAKE-CLOSURE" "MAKE-CONSTANT-TN" "MAKE-FIXNUM" + "MAKE-CLOSURE" "MAKE-CONSTANT-TN" "MAKE-FIXUP-NOTE" "MAKE-LOAD-TIME-CONSTANT-TN" "MAKE-N-TNS" "MAKE-NORMAL-TN" - "MAKE-OTHER-IMMEDIATE-TYPE" "MAKE-RANDOM-TN" + "MAKE-RANDOM-TN" "MAKE-REPRESENTATION-TN" "MAKE-RESTRICTED-TN" "MAKE-SC-OFFSET" "MAKE-STACK-POINTER-TN" "MAKE-TN-REF" "MAKE-UNWIND-BLOCK" "MAKE-WIRED-TN" "MAYBE-COMPILER-NOTIFY" @@ -304,8 +322,11 @@ of SBCL which maintained the CMU-CL-style split into two packages.)" "%%POP-DX" "PREDICATE" "PRIMITIVE-TYPE" "PRIMITIVE-TYPE-OF" "PRIMITIVE-TYPE-OR-LOSE" "PRIMITIVE-TYPE-VOP" - "PRIMITIVE-TYPE-NAME" "PUSH-VALUES" + "PRIMITIVE-TYPE-NAME" + "PRIMITIVE-TYPE-INDIRECT-CELL-TYPE" + "PUSH-VALUES" "READ-PACKED-BIT-VECTOR" "READ-VAR-INTEGER" "READ-VAR-STRING" + #!+inline-constants "REGISTER-INLINE-CONSTANT" "RESET-STACK-POINTER" "RESTORE-DYNAMIC-STATE" "RETURN-MULTIPLE" "SAVE-DYNAMIC-STATE" "SB" "SB-ALLOCATED-SIZE" "SB-NAME" "SB-OR-LOSE" "SB-P" "SC" "SC-CASE" @@ -323,7 +344,7 @@ of SBCL which maintained the CMU-CL-style split into two packages.)" "TN-REF-NEXT" "TN-REF-NEXT-REF" "TN-REF-P" "TN-REF-TARGET" "TN-REF-TN" "TN-REF-VOP" "TN-REF-WRITE-P" "TN-SC" "TN-VALUE" "TRACE-TABLE-ENTRY" "TYPE-CHECK-ERROR" "UNBIND" "UNBIND-TO-HERE" - "UNSAFE" "UNWIND" "UWP-ENTRY" + "UNSAFE" "UNSAFELY-FLUSHABLE" "UNWIND" "UWP-ENTRY" "VERIFY-ARG-COUNT" "WRITE-PACKED-BIT-VECTOR" "WRITE-VAR-INTEGER" "WRITE-VAR-STRING" "XEP-ALLOCATE-FRAME" "LABEL-ID" "FIXUP" "FIXUP-FLAVOR" "FIXUP-NAME" "FIXUP-OFFSET" @@ -334,6 +355,7 @@ of SBCL which maintained the CMU-CL-style split into two packages.)" "NOTE-FIXUP" "DEF-CASSER" "DEF-REFFER" + "EMIT-CONSTANT" "EMIT-NOP" "DEF-SETTER" "FIXED-ALLOC" @@ -341,7 +363,7 @@ of SBCL which maintained the CMU-CL-style split into two packages.)" "MAKE-FUNCALLABLE-INSTANCE-TRAMP" "RETURN-SINGLE" "NOTE-NEXT-INSTRUCTION" - "SET-SLOT" + "SET-SLOT" "INIT-SLOT" "LOCATION-NUMBER" "*COMPONENT-BEING-COMPILED*" "BLOCK-NUMBER" @@ -352,6 +374,7 @@ of SBCL which maintained the CMU-CL-style split into two packages.)" "LARGE-ALLOC" "%SET-SIMPLE-FUN-SELF" "VM-SUPPORT-ROUTINES-IMMEDIATE-CONSTANT-SC" + "VM-SUPPORT-ROUTINES-BOXED-IMMEDIATE-SC-P" "VM-SUPPORT-ROUTINES-LOCATION-PRINT-NAME" "VM-SUPPORT-ROUTINES-PRIMITIVE-TYPE-OF" "VM-SUPPORT-ROUTINES-PRIMITIVE-TYPE" @@ -376,7 +399,9 @@ of SBCL which maintained the CMU-CL-style split into two packages.)" "VM-SUPPORT-ROUTINES-LOCATION-NUMBER" "WITH-SOURCE-LOCATION" - "*SOURCE-LOCATION-THUNKS*")) + "*SOURCE-LOCATION-THUNKS*" + + "BRANCH-IF")) #s(sb-cold:package-data :name "SB!DEBUG" @@ -387,32 +412,38 @@ is still mixed indiscriminately with low-level internal implementation stuff like *STACK-TOP-HINT* and unsupported stuff like *TRACED-FUN-LIST*." :use ("CL" "SB!EXT" "SB!INT" "SB!SYS" "SB!KERNEL") :reexport ("*DEBUG-PRINT-VARIABLE-ALIST*") - :export ("*DEBUG-BEGINNER-HELP-P*" + :export ("*BACKTRACE-FRAME-COUNT*" + "*DEBUG-BEGINNER-HELP-P*" "*DEBUG-CONDITION*" "*DEBUG-READTABLE*" "*DEBUG-HELP-STRING*" "*FLUSH-DEBUG-ERRORS*" "*IN-THE-DEBUGGER*" - "*SHOW-ENTRY-POINT-DETAILS*" + "*METHOD-FRAME-STYLE*" "*TRACE-INDENTATION-STEP*" "*MAX-TRACE-INDENTATION*" "*TRACE-FRAME*" "*TRACED-FUN-LIST*" - "ARG" "BACKTRACE" "BACKTRACE-AS-LIST" "INTERNAL-DEBUG" "VAR" + "ARG" + "INTERNAL-DEBUG" "VAR" "*PRINT-LOCATION-KIND*" "*ONLY-BLOCK-START-LOCATIONS*" "*STACK-TOP-HINT*" "*TRACE-VALUES*" "DO-DEBUG-COMMAND" "*TRACE-ENCAPSULATE-DEFAULT*" "FRAME-HAS-DEBUG-TAG-P" - "UNWIND-TO-FRAME-AND-CALL")) + "UNWIND-TO-FRAME-AND-CALL" + ;; Deprecated + "BACKTRACE" "BACKTRACE-AS-LIST" "*SHOW-ENTRY-POINT-DETAILS*" + ;; Replaced by + "PRINT-BACKTRACE" "LIST-BACKTRACE")) #s(sb-cold:package-data :name "SB!DI" :doc "private: primitives used to write debuggers" :use ("CL" "SB!EXT" "SB!INT" "SB!KERNEL" "SB!SYS" "SB!VM") :import-from (("SB!C" - "DEBUG-SOURCE-FROM" "DEBUG-SOURCE-NAME" + "DEBUG-SOURCE-FORM" "DEBUG-SOURCE-NAMESTRING" "DEBUG-SOURCE-CREATED" "DEBUG-SOURCE-COMPILED" "DEBUG-SOURCE-START-POSITIONS" "MAKE-DEBUG-SOURCE" "DEBUG-SOURCE" "DEBUG-SOURCE-P")) - :reexport ("DEBUG-SOURCE-FROM" - "DEBUG-SOURCE-NAME" + :reexport ("DEBUG-SOURCE-FORM" + "DEBUG-SOURCE-NAMESTRING" "DEBUG-SOURCE-CREATED" "DEBUG-SOURCE-COMPILED" "DEBUG-SOURCE-START-POSITIONS" "DEBUG-SOURCE" "DEBUG-SOURCE-P") @@ -435,19 +466,20 @@ like *STACK-TOP-HINT* and unsupported stuff like *TRACED-FUN-LIST*." "DEBUG-VAR-SYMBOL-NAME" "DEBUG-VAR-P" "DEBUG-VAR-PACKAGE-NAME" "DEBUG-VAR-SYMBOL" "DEBUG-VAR-VALID-VALUE" "DEBUG-VAR-VALIDITY" "DEBUG-VAR-VALUE" - "DELETE-BREAKPOINT" "DO-BLOCKS" + "DELETE-BREAKPOINT" "DO-DEBUG-BLOCK-LOCATIONS" "DO-DEBUG-FUN-BLOCKS" "DO-DEBUG-FUN-VARS" "FORM-NUMBER-TRANSLATIONS" "FRAME" "FRAME-CATCHES" "FRAME-CODE-LOCATION" "FRAME-DEBUG-FUN" "FRAME-DOWN" "FRAME-FUN-MISMATCH" "FRAME-NUMBER" "FRAME-P" "FRAME-UP" + "GET-TOPLEVEL-FORM" "REPLACE-FRAME-CATCH-TAG" "FUN-DEBUG-FUN" "FUN-END-COOKIE-VALID-P" "INVALID-CONTROL-STACK-POINTER" "INVALID-VALUE" "LAMBDA-LIST-UNAVAILABLE" "MAKE-BREAKPOINT" "NO-DEBUG-BLOCKS" "NO-DEBUG-FUN-RETURNS" "NO-DEBUG-INFO" "PREPROCESS-FOR-EVAL" - "RETURN-FROM-FRAME" "SOURCE-PATH-CONTEXT" + "EVAL-IN-FRAME" "RETURN-FROM-FRAME" "SOURCE-PATH-CONTEXT" "TOP-FRAME" "UNHANDLED-DEBUG-CONDITION" "UNKNOWN-CODE-LOCATION" "UNKNOWN-CODE-LOCATION-P" "UNKNOWN-DEBUG-VAR" "CODE-LOCATION-KIND" "FLUSH-FRAMES-ABOVE")) @@ -526,13 +558,14 @@ like *STACK-TOP-HINT* and unsupported stuff like *TRACED-FUN-LIST*." "BUILD-ID-CORE-ENTRY-TYPE-CODE" "*FASL-FILE-TYPE*" "CLOSE-FASL-OUTPUT" + "DEFLATED-CORE-SPACE-ID-FLAG" "DUMP-ASSEMBLER-ROUTINES" "DUMP-OBJECT" "DYNAMIC-CORE-SPACE-ID" "END-CORE-ENTRY-TYPE-CODE" "FASL-CONSTANT-ALREADY-DUMPED-P" "+FASL-FILE-VERSION+" - "FASL-DUMP-COLD-LOAD-FORM" "FASL-DUMP-COMPONENT" + "FASL-DUMP-COMPONENT" "FASL-DUMP-COLD-FSET" "FASL-DUMP-LOAD-TIME-VALUE" "FASL-DUMP-LOAD-TIME-VALUE-LAMBDA" "FASL-DUMP-SOURCE-INFO" "FASL-DUMP-TOPLEVEL-LAMBDA-CALL" @@ -543,7 +576,7 @@ like *STACK-TOP-HINT* and unsupported stuff like *TRACED-FUN-LIST*." "INITIAL-FUN-CORE-ENTRY-TYPE-CODE" "*!LOAD-TIME-VALUES*" "LOAD-TYPE-PREDICATE" - #!+(and sb-thread sb-lutex) "LUTEX-TABLE-CORE-ENTRY-TYPE-CODE" + "MAX-CORE-SPACE-ID" "NEW-DIRECTORY-CORE-ENTRY-TYPE-CODE" "OPEN-FASL-OUTPUT" "PAGE-TABLE-CORE-ENTRY-TYPE-CODE" "READ-ONLY-CORE-SPACE-ID" @@ -568,26 +601,70 @@ like *STACK-TOP-HINT* and unsupported stuff like *TRACED-FUN-LIST*." :name "SB!EXT" :doc "public: miscellaneous supported extensions to the ANSI Lisp spec" :use ("CL" "SB!ALIEN" "SB!INT" "SB!SYS" "SB!GRAY") - :export ( ;; Information about how the program was invoked is + :export (;; Information about how the program was invoked is ;; nonstandard but very useful. - "*POSIX-ARGV*" "*CORE-PATHNAME*" + "*POSIX-ARGV*" "*CORE-PATHNAME*" "*RUNTIME-PATHNAME*" "POSIX-GETENV" "POSIX-ENVIRON" + ;; Customizing initfile locations + "*USERINIT-PATHNAME-FUNCTION*" + "*SYSINIT-PATHNAME-FUNCTION*" + + ;; Compare and Swap support + "CAS" "COMPARE-AND-SWAP" + "DEFCAS" + "DEFINE-CAS-EXPANDER" + "GET-CAS-EXPANSION" + + ;; Other atomic operations and types related to them + "ATOMIC-INCF" + "ATOMIC-DECF" + "ATOMIC-UPDATE" + "ATOMIC-PUSH" + "ATOMIC-POP" + "WORD" + "MOST-POSITIVE-WORD" + + ;; Not an atomic operation, but should be used with them + "SPIN-LOOP-HINT" + + ;; Waiting for arbitrary events. + "WAIT-FOR" + + ;; Time related things + "CALL-WITH-TIMING" + "GET-TIME-OF-DAY" ;; People have various good reasons to mess with the GC. "*AFTER-GC-HOOKS*" "BYTES-CONSED-BETWEEN-GCS" - "GC" "GC-OFF" "GC-ON" "GET-BYTES-CONSED" + "GC" "GET-BYTES-CONSED" "*GC-RUN-TIME*" "PURIFY" + "DYNAMIC-SPACE-SIZE" + ;; Gencgc only, but symbols exist for manual building + ;; convenience on all platforms. + "GENERATION-AVERAGE-AGE" + "GENERATION-BYTES-ALLOCATED" + "GENERATION-BYTES-CONSED-BETWEEN-GCS" + "GENERATION-MINIMUM-AGE-BEFORE-GC" + "GENERATION-NUMBER-OF-GCS" + "GENERATION-NUMBER-OF-GCS-BEFORE-PROMOTION" + "GC-LOGFILE" + + ;; Stack allocation control + "*STACK-ALLOCATE-DYNAMIC-EXTENT*" ;; Customizing printing of compiler and debugger messages "*COMPILER-PRINT-VARIABLE-ALIST*" "*DEBUG-PRINT-VARIABLE-ALIST*" ;; Hooks into init & save sequences - "*INIT-HOOKS*" "*SAVE-HOOKS*" + "*INIT-HOOKS*" "*SAVE-HOOKS*" "*EXIT-HOOKS*" + + ;; Controlling exiting other threads. + "*EXIT-TIMEOUT*" ;; There is no one right way to report progress on ;; hairy compiles. @@ -613,7 +690,13 @@ like *STACK-TOP-HINT* and unsupported stuff like *TRACED-FUN-LIST*." "DEFCONSTANT-UNEQL" "DEFCONSTANT-UNEQL-NAME" "DEFCONSTANT-UNEQL-NEW-VALUE" "DEFCONSTANT-UNEQL-OLD-VALUE" - ;; package-locking stuff + ;; global lexicals, access to global symbol values + "DEFGLOBAL" + "SYMBOL-GLOBAL-VALUE" + + ;; package extensions + ;; + ;; locks #!+sb-package-locks "PACKAGE-LOCKED-P" #!+sb-package-locks "LOCK-PACKAGE" #!+sb-package-locks "UNLOCK-PACKAGE" @@ -629,6 +712,13 @@ like *STACK-TOP-HINT* and unsupported stuff like *TRACED-FUN-LIST*." "WITHOUT-PACKAGE-LOCKS" "DISABLE-PACKAGE-LOCKS" "ENABLE-PACKAGE-LOCKS" + ;; local nicknames + "ADD-PACKAGE-LOCAL-NICKNAME" + "REMOVE-PACKAGE-LOCAL-NICKNAME" + "PACKAGE-LOCAL-NICKNAMES" + "PACKAGE-LOCALLY-NICKNAMED-BY-LIST" + ;; behaviour on DEFPACKAGE variance + "*ON-PACKAGE-VARIANCE*" ;; Custom conditions & condition accessors for users to handle. "CODE-DELETION-NOTE" @@ -636,12 +726,25 @@ like *STACK-TOP-HINT* and unsupported stuff like *TRACED-FUN-LIST*." "IMPLICIT-GENERIC-FUNCTION-NAME" "IMPLICIT-GENERIC-FUNCTION-WARNING" "INVALID-FASL" + "DEPRECATION-CONDITION" + + "NAME-CONFLICT" "NAME-CONFLICT-FUNCTION" + "NAME-CONFLICT-DATUM" "NAME-CONFLICT-SYMBOLS" + "RESOLVE-CONFLICT" + + "PRINT-UNREADABLY" ;; and a mechanism for controlling same at compile time "MUFFLE-CONDITIONS" "UNMUFFLE-CONDITIONS" + ;; and one for controlling same at runtime + "*MUFFLED-WARNINGS*" + + ;; specification which print errors to ignore ala *break-on-signal* + "*SUPPRESS-PRINT-ERRORS*" + ;; extended declarations.. - "FREEZE-TYPE" "INHIBIT-WARNINGS" + "ALWAYS-BOUND" "FREEZE-TYPE" "GLOBAL" "INHIBIT-WARNINGS" "MAYBE-INLINE" ;; ..and variables to control compiler policy @@ -651,25 +754,37 @@ like *STACK-TOP-HINT* and unsupported stuff like *TRACED-FUN-LIST*." ;; ..and inspector of compiler policy "DESCRIBE-COMPILER-POLICY" "RESTRICT-COMPILER-POLICY" + "WITH-COMPILER-POLICY" ;; a special form for breaking out of our "declarations ;; are assertions" default "TRULY-THE" + ;; Misc. array and vector tools. + "ARRAY-STORAGE-VECTOR" + ;; This is something which must exist inside any Common ;; Lisp implementation, and which someone writing a ;; customized toplevel might well want. It seems perverse ;; to hide it from them.. "INTERACTIVE-EVAL" + ;; Used by LOAD and EVAL-WHEN to pass toplevel indexes + ;; to compiler. + "EVAL-TLF" + ;; weak pointers and finalization "CANCEL-FINALIZATION" "FINALIZE" - "HASH-TABLE-WEAKNESS" "MAKE-WEAK-POINTER" - "WEAK-POINTER" "WEAK-POINTER-P" "WEAK-POINTER-VALUE" + "MAKE-WEAK-POINTER" + "WEAK-POINTER" + "WEAK-POINTER-P" + "WEAK-POINTER-VALUE" - ;; Hash table locking + ;; Hash table extensions + "DEFINE-HASH-TABLE-TEST" "HASH-TABLE-SYNCHRONIZED-P" + "HASH-TABLE-WEAKNESS" "WITH-LOCKED-HASH-TABLE" ;; If the user knows we're doing IEEE, he might reasonably @@ -707,10 +822,17 @@ like *STACK-TOP-HINT* and unsupported stuff like *TRACED-FUN-LIST*." "*INVOKE-DEBUGGER-HOOK*" ;; miscellaneous useful supported extensions - "QUIT" + "QUIT" "EXIT" "*ED-FUNCTIONS*" "*MODULE-PROVIDER-FUNCTIONS*" + "MAP-DIRECTORY" "WITH-TIMEOUT" "TIMEOUT" + "SEED-RANDOM-STATE" + "TYPEXPAND-1" "TYPEXPAND" "TYPEXPAND-ALL" + "DEFINED-TYPE-NAME-P" "VALID-TYPE-SPECIFIER-P" + "DELETE-DIRECTORY" + "SET-SBCL-SOURCE-LOCATION" + "*DISASSEMBLE-ANNOTATE*" ;; stepping interface "STEP-CONDITION" "STEP-FORM-CONDITION" "STEP-FINISHED-CONDITION" @@ -746,7 +868,19 @@ like *STACK-TOP-HINT* and unsupported stuff like *TRACED-FUN-LIST*." ;; timer "TIMER" "MAKE-TIMER" "TIMER-NAME" "TIMER-SCHEDULED-P" - "SCHEDULE-TIMER" "UNSCHEDULE-TIMER" "LIST-ALL-TIMERS")) + "SCHEDULE-TIMER" "UNSCHEDULE-TIMER" "LIST-ALL-TIMERS" + + ;; SIMD pack + #!+sb-simd-pack "SIMD-PACK" + #!+sb-simd-pack "SIMD-PACK-P" + #!+sb-simd-pack "%MAKE-SIMD-PACK-UB32" + #!+sb-simd-pack "%MAKE-SIMD-PACK-UB64" + #!+sb-simd-pack "%MAKE-SIMD-PACK-DOUBLE" + #!+sb-simd-pack "%MAKE-SIMD-PACK-SINGLE" + #!+sb-simd-pack "%SIMD-PACK-UB32S" + #!+sb-simd-pack "%SIMD-PACK-UB64S" + #!+sb-simd-pack "%SIMD-PACK-DOUBLES" + #!+sb-simd-pack "%SIMD-PACK-SINGLES")) #s(sb-cold:package-data :name "SB!FORMAT" @@ -791,6 +925,12 @@ possibly temporariliy, because it might be used internally." "FP-ZERO-P" "NEG-FP-ZERO" + ;; Stack allocation without any questions asked + "TRULY-DYNAMIC-EXTENT" + + ;; Like WITH-LOCKED-HASH-TABLE, but disabled interrupts + "WITH-LOCKED-SYSTEM-TABLE" + ;; generic set implementation "ADD-TO-XSET" "ALLOC-XSET" @@ -821,6 +961,9 @@ possibly temporariliy, because it might be used internally." ;; name to the string if possible "BLOCK-GENSYM" + ;; Calling a list of hook functions, plus error handling. + "CALL-HOOKS" + ;; Constant form evaluation "CONSTANT-FORM-VALUE" "CONSTANT-TYPEP" @@ -834,6 +977,10 @@ possibly temporariliy, because it might be used internally." ;; hash mixing operations "MIX" "MIXF" + ;; Macroexpansion that doesn't touch special forms + "%MACROEXPAND" + "%MACROEXPAND-1" + ;; I'm not convinced that FDEFINITIONs are the ideal ;; solution, so exposing ways to peek into the system ;; seems undesirable, since it makes it harder to get @@ -841,21 +988,33 @@ possibly temporariliy, because it might be used internally." "*SETF-FDEFINITION-HOOK*" ;; error-reporting facilities + "ARGUMENTS-OUT-OF-DOMAIN-ERROR" + "BAD-TYPE" + "CLOSED-STREAM-ERROR" "COMPILED-PROGRAM-ERROR" + "COMPILER-MACRO-KEYWORD-PROBLEM" "ENCAPSULATED-CONDITION" "INTERPRETED-PROGRAM-ERROR" + "INVALID-ARRAY-ERROR" + "INVALID-ARRAY-INDEX-ERROR" + "INVALID-ARRAY-P" "SIMPLE-CONTROL-ERROR" "SIMPLE-FILE-ERROR" "SIMPLE-PARSE-ERROR" "SIMPLE-PROGRAM-ERROR" - "SIMPLE-READER-ERROR" "SIMPLE-READER-PACKAGE-ERROR" + "SIMPLE-READER-ERROR" + "SIMPLE-READER-PACKAGE-ERROR" + "SIMPLE-REFERENCE-ERROR" + "SIMPLE-REFERENCE-WARNING" "SIMPLE-STREAM-ERROR" "SIMPLE-STORAGE-CONDITION" "SIMPLE-STYLE-WARNING" "TRY-RESTART" ;; error-signalling facilities + "STANDARD-READTABLE-MODIFIED-ERROR" + "STANDARD-PPRINT-DISPATCH-TABLE-MODIFIED-ERROR" "ARRAY-BOUNDING-INDICES-BAD-ERROR" + "CIRCULAR-LIST-ERROR" "SEQUENCE-BOUNDING-INDICES-BAD-ERROR" - "SPECIAL-FORM-FUNCTION" "STYLE-WARN" "SIMPLE-COMPILER-NOTE" @@ -867,6 +1026,8 @@ possibly temporariliy, because it might be used internally." "C-STRING-ENCODING-ERROR" "C-STRING-ENCODING-ERROR-EXTERNAL-FORMAT" "C-STRING-DECODING-ERROR" "C-STRING-DECODING-ERROR-EXTERNAL-FORMAT" "ATTEMPT-RESYNC" "FORCE-END-OF-FILE" + "READ-UNREADABLE-REPLACEMENT" + ;; bootstrapping magic, to make things happen both in ;; the cross-compilation host compiler's environment and @@ -889,17 +1050,19 @@ possibly temporariliy, because it might be used internally." "SBCL-HOMEDIR-PATHNAME" "SIMPLIFY-NAMESTRING" - ;; PCOUNTERs - "FASTBIG-INCF-PCOUNTER-OR-FIXNUM" - "INCF-PCOUNTER" - "INCF-PCOUNTER-OR-FIXNUM" - "MAKE-PCOUNTER" - "PCOUNTER" - "PCOUNTER->INTEGER" - "PCOUNTER-OR-FIXNUM->INTEGER" - "PCOUNTER-P" "*N-BYTES-FREED-OR-PURIFIED*" + ;; Deprecating stuff + "DEFINE-DEPRECATED-FUNCTION" + "DEFINE-DEPRECATED-VARIABLE" + "DEPRECATED-VARIABLE" + "CHECK-DEPRECATED-VARIABLE" + "EARLY-DEPRECATION-WARNING" + "LATE-DEPRECATION-WARNING" + "FINAL-DEPRECATION-WARNING" + "DEPRECATION-WARNING" + "DEPRECATION-ERROR" + ;; miscellaneous non-standard but handy user-level functions.. "ASSQ" "DELQ" "MEMQ" "POSQ" "NEQ" "ADJUST-LIST" @@ -916,14 +1079,15 @@ possibly temporariliy, because it might be used internally." "PSXHASH" "%BREAK" "NTH-BUT-WITH-SANE-ARG-ORDER" - "DEPRECATION-WARNING" "BIT-VECTOR-=" "READ-EVALUATED-FORM" "MAKE-UNPRINTABLE-OBJECT" + "POWER-OF-TWO-CEILING" + "PRINT-NOT-READABLE-ERROR" ;; ..and macros.. "COLLECT" - "DO-ANONYMOUS" "DOHASH" "DOVECTOR" + "DO-ANONYMOUS" "DOVECTOR" "DOHASH" "DOPLIST" "NAMED-LET" "ONCE-ONLY" "DEFENUM" @@ -935,6 +1099,7 @@ possibly temporariliy, because it might be used internally." "!DEF-BOOLEAN-ATTRIBUTE" "WITH-REBOUND-IO-SYNTAX" "WITH-SANE-IO-SYNTAX" + "WITH-PROGRESSIVE-TIMEOUT" ;; ..and CONDITIONs.. "BUG" @@ -948,17 +1113,17 @@ possibly temporariliy, because it might be used internally." "*PRINT-CONDITION-REFERENCES*" "DUPLICATE-DEFINITION" "DUPLICATE-DEFINITION-NAME" - "PACKAGE-AT-VARIANCE" "ARRAY-INITIAL-ELEMENT-MISMATCH" - "TYPE-WARNING" "LOCAL-ARGUMENT-MISMATCH" + "PACKAGE-AT-VARIANCE" + "PACKAGE-AT-VARIANCE-ERROR" + "ARRAY-INITIAL-ELEMENT-MISMATCH" + "TYPE-WARNING" "TYPE-STYLE-WARNING" + "LOCAL-ARGUMENT-MISMATCH" "FORMAT-ARGS-MISMATCH" "FORMAT-TOO-FEW-ARGS-WARNING" "FORMAT-TOO-MANY-ARGS-WARNING" "EXTENSION-FAILURE" "STRUCTURE-INITARG-NOT-KEYWORD" "CONSTANT-MODIFIED" - "NAME-CONFLICT" "NAME-CONFLICT-FUNCTION" - "NAME-CONFLICT-DATUM" "NAME-CONFLICT-SYMBOLS" - "RESOLVE-CONFLICT" - ;; ..and DEFTYPEs.. + "MAX-HASH" "HASH" "INDEX" "LOAD/STORE-INDEX" "SIGNED-BYTE-WITH-A-BITE-OUT" "UNSIGNED-BYTE-WITH-A-BITE-OUT" @@ -987,7 +1152,7 @@ possibly temporariliy, because it might be used internally." "RETURN-CHAR-CODE" "RUBOUT-CHAR-CODE" "TAB-CHAR-CODE" ;; symbol-hacking idioms - "KEYWORDICATE" "SYMBOLICATE" + "GENSYMIFY" "KEYWORDICATE" "SYMBOLICATE" ;; certainly doesn't belong in public extensions ;; FIXME: maybe belongs in %KERNEL with other typesystem stuff? @@ -1001,6 +1166,7 @@ possibly temporariliy, because it might be used internally." "DEFINE-HASH-CACHE" "DEFUN-CACHED" "DEFINE-CACHED-SYNONYM" + "DROP-ALL-HASH-CACHES" ;; time "FORMAT-DECODED-TIME" @@ -1050,19 +1216,17 @@ possibly temporariliy, because it might be used internally." "LISTEN-SKIP-WHITESPACE" "PACKAGE-INTERNAL-SYMBOL-COUNT" "PACKAGE-EXTERNAL-SYMBOL-COUNT" "PARSE-BODY" "PARSE-LAMBDA-LIST" "PARSE-LAMBDA-LIST-LIKE-THING" - "PROPER-LIST-OF-LENGTH-P" + "PROPER-LIST-OF-LENGTH-P" "PROPER-LIST-P" "LIST-OF-LENGTH-AT-LEAST-P" "LIST-WITH-LENGTH-P" "SINGLETON-P" "READ-SEQUENCE-OR-DIE" "RENAME-KEY-ARGS" "MISSING-ARG" - "UNIX-NAMESTRING" ; FIXME: perhaps belongs in package SB!UNIX "FEATUREP" "FLUSH-STANDARD-OUTPUT-STREAMS" "WITH-UNIQUE-NAMES" "MAKE-GENSYM-LIST" "ABOUT-TO-MODIFY-SYMBOL-VALUE" - "SYMBOL-SELF-EVALUATING-P" "SELF-EVALUATING-P" "PRINT-PRETTY-ON-STREAM-P" "ARRAY-READABLY-PRINTABLE-P" @@ -1073,6 +1237,7 @@ possibly temporariliy, because it might be used internally." "DEBUG-NAMIFY" "FORCE" "DELAY" "PROMISE-READY-P" "FIND-RESTART-OR-CONTROL-ERROR" + "LOAD-AS-SOURCE" ;; These could be moved back into SB!EXT if someone has ;; compelling reasons, but hopefully we can get by @@ -1081,7 +1246,6 @@ possibly temporariliy, because it might be used internally." "GET-FLOATING-POINT-MODES" "SET-FLOATING-POINT-MODES" "WITH-FLOAT-TRAPS-MASKED" - "DEFINE-HASH-TABLE-TEST" ;; compatibility hacks for old-style CMU CL data formats "UNIX-ENVIRONMENT-CMUCL-FROM-SBCL" @@ -1091,7 +1255,6 @@ possibly temporariliy, because it might be used internally." "+EMPTY-HT-SLOT+" ;; low-level i/o stuff - "DONE-WITH-FAST-READ-BYTE" "DONE-WITH-FAST-READ-CHAR" "FAST-READ-BYTE" "FAST-READ-BYTE-REFILL" @@ -1102,7 +1265,7 @@ possibly temporariliy, because it might be used internally." "FAST-READ-VAR-U-INTEGER" "FILE-NAME" "INTERN*" - "PREPARE-FOR-FAST-READ-BYTE" + "WITH-FAST-READ-BYTE" "PREPARE-FOR-FAST-READ-CHAR" ;; reflection of our backquote implementation that the @@ -1152,55 +1315,119 @@ integration' (said CMU CL architecture.tex) and that probably was and is a good idea, but see SB-SYS re. blurring of boundaries." :use ("CL" "SB!ALIEN" "SB!ALIEN-INTERNALS" "SB!BIGNUM" "SB!EXT" "SB!FASL" "SB!INT" "SB!SYS" "SB!GRAY") - :reexport ("DEF!STRUCT" "DEF!MACRO") + :reexport ("DEF!STRUCT" + "DEF!MACRO" + #!+sb-simd-pack "SIMD-PACK" + #!+sb-simd-pack "SIMD-PACK-P" + #!+sb-simd-pack "%MAKE-SIMD-PACK-UB32" + #!+sb-simd-pack "%MAKE-SIMD-PACK-UB64" + #!+sb-simd-pack "%MAKE-SIMD-PACK-DOUBLE" + #!+sb-simd-pack "%MAKE-SIMD-PACK-SINGLE" + #!+sb-simd-pack "%SIMD-PACK-UB32S" + #!+sb-simd-pack "%SIMD-PACK-UB64S" + #!+sb-simd-pack "%SIMD-PACK-DOUBLES" + #!+sb-simd-pack "%SIMD-PACK-SINGLES") :export ("%ACOS" - "%ACOSH" "%ARRAY-AVAILABLE-ELEMENTS" "%ARRAY-DATA-VECTOR" + "%ACOSH" + "%ADJOIN" + "%ADJOIN-EQ" + "%ADJOIN-KEY" + "%ADJOIN-KEY-EQ" + "%ADJOIN-KEY-TEST" + "%ADJOIN-KEY-TEST-NOT" + "%ADJOIN-TEST" + "%ADJOIN-TEST-NOT" + "%ARRAY-AVAILABLE-ELEMENTS" "%ARRAY-DATA-VECTOR" "%ARRAY-DIMENSION" "%ARRAY-DISPLACED-P" + "%ARRAY-DISPLACED-FROM" "%ARRAY-DISPLACEMENT" "%ARRAY-FILL-POINTER" "%ARRAY-FILL-POINTER-P" "%ARRAY-RANK" + #!+(or x86 x86-64 ppc) + "%ARRAY-ATOMIC-INCF/WORD" "%ASSOC" + "%ASSOC-EQ" + "%ASSOC-IF" + "%ASSOC-IF-KEY" + "%ASSOC-IF-NOT" + "%ASSOC-IF-NOT-KEY" "%ASSOC-KEY" + "%ASSOC-KEY-EQ" "%ASSOC-KEY-TEST" "%ASSOC-KEY-TEST-NOT" "%ASSOC-TEST" "%ASSOC-TEST-NOT" "%ASIN" "%ASINH" - "%ATAN" "%ATAN2" "%ATANH" "%CALLER-FRAME-AND-PC" + "%ATAN" "%ATAN2" "%ATANH" + "%CALLER-FRAME" + "%CALLER-PC" + "%CEILING" "%CHECK-BOUND" "%CHECK-GENERIC-SEQUENCE-BOUNDS" "%CHECK-VECTOR-SEQUENCE-BOUNDS" - "%CLOSURE-FUN" "%CLOSURE-INDEX-REF" "%COMPARE-AND-SWAP-CAR" "%COMPARE-AND-SWAP-CDR" "%COMPARE-AND-SWAP-INSTANCE-REF" "%COMPARE-AND-SWAP-SVREF" "%COMPARE-AND-SWAP-SYMBOL-PLIST" "%COMPARE-AND-SWAP-SYMBOL-VALUE" + "%CONCATENATE-TO-BASE-STRING" + "%CONCATENATE-TO-STRING" "%COS" "%COS-QUICK" "%COSH" "%DATA-VECTOR-AND-INDEX" "%DEPOSIT-FIELD" - "%DOUBLE-FLOAT" "%DPB" "%EQL" "%EXP" "%EXPM1" "%FIND-POSITION" + "%DOUBLE-FLOAT" "%DPB" "%EQL" + "%EXIT" + "%EXP" "%EXPM1" + "%FLOOR" + "%FIND-POSITION" "%FIND-POSITION-VECTOR-MACRO" "%FIND-POSITION-IF" "%FIND-POSITION-IF-VECTOR-MACRO" "%FIND-POSITION-IF-NOT" "%FIND-POSITION-IF-NOT-VECTOR-MACRO" - "%FUN-DOC" - "%FUN-FUN" - "%FUN-NAME" "%HYPOT" "%LDB" "%LOG" "%LOGB" "%LOG10" + "%LAST0" + "%LAST1" + "%LASTN/FIXNUM" + "%LASTN/BIGNUM" "%LOG1P" #!+long-float "%LONG-FLOAT" "%MAKE-COMPLEX" "%MAKE-FUNCALLABLE-INSTANCE" + "%MAKE-FUNCALLABLE-STRUCTURE-INSTANCE-ALLOCATOR" "%MAKE-RATIO" "%MAKE-LISP-OBJ" + "%MAKE-INSTANCE" + #!+sb-simd-pack "%MAKE-SIMD-PACK" + "%MAKE-STRUCTURE-INSTANCE" + "%MAKE-STRUCTURE-INSTANCE-ALLOCATOR" "%MAP" "%MAP-TO-SIMPLE-VECTOR-ARITY-1" "%MAP-TO-LIST-ARITY-1" "%MAP-TO-NIL-ON-SEQUENCE" "%MAP-TO-NIL-ON-SIMPLE-VECTOR" "%MAP-TO-NIL-ON-VECTOR" "%MASK-FIELD" "%MEMBER" + "%MEMBER-EQ" + "%MEMBER-IF" + "%MEMBER-IF-KEY" + "%MEMBER-IF-NOT" + "%MEMBER-IF-NOT-KEY" "%MEMBER-KEY" + "%MEMBER-KEY-EQ" "%MEMBER-KEY-TEST" "%MEMBER-KEY-TEST-NOT" "%MEMBER-TEST" "%MEMBER-TEST-NOT" - "%NEGATE" "%POW" "%PUTHASH" + "%MULTIPLY-HIGH" + "%NEGATE" "%POW" + "%OTHER-POINTER-WIDETAG" + "%PUTHASH" + "%RASSOC" + "%RASSOC-EQ" + "%RASSOC-IF" + "%RASSOC-IF-KEY" + "%RASSOC-IF-NOT" + "%RASSOC-IF-NOT-KEY" + "%RASSOC-KEY" + "%RASSOC-KEY-EQ" + "%RASSOC-KEY-TEST" + "%RASSOC-KEY-TEST-NOT" + "%RASSOC-TEST" + "%RASSOC-TEST-NOT" "%RAW-BITS" "%RAW-BITS-WITH-OFFSET" "%VECTOR-RAW-BITS" "%RAW-REF-COMPLEX-DOUBLE" "%RAW-REF-COMPLEX-LONG" "%RAW-REF-COMPLEX-SINGLE" "%RAW-REF-DOUBLE" @@ -1208,6 +1435,8 @@ is a good idea, but see SB-SYS re. blurring of boundaries." "%RAW-SET-COMPLEX-DOUBLE" "%RAW-SET-COMPLEX-LONG" "%RAW-SET-COMPLEX-SINGLE" "%RAW-SET-DOUBLE" "%RAW-SET-LONG" "%RAW-SET-SINGLE" "%SCALB" "%SCALBN" + #!+(or x86 x86-64 ppc) + "%RAW-INSTANCE-ATOMIC-INCF/WORD" "%RAW-INSTANCE-REF/WORD" "%RAW-INSTANCE-SET/WORD" "%RAW-INSTANCE-REF/SINGLE" "%RAW-INSTANCE-SET/SINGLE" "%RAW-INSTANCE-REF/DOUBLE" "%RAW-INSTANCE-SET/DOUBLE" @@ -1220,7 +1449,7 @@ is a good idea, but see SB-SYS re. blurring of boundaries." "%SET-VECTOR-RAW-BITS" "%SET-SAP-REF-16" "%SET-SAP-REF-32" "%SET-SAP-REF-64" "%SET-SAP-REF-WORD" "%SET-SAP-REF-8" "%SET-SAP-REF-DOUBLE" - "%SET-SAP-REF-LONG" "%SET-SAP-REF-SAP" + "%SET-SAP-REF-LISPOBJ" "%SET-SAP-REF-LONG" "%SET-SAP-REF-SAP" "%SET-SAP-REF-SINGLE" "%SET-SIGNED-SAP-REF-16" "%SET-SIGNED-SAP-REF-32" "%SET-SIGNED-SAP-REF-64" "%SET-SIGNED-SAP-REF-WORD" @@ -1228,13 +1457,23 @@ is a good idea, but see SB-SYS re. blurring of boundaries." "%SET-SYMBOL-HASH" "%SIN" "%SIN-QUICK" "%SINGLE-FLOAT" "%SINH" "%SQRT" "%SXHASH-SIMPLE-STRING" + #!+sb-simd-pack "%SIMD-PACK-TAG" + #!+sb-simd-pack "%SIMD-PACK-LOW" + #!+sb-simd-pack "%SIMD-PACK-HIGH" "%SXHASH-SIMPLE-SUBSTRING" "%TAN" "%TAN-QUICK" "%TANH" - "%UNARY-ROUND" "%UNARY-TRUNCATE" "%UNARY-FTRUNCATE" + "%UNARY-ROUND" + "%UNARY-TRUNCATE" + "%UNARY-TRUNCATE/SINGLE-FLOAT" + "%UNARY-TRUNCATE/DOUBLE-FLOAT" + "%UNARY-FTRUNCATE" "%WITH-ARRAY-DATA" "%WITH-ARRAY-DATA/FP" "%WITH-ARRAY-DATA-MACRO" + "*APPROXIMATE-NUMERIC-UNIONS*" "*CURRENT-LEVEL-IN-PRINT*" - "*EMPTY-TYPE*" "*GC-INHIBIT*" "*GC-PENDING*" + "*EMPTY-TYPE*" + "*EVAL-CALLS*" + "*GC-INHIBIT*" "*GC-PENDING*" #!+sb-thread "*STOP-FOR-GC-PENDING*" "*UNIVERSAL-TYPE*" "*UNIVERSAL-FUN-TYPE*" "*UNPARSE-FUN-TYPE-SIMPLIFY*" @@ -1295,14 +1534,13 @@ is a good idea, but see SB-SYS re. blurring of boundaries." "DEFINE-STRUCTURE-SLOT-ADDRESSOR" "DEFINED-FTYPE-MATCHES-DECLARED-FTYPE-P" "!DEFSTRUCT-WITH-ALTERNATE-METACLASS" "DESCEND-INTO" - "DISPLACED-TO-ARRAY-TOO-SMALL-ERROR" "DIVISION-BY-ZERO-ERROR" "DOUBLE-FLOAT-EXPONENT" "DOUBLE-FLOAT-HIGH-BITS" "DOUBLE-FLOAT-INT-EXPONENT" "DOUBLE-FLOAT-LOW-BITS" "DOUBLE-FLOAT-SIGNIFICAND" "FLOAT-WAIT" "DYNAMIC-SPACE-FREE-POINTER" "DYNAMIC-USAGE" "EFFECTIVE-FIND-POSITION-TEST" "EFFECTIVE-FIND-POSITION-KEY" "ERROR-NUMBER-OR-LOSE" - "EXTENDED-CHAR-P" + "EXTENDED-CHAR-P" "EXTERNAL-FORMAT-DESIGNATOR" "FDEFINITION-OBJECT" "FDOCUMENTATION" "FILENAME" "FIND-AND-INIT-OR-CHECK-LAYOUT" @@ -1319,13 +1557,14 @@ is a good idea, but see SB-SYS re. blurring of boundaries." "FUN-WORD-OFFSET" "GENERALIZED-BOOLEAN" "GET-CLOSURE-LENGTH" "GET-HEADER-DATA" "GET-LISP-OBJ-ADDRESS" "LOWTAG-OF" "WIDETAG-OF" - "GET-MACHINE-VERSION" "HAIRY-DATA-VECTOR-REF" + "HAIRY-DATA-VECTOR-REF" "HAIRY-DATA-VECTOR-REF/CHECK-BOUNDS" "HAIRY-DATA-VECTOR-SET" "HAIRY-DATA-VECTOR-SET/CHECK-BOUNDS""HAIRY-TYPE" "HAIRY-TYPE-CHECK-TEMPLATE-NAME" "HAIRY-TYPE-SPECIFIER" "HANDLE-CIRCULARITY" "HOST" "IGNORE-IT" "ILL-BIN" "ILL-BOUT" "ILL-IN" "ILL-OUT" "INDEX-OR-MINUS-1" "INDEX-TOO-LARGE-ERROR" "*!INITIAL-ASSEMBLER-ROUTINES*" + "*!INITIAL-DEBUG-SOURCES*" "*!INITIAL-FDEFN-OBJECTS*" "*!INITIAL-FOREIGN-SYMBOLS*" "*!INITIAL-LAYOUTS*" "*!INITIAL-SYMBOLS*" "INTEGER-DECODE-DOUBLE-FLOAT" @@ -1334,7 +1573,7 @@ is a good idea, but see SB-SYS re. blurring of boundaries." #!+win32 "HANDLE-WIN32-EXCEPTION" "INTERNAL-TIME" "INTERSECTION-TYPE" "INTERSECTION-TYPE-P" "INTERSECTION-TYPE-TYPES" "INVALID-ARG-COUNT-ERROR" - "INVALID-ARRAY-INDEX-ERROR" "INVALID-UNWIND-ERROR" + "INVALID-UNWIND-ERROR" "IRRATIONAL" "JUST-DUMP-IT-NORMALLY" "KEY-INFO" "KEY-INFO-NAME" "KEY-INFO-P" "KEY-INFO-TYPE" "LAYOUT-DEPTHOID" "LAYOUT-INVALID-ERROR" @@ -1347,12 +1586,16 @@ is a good idea, but see SB-SYS re. blurring of boundaries." "LIST-SUBSEQ*" "ANSI-STREAM" "ANSI-STREAM-BIN" "ANSI-STREAM-BOUT" "ANSI-STREAM-CLOSE" - "ANSI-STREAM-ELEMENT-TYPE" "ANSI-STREAM-IN" + "ANSI-STREAM-ELEMENT-TYPE" + "ANSI-STREAM-FILE-POSITION" + "ANSI-STREAM-IN" "ANSI-STREAM-IN-BUFFER" "ANSI-STREAM-IN-INDEX" "ANSI-STREAM-INPUT-STREAM-P" "ANSI-STREAM-MISC" "ANSI-STREAM-N-BIN" "ANSI-STREAM-OPEN-STREAM-P" "ANSI-STREAM-OUT" "ANSI-STREAM-SOUT" - "ANSI-STREAM-OUTPUT-STREAM-P" "LIST-TO-VECTOR*" + "ANSI-STREAM-OUTPUT-STREAM-P" + "COMPLEX-VECTOR" + "LIST-TO-VECTOR*" "LOGICAL-HOST" "LOGICAL-HOST-DESIGNATOR" #!+long-float "LONG-FLOAT-EXPONENT" #!+long-float "LONG-FLOAT-EXP-BITS" @@ -1368,13 +1611,18 @@ is a good idea, but see SB-SYS re. blurring of boundaries." "MAKE-MEMBER-TYPE" "MAKE-NAMED-TYPE" "MAKE-NULL-LEXENV" "MAKE-NUMERIC-TYPE" "MAKE-SINGLE-FLOAT" "MAKE-SPECIALIZABLE-ARRAY" - "MAKE-UNPORTABLE-FLOAT" "%MAKE-INSTANCE" + "MAKE-UNPORTABLE-FLOAT" "MAKE-SHORT-VALUES-TYPE" "MAKE-SINGLE-VALUE-TYPE" "MAKE-VALUE-CELL" "MAKE-VALUES-TYPE" "MAPC-MEMBER-TYPE-MEMBERS" "MAPCAR-MEMBER-TYPE-MEMBERS" "MEMBER-TYPE" "MEMBER-TYPE-MEMBERS" "MEMBER-TYPE-P" "MEMBER-TYPE-SIZE" "MERGE-BITS" - "MODIFIED-NUMERIC-TYPE" "MUTATOR-SELF" "NAMED-TYPE" + "MODIFIED-NUMERIC-TYPE" + "MOST-NEGATIVE-EXACTLY-DOUBLE-FLOAT-FIXNUM" + "MOST-NEGATIVE-EXACTLY-SINGLE-FLOAT-FIXNUM" + "MOST-POSITIVE-EXACTLY-DOUBLE-FLOAT-FIXNUM" + "MOST-POSITIVE-EXACTLY-SINGLE-FLOAT-FIXNUM" + "MUTATOR-SELF" "NAMED-TYPE" "NAMED-TYPE-NAME" "NAMED-TYPE-P" "NATIVE-BYTE-ORDER" "NEGATE" "NEGATION-TYPE" "NEGATION-TYPE-TYPE" "NEVER-SUBTYPEP" "NIL-ARRAY-ACCESSED-ERROR" @@ -1411,6 +1659,8 @@ is a good idea, but see SB-SYS re. blurring of boundaries." "OBJECT-NOT-SIMPLE-ARRAY-COMPLEX-DOUBLE-FLOAT-ERROR" #!+long-float "OBJECT-NOT-SIMPLE-ARRAY-COMPLEX-LONG-FLOAT-ERROR" + #!+sb-simd-pack + "OBJECT-NOT-SIMD-PACK-ERROR" "OBJECT-NOT-SIMPLE-ARRAY-COMPLEX-SINGLE-FLOAT-ERROR" "OBJECT-NOT-SIMPLE-ARRAY-DOUBLE-FLOAT-ERROR" "OBJECT-NOT-SIMPLE-ARRAY-ERROR" @@ -1433,22 +1683,18 @@ is a good idea, but see SB-SYS re. blurring of boundaries." ;; 32-bit and 64-bit ports. Other bits connected to the ;; same issue are noted throughout the code below with ;; the tag "32/64-bit issues". --njf, 2004-08-09 - "OBJECT-NOT-SIMPLE-ARRAY-UNSIGNED-BYTE-29-ERROR" + "OBJECT-NOT-SIMPLE-ARRAY-UNSIGNED-FIXNUM-ERROR" "OBJECT-NOT-SIMPLE-ARRAY-UNSIGNED-BYTE-31-ERROR" "OBJECT-NOT-SIMPLE-ARRAY-UNSIGNED-BYTE-32-ERROR" "OBJECT-NOT-SIMPLE-ARRAY-UNSIGNED-BYTE-4-ERROR" ;; FIXME: 32/64-bit issues - "OBJECT-NOT-SIMPLE-ARRAY-UNSIGNED-BYTE-60-ERROR" "OBJECT-NOT-SIMPLE-ARRAY-UNSIGNED-BYTE-63-ERROR" "OBJECT-NOT-SIMPLE-ARRAY-UNSIGNED-BYTE-64-ERROR" "OBJECT-NOT-SIMPLE-ARRAY-UNSIGNED-BYTE-7-ERROR" "OBJECT-NOT-SIMPLE-ARRAY-UNSIGNED-BYTE-8-ERROR" "OBJECT-NOT-SIMPLE-ARRAY-SIGNED-BYTE-16-ERROR" - ;; FIXME: 32/64-bit issues - "OBJECT-NOT-SIMPLE-ARRAY-SIGNED-BYTE-30-ERROR" + "OBJECT-NOT-SIMPLE-ARRAY-FIXNUM-ERROR" "OBJECT-NOT-SIMPLE-ARRAY-SIGNED-BYTE-32-ERROR" - ;; FIXME: 32/64-bit issues - "OBJECT-NOT-SIMPLE-ARRAY-SIGNED-BYTE-61-ERROR" "OBJECT-NOT-SIMPLE-ARRAY-SIGNED-BYTE-64-ERROR" "OBJECT-NOT-SIMPLE-ARRAY-SIGNED-BYTE-8-ERROR" "OBJECT-NOT-SIMPLE-BIT-VECTOR-ERROR" @@ -1471,8 +1717,10 @@ is a good idea, but see SB-SYS re. blurring of boundaries." "PACKAGE-INTERNAL-SYMBOLS" "PACKAGE-EXTERNAL-SYMBOLS" "PARSE-DEFMACRO" "PARSE-UNKNOWN-TYPE" "PARSE-UNKNOWN-TYPE-SPECIFIER" "PATHNAME-DESIGNATOR" + "POINTER-HASH" #!+(or x86 x86-64) "*PSEUDO-ATOMIC-BITS*" "PUNT-PRINT-IF-TOO-LONG" + "RANDOM-DOCUMENTATION" "RAW-INSTANCE-SLOTS-EQUALP" "READER-IMPOSSIBLE-NUMBER-ERROR" "READER-EOF-ERROR" @@ -1498,22 +1746,17 @@ is a good idea, but see SB-SYS re. blurring of boundaries." "SIMPLE-ARRAY-UNSIGNED-BYTE-15-P" "SIMPLE-ARRAY-UNSIGNED-BYTE-16-P" "SIMPLE-ARRAY-UNSIGNED-BYTE-2-P" - ;; FIXME: 32/64-bit issues - "SIMPLE-ARRAY-UNSIGNED-BYTE-29-P" + "SIMPLE-ARRAY-UNSIGNED-FIXNUM-P" "SIMPLE-ARRAY-UNSIGNED-BYTE-31-P" "SIMPLE-ARRAY-UNSIGNED-BYTE-32-P" "SIMPLE-ARRAY-UNSIGNED-BYTE-4-P" - ;; FIXME: 32/64-bit issues - "SIMPLE-ARRAY-UNSIGNED-BYTE-60-P" "SIMPLE-ARRAY-UNSIGNED-BYTE-63-P" "SIMPLE-ARRAY-UNSIGNED-BYTE-64-P" "SIMPLE-ARRAY-UNSIGNED-BYTE-7-P" "SIMPLE-ARRAY-UNSIGNED-BYTE-8-P" "SIMPLE-ARRAY-SIGNED-BYTE-16-P" - "SIMPLE-ARRAY-SIGNED-BYTE-30-P" + "SIMPLE-ARRAY-FIXNUM-P" "SIMPLE-ARRAY-SIGNED-BYTE-32-P" - ;; FIXME: 32/64-bit issues - "SIMPLE-ARRAY-SIGNED-BYTE-61-P" "SIMPLE-ARRAY-SIGNED-BYTE-64-P" "SIMPLE-ARRAY-SIGNED-BYTE-8-P" "SIMPLE-BASE-STRING-P" #!+sb-unicode "SIMPLE-CHARACTER-STRING-P" @@ -1522,21 +1765,29 @@ is a good idea, but see SB-SYS re. blurring of boundaries." "SINGLE-FLOAT-INT-EXPONENT" "SINGLE-FLOAT-SIGNIFICAND" "SINGLE-VALUE-TYPE" "SINGLE-VALUE-SPECIFIER-TYPE" "SPECIALIZABLE" "SPECIALIZABLE-VECTOR" "SPECIFIER-TYPE" + #!+sb-simd-pack "SIMD-PACK-SINGLE" + #!+sb-simd-pack "SIMD-PACK-DOUBLE" + #!+sb-simd-pack "SIMD-PACK-INT" + #!+sb-simd-pack "SIMD-PACK-TYPE" + #!+sb-simd-pack "SIMD-PACK-TYPE-ELEMENT-TYPE" + #!+sb-simd-pack "*SIMD-PACK-ELEMENT-TYPES*" "STACK-REF" "STREAM-DESIGNATOR" "STRING-DESIGNATOR" "STRING-FILL*" - "STRING-SUBSEQ*" "STRUCTURE-RAW-SLOT-TYPE-AND-SIZE" "SUB-GC" "SYMBOLS-DESIGNATOR" "%INSTANCE-LENGTH" "%INSTANCE-REF" "%INSTANCE-SET" "SYSTEM-AREA-CLEAR" + "TLS-EXHAUSTED-ERROR" "TWO-ARG-*" "TWO-ARG-+" "TWO-ARG--" "TWO-ARG-/" "TWO-ARG-/=" "TWO-ARG-<" "TWO-ARG-<=" "TWO-ARG-=" "TWO-ARG->" "TWO-ARG->=" "TWO-ARG-AND" "TWO-ARG-EQV" "TWO-ARG-GCD" "TWO-ARG-IOR" "TWO-ARG-LCM" "TWO-ARG-XOR" + "TYPE-*-TO-T" "TYPE-DIFFERENCE" "TYPE-EXPAND" "TYPE-INTERSECTION" "TYPE-INTERSECTION2" "TYPE-APPROX-INTERSECTION2" + "TYPE-SINGLETON-P" "TYPE-SINGLE-VALUE-P" "TYPE-SPECIFIER" "TYPE-UNION" "TYPE/=" "TYPE=" "TYPES-EQUAL-OR-INTERSECT" "UNBOUND-SYMBOL-ERROR" "UNBOXED-ARRAY" @@ -1549,18 +1800,35 @@ is a good idea, but see SB-SYS re. blurring of boundaries." "UPDATE-OBJECT-LAYOUT-OR-INVALID" "VALUE-CELL-REF" "VALUE-CELL-SET" "VALUES-SPECIFIER-TYPE" "VALUES-SPECIFIER-TYPE-CACHE-CLEAR" "VALUES-SUBTYPEP" - "VALUES-TYPE" "VALUES-TYPE-ERROR" "VALUES-TYPE-IN" - "VALUES-TYPE-INTERSECTION" "VALUES-TYPE-OPTIONAL" + "VALUES-TYPE" "VALUES-TYPE-IN" + "VALUES-TYPE-INTERSECTION" + "VALUES-TYPE-MIN-VALUE-COUNT" "VALUES-TYPE-MAX-VALUE-COUNT" + "VALUES-TYPE-MAY-BE-SINGLE-VALUE-P" "VALUES-TYPE-OPTIONAL" "VALUES-TYPE-OUT" "VALUES-TYPE-P" "VALUES-TYPE-REQUIRED" "VALUES-TYPE-REST" "VALUES-TYPE-UNION" "VALUES-TYPE-TYPES" "VALUES-TYPES" - "VALUES-TYPES-EQUAL-OR-INTERSECT" "VECTOR-T-P" + "VALUES-TYPES-EQUAL-OR-INTERSECT" + + "*VECTOR-WITHOUT-COMPLEX-TYPECODE-INFOS*" + "VECTOR-SINGLE-FLOAT-P" "VECTOR-DOUBLE-FLOAT-P" + "VECTOR-UNSIGNED-BYTE-2-P" "VECTOR-UNSIGNED-BYTE-4-P" + "VECTOR-UNSIGNED-BYTE-7-P" "VECTOR-UNSIGNED-BYTE-8-P" + "VECTOR-UNSIGNED-BYTE-15-P" "VECTOR-UNSIGNED-BYTE-16-P" + "VECTOR-UNSIGNED-FIXNUM-P" "VECTOR-UNSIGNED-BYTE-31-P" + "VECTOR-UNSIGNED-BYTE-32-P" + "VECTOR-UNSIGNED-BYTE-63-P" "VECTOR-UNSIGNED-BYTE-64-P" + "VECTOR-SIGNED-BYTE-8-P" "VECTOR-SIGNED-BYTE-16-P" + "VECTOR-FIXNUM-P" "VECTOR-SIGNED-BYTE-32-P" + "VECTOR-SIGNED-BYTE-64-P" "VECTOR-COMPLEX-SINGLE-FLOAT-P" + "VECTOR-COMPLEX-DOUBLE-FLOAT-P" "VECTOR-T-P" + "VECTOR-NIL-P" "VECTOR-FILL*" "VECTOR-SUBSEQ*" "VECTOR-TO-VECTOR*" "VECTOR-OF-CHECKED-LENGTH-GIVEN-LENGTH" "WITH-ARRAY-DATA" "WITH-CIRCULARITY-DETECTION" "WRONG-NUMBER-OF-INDICES-ERROR" + "WITH-WORLD-LOCK" ;; bit bash fillers (FIXME: 32/64-bit issues) "UB1-BASH-FILL" "SYSTEM-AREA-UB1-FILL" @@ -1587,18 +1855,50 @@ is a good idea, but see SB-SYS re. blurring of boundaries." "UB64-BASH-COPY" "SYSTEM-AREA-UB64-COPY" "COPY-UB64-TO-SYSTEM-AREA" "COPY-UB64-FROM-SYSTEM-AREA" + ;; Bit bashing position for bit-vectors + "%BIT-POSITION" + "%BIT-POSITION/0" + "%BIT-POSITION/1" + + ;; SIMPLE-FUN type and accessors + "SIMPLE-FUN" + "SIMPLE-FUN-P" + "%SIMPLE-FUN-ARGLIST" + "%SIMPLE-FUN-DOC" + "%SIMPLE-FUN-INFO" + "%SIMPLE-FUN-NAME" + "%SIMPLE-FUN-NEXT" + "%SIMPLE-FUN-SELF" + "%SIMPLE-FUN-TYPE" + "%SIMPLE-FUN-XREFS" + + ;; CLOSURE type and accessors + "CLOSURE" + "CLOSUREP" + "DO-CLOSURE-VALUES" + "%CLOSURE-FUN" + "%CLOSURE-INDEX-REF" + "%CLOSURE-VALUES" + + ;; Abstract function accessors + "%FUN-DOC" + "%FUN-FUN" + "%FUN-LAMBDA-LIST" + "%FUN-NAME" + "FDEFN" "MAKE-FDEFN" "FDEFN-P" "FDEFN-NAME" "FDEFN-FUN" "FDEFN-MAKUNBOUND" "OUTER-FDEFN" "%COERCE-CALLABLE-TO-FUN" "FUN-SUBTYPE" "*MAXIMUM-ERROR-DEPTH*" "%SET-SYMBOL-PLIST" "INFINITE-ERROR-PROTECT" + "FIND-CALLER-OF-NAMED-FRAME" "FIND-CALLER-NAME-AND-FRAME" "FIND-INTERRUPTED-NAME-AND-FRAME" - "%SET-SYMBOL-VALUE" "%SET-SYMBOL-PACKAGE" + "%SET-SYMBOL-VALUE" "%SET-SYMBOL-GLOBAL-VALUE" "%SET-SYMBOL-PACKAGE" "OUTPUT-SYMBOL-NAME" "%COERCE-NAME-TO-FUN" "INVOKE-MACROEXPAND-HOOK" "DEFAULT-STRUCTURE-PRINT" "LAYOUT" "LAYOUT-LENGTH" "LAYOUT-PURE" "DSD-RAW-TYPE" - "DEFSTRUCT-DESCRIPTION" "UNDEFINE-STRUCTURE" "DD-COPIER" + "DEFSTRUCT-DESCRIPTION" "UNDECLARE-STRUCTURE" "DD-COPIER" "UNDEFINE-FUN-NAME" "DD-TYPE" "CLASSOID-STATE" "INSTANCE" "*TYPE-SYSTEM-INITIALIZED*" "FIND-LAYOUT" "DSD-NAME" "%TYPEP" "DD-RAW-INDEX" "DD-NAME" "CLASSOID-SUBCLASSES" @@ -1606,38 +1906,43 @@ is a good idea, but see SB-SYS re. blurring of boundaries." "DD-RAW-LENGTH" "NOTE-NAME-DEFINED" "%CODE-CODE-SIZE" "DD-SLOTS" "DD-INCLUDE" "SLOT-SETTER-LAMBDA-FORM" "%IMAGPART" "DSD-ACCESSOR-NAME" "%CODE-DEBUG-INFO" - "LAYOUT-CLASSOID" "LAYOUT-INVALID" "%SIMPLE-FUN-NAME" + "LAYOUT-CLASSOID" "LAYOUT-INVALID" "DSD-TYPE" "%INSTANCEP" "DEFSTRUCT-SLOT-DESCRIPTION" - "%SIMPLE-FUN-ARGLIST" "%SIMPLE-FUN-NEXT" "DD-PREDICATE-NAME" "CLASSOID-PROPER-NAME" "%NOTE-TYPE-DEFINED" "LAYOUT-INFO" "%SET-INSTANCE-LAYOUT" "DD-DEFAULT-CONSTRUCTOR" - "LAYOUT-OF" "%SIMPLE-FUN-SELF" "%REALPART" + "LAYOUT-OF" "%REALPART" "STRUCTURE-CLASSOID-P" "DSD-INDEX" "STRUCTURE-CLASSOID" - "%INSTANCE-LAYOUT" "LAYOUT-CLOS-HASH" "%SIMPLE-FUN-TYPE" + "%INSTANCE-LAYOUT" "LAYOUT-CLOS-HASH" "PROCLAIM-AS-FUN-NAME" "BECOME-DEFINED-FUN-NAME" "%NUMERATOR" "CLASSOID-TYPEP" "DSD-READ-ONLY" "DSD-DEFAULT" "LAYOUT-INHERITS" "DD-LENGTH" - "%CODE-ENTRY-POINTS" "%DENOMINATOR" "%SIMPLE-FUN-XREFS" + "%CODE-ENTRY-POINTS" "%DENOMINATOR" "%OTHER-POINTER-P" "STANDARD-CLASSOID" "CLASSOID-OF" - "MAKE-STANDARD-CLASSOID" "CLASSOID-CELL-TYPEP" + "MAKE-STANDARD-CLASSOID" + "CLASSOID-CELL-CLASSOID" + "CLASSOID-CELL-NAME" + "CLASSOID-CELL-PCL-CLASS" + "CLASSOID-CELL-TYPEP" + "%CLEAR-CLASSOID" "FIND-CLASSOID-CELL" "EXTRACT-FUN-TYPE" "%RANDOM-DOUBLE-FLOAT" #!+long-float "%RANDOM-LONG-FLOAT" "%RANDOM-SINGLE-FLOAT" "STATIC-CLASSOID" "%FUNCALLABLE-INSTANCE-INFO" "RANDOM-CHUNK" "BIG-RANDOM-CHUNK" - "LAYOUT-CLOS-HASH-LIMIT" "CLASSOID-CELL-NAME" + "N-RANDOM-CHUNK-BITS" + "LAYOUT-CLOS-HASH-LIMIT" "BUILT-IN-CLASSOID-DIRECT-SUPERCLASSES" "BUILT-IN-CLASSOID-TRANSLATION" "RANDOM-LAYOUT-CLOS-HASH" "CLASSOID-PCL-CLASS" "FUNCALLABLE-STRUCTURE" "FUNCALLABLE-INSTANCE-FUN" "%FUNCALLABLE-INSTANCE-LAYOUT" "%SET-FUNCALLABLE-INSTANCE-LAYOUT" - "BASIC-STRUCTURE-CLASSOID" "CLASSOID-CELL-CLASSOID" + "BASIC-STRUCTURE-CLASSOID" "REGISTER-LAYOUT" - "FUNCALLABLE-INSTANCE" "RANDOM-FIXNUM-MAX" - "MAKE-STATIC-CLASSOID" "INSTANCE-LAMBDA" + "FUNCALLABLE-INSTANCE" + "MAKE-STATIC-CLASSOID" "%MAKE-SYMBOL" "%FUNCALLABLE-INSTANCE-FUNCTION" "SYMBOL-HASH" @@ -1657,6 +1962,8 @@ is a good idea, but see SB-SYS re. blurring of boundaries." "NAMESTRING-PARSE-ERROR" "NAMESTRING-PARSE-ERROR-OFFSET" "DESCRIBE-CONDITION" "MAKE-RESTART" "COERCE-TO-CONDITION" + "ALLOCATE-CONDITION" + "CONDITION-READER-FUNCTION" "CONDITION-WRITER-FUNCTION" @@ -1668,14 +1975,41 @@ is a good idea, but see SB-SYS re. blurring of boundaries." "CONDITION-SLOT-NAME" "CONDITION-SLOT-READERS" "CONDITION-SLOT-WRITERS" + "REDEFINITION-WARNING" + "REDEFINITION-WITH-DEFUN" + "REDEFINITION-WITH-DEFMACRO" + "REDEFINITION-WITH-DEFGENERIC" + "REDEFINITION-WITH-DEFMETHOD" + "REDEFINITION-REPLACES-GENERIC-FUNCTION-P" + "REDEFINITION-REPLACES-COMPILED-FUNCTION-WITH-INTERPRETED-P" + "UNINTERESTING-ORDINARY-FUNCTION-REDEFINITION-P" + "UNINTERESTING-GENERIC-FUNCTION-REDEFINITION-P" + "UNINTERESTING-METHOD-REDEFINITION-P" + "UNINTERESTING-REDEFINITION" + "REDEFINITION-WITH-DEFTRANSFORM" + + "DUBIOUS-ASTERISKS-AROUND-VARIABLE-NAME" + "ASTERISKS-AROUND-LEXICAL-VARIABLE-NAME" + "ASTERISKS-AROUND-CONSTANT-VARIABLE-NAME" + "UNDEFINED-ALIEN-STYLE-WARNING" + #!+sb-eval + "LEXICAL-ENVIRONMENT-TOO-COMPLEX" + "CHARACTER-DECODING-ERROR-IN-COMMENT" + "DEPRECATED-EVAL-WHEN-SITUATIONS" + "PROCLAMATION-MISMATCH" + "TYPE-PROCLAMATION-MISMATCH" + "FTYPE-PROCLAMATION-MISMATCH" + "!COLD-INIT" "!UNINTERN-INIT-ONLY-STUFF" "!GLOBALDB-COLD-INIT" "!FDEFN-COLD-INIT" "!FOREIGN-COLD-INIT" "!FUNCTION-NAMES-COLD-INIT" "!TYPE-CLASS-COLD-INIT" "!TYPEDEFS-COLD-INIT" "!ALIEN-TYPE-COLD-INIT" "!CLASSES-COLD-INIT" + "!DEADLINE-COLD-INIT" "!EARLY-TYPE-COLD-INIT" "!LATE-TYPE-COLD-INIT" "!FIXUP-TYPE-COLD-INIT" "!TARGET-TYPE-COLD-INIT" "!RANDOM-COLD-INIT" "!READER-COLD-INIT" + "!PATHNAME-COLD-INIT" "!DEBUG-INFO-COLD-INIT" "!TYPECHECKFUNS-COLD-INIT" "!LOADER-COLD-INIT" "!EXHAUST-COLD-INIT" "!PACKAGE-COLD-INIT" "!POLICY-COLD-INIT-OR-RESANIFY" @@ -1683,6 +2017,7 @@ is a good idea, but see SB-SYS re. blurring of boundaries." "!SHARPM-COLD-INIT" "!EARLY-PROCLAIM-COLD-INIT" "!LATE-PROCLAIM-COLD-INIT" "!CLASS-FINALIZE" "!CONSTANTP-COLD-INIT" + "!WORLD-LOCK-COLD-INIT" "FLOAT-COLD-INIT-OR-REINIT" "GC-REINIT" @@ -1715,26 +2050,63 @@ is a good idea, but see SB-SYS re. blurring of boundaries." "%SET-ROW-MAJOR-AREF" "%SET-FILL-POINTER" "%SET-FDEFINITION" "%SCHARSET" "%SBITSET" "%RPLACD" "%RPLACA" "%PUT" "%CHARSET" "%BITSET" - "%ASET" "%ARRAY-TYPEP" - "%SET-SAP-REF-DESCRIPTOR")) + "%ASET" "%ARRAY-TYPEP")) #s(sb-cold:package-data :name "SB!THREAD" :use ("CL" "SB!ALIEN" "SB!INT" "SB!SYS" "SB!KERNEL") :doc "public (but low-level): native thread support" - :export ("*CURRENT-THREAD*" "THREAD" "MAKE-THREAD" - "THREAD-NAME" "THREAD-ALIVE-P" - "LIST-ALL-THREADS" - "JOIN-THREAD" "JOIN-THREAD-ERROR" "JOIN-THREAD-ERROR-THREAD" + :export ("*CURRENT-THREAD*" + "DESTROY-THREAD" + "INTERRUPT-THREAD" "INTERRUPT-THREAD-ERROR" "INTERRUPT-THREAD-ERROR-THREAD" - "INTERRUPT-THREAD" "TERMINATE-THREAD" "DESTROY-THREAD" + "RETURN-FROM-THREAD" + "ABORT-THREAD" + "MAIN-THREAD-P" + "MAIN-THREAD" + "JOIN-THREAD" + "JOIN-THREAD-ERROR" + "JOIN-THREAD-ERROR-THREAD" + "LIST-ALL-THREADS" + "MAKE-THREAD" + "SYMBOL-VALUE-IN-THREAD" + "SYMBOL-VALUE-IN-THREAD-ERROR" + "TERMINATE-THREAD" + "THREAD" + "THREAD-DEADLOCK" + "THREAD-DEADLOCK-CYCLE" + "THREAD-ERROR" + "THREAD-ERROR-THREAD" + "THREAD-ALIVE-P" + "THREAD-EMPHEMERAL-P" + "THREAD-NAME" "THREAD-YIELD" - "MUTEX" "MAKE-MUTEX" "MUTEX-NAME" "MUTEX-VALUE" - "GET-MUTEX" "RELEASE-MUTEX" "WITH-MUTEX" + "FOREIGN-THREAD" + #!+(and sb-safepoint-strictly (not win32)) + "SIGNAL-HANDLING-THREAD" + ;; Memory barrier + "BARRIER" + ;; Mutexes + "GET-MUTEX" + "GRAB-MUTEX" + "HOLDING-MUTEX-P" + "MAKE-MUTEX" + "MUTEX" + "MUTEX-NAME" + "MUTEX-OWNER" + "MUTEX-VALUE" + "RELEASE-MUTEX" + "WITH-MUTEX" "WITH-RECURSIVE-LOCK" - "WAITQUEUE" "MAKE-WAITQUEUE" "WAITQUEUE-NAME" - "CONDITION-WAIT" "CONDITION-NOTIFY" "CONDITION-BROADCAST" + ;; Condition variables + "CONDITION-BROADCAST" + "CONDITION-NOTIFY" + "CONDITION-WAIT" + "MAKE-WAITQUEUE" + "WAITQUEUE" + "WAITQUEUE-NAME" + ;; Sessions "MAKE-LISTENER-THREAD" "RELEASE-FOREGROUND" "WITH-NEW-SESSION" @@ -1744,7 +2116,13 @@ is a good idea, but see SB-SYS re. blurring of boundaries." "SEMAPHORE-NAME" "SEMAPHORE-COUNT" "SIGNAL-SEMAPHORE" - "WAIT-ON-SEMAPHORE")) + "TRY-SEMAPHORE" + "WAIT-ON-SEMAPHORE" + ;; Semaphore notification objects + "CLEAR-SEMAPHORE-NOTIFICATION" + "MAKE-SEMAPHORE-NOTIFICATION" + "SEMAPHORE-NOTIFICATION" + "SEMAPHORE-NOTIFICATION-STATUS")) #s(sb-cold:package-data :name "SB!LOOP" @@ -1865,7 +2243,8 @@ package is deprecated in favour of SB-MOP." ;; experimental SBCL-only (for now) symbols :export ("MAKE-METHOD-SPECIALIZERS-FORM" "PARSE-SPECIALIZER-USING-CLASS" - "UNPARSE-SPECIALIZER-USING-CLASS") + "UNPARSE-SPECIALIZER-USING-CLASS" + "+SLOT-UNBOUND+") ;; FIXME: After a little while, these reexports can probably go ;; away, as they're superseded by the use of SB-MOP as the ;; publically-accessible package. @@ -1990,7 +2369,7 @@ be submitted as a CDR" "CANONIZE-TEST" "CANONIZE-KEY" - "LENGTH" "ELT" + "EMPTYP" "LENGTH" "ELT" "MAKE-SEQUENCE-LIKE" "ADJUST-SEQUENCE" "COUNT" "COUNT-IF" "COUNT-IF-NOT" @@ -2016,47 +2395,47 @@ and even SB-VM seem to have become somewhat blurred over the years. Some anomalies (e.g. FIND-IF-IN-CLOSURE being in SB-SYS instead of SB-KERNEL) have been undone, but probably more remain." :use ("CL" "SB!EXT" "SB!INT") - :export ("%ASSEMBLER-CODE-TYPE" - "%BIND-ALIGNED-SAP" - ;; FIXME: %PRIMITIVE shouldn't be here. (I now know that %SYS + :export (;; FIXME: %PRIMITIVE shouldn't be here. (I now know that %SYS ;; is for OS-dependent stuff. %PRIMITIVE should probably be in ;; SB!KERNEL.) "%PRIMITIVE" "%STANDARD-CHAR-P" + "*EXIT-ERROR-HANDLER*" + "*EXIT-IN-PROCESS*" "*ALLOW-WITH-INTERRUPTS*" - "*FOREIGN-LOCK*" "*INTERRUPTS-ENABLED*" "*INTERRUPT-PENDING*" + #!+sb-thruption "*THRUPTION-PENDING*" "*LINKAGE-INFO*" "*LONG-SITE-NAME*" "*SHORT-SITE-NAME*" + "*PERIODIC-POLLING-FUNCTION*" + "*PERIODIC-POLLING-PERIOD*" "*RUNTIME-DLHANDLE*" "*SHARED-OBJECTS*" "*STATIC-FOREIGN-SYMBOLS*" "*STDERR*" "*STDIN*" - "*STDOUT*" "*TASK-DATA*" - "*TASK-NOTIFY*" "*TASK-SELF*" "*TTY*" "*TYPESCRIPTPORT*" + "*STDOUT*" + "*TTY*" "ADD-FD-HANDLER" "ALLOCATE-SYSTEM-MEMORY" "ALLOW-WITH-INTERRUPTS" - "BEEP" "BITS" - "BYTES" + "BEEP" "BREAKPOINT-ERROR" + "CANCEL-DEADLINE" "CLOSE-SHARED-OBJECTS" - "COMPILER-VERSION" "DEADLINE-TIMEOUT" "DEALLOCATE-SYSTEM-MEMORY" "DECODE-TIMEOUT" "DECODE-INTERNAL-TIME" "DEFAULT-INTERRUPT" "DEFER-DEADLINE" - "DEPORT-BOOLEAN" "DEPORT-INTEGER" "DYNAMIC-FOREIGN-SYMBOLS-P" "DLOPEN-OR-LOSE" "FROB-DO-BODY" "ENABLE-INTERRUPT" - "ENUMERATION" "ENSURE-DYNAMIC-FOREIGN-SYMBOL-ADDRESS" "EXTERN-ALIEN-NAME" + "EXIT-CODE" "FD-STREAM" "FD-STREAM-FD" "FD-STREAM-P" "FIND-DYNAMIC-FOREIGN-SYMBOL-ADDRESS" "FIND-FOREIGN-SYMBOL-ADDRESS" @@ -2064,7 +2443,7 @@ SB-KERNEL) have been undone, but probably more remain." "FOREIGN-SYMBOL-SAP" "FOREIGN-SYMBOL-ADDRESS" "FOREIGN-SYMBOL-DATAREF-SAP" - "GET-PAGE-SIZE" "GET-SYSTEM-INFO" + "GET-MACHINE-VERSION" "GET-PAGE-SIZE" "GET-SYSTEM-INFO" "IGNORE-INTERRUPT" "IN-INTERRUPTION" "INTERACTIVE-INTERRUPT" @@ -2076,19 +2455,18 @@ SB-KERNEL) have been undone, but probably more remain." "MACRO" "MAKE-FD-STREAM" "MEMORY-FAULT-ERROR" "MEMMOVE" - "NATURALIZE-BOOLEAN" "NATURALIZE-INTEGER" + "OS-EXIT" "OS-COLD-INIT-OR-REINIT" "OS-CONTEXT-T" "OUTPUT-RAW-BYTES" - "READ-N-BYTES" "REALLOCATE-SYSTEM-MEMORY" "RECORD-SIZE" + "READ-N-BYTES" "REMOVE-FD-HANDLER" "REOPEN-SHARED-OBJECTS" - "RESOLVE-LOADED-ASSEMBLER-REFERENCES" "SAP+" "SAP-" "SAP-FOREIGN-SYMBOL" "SAP-INT" "SAP-REF-16" "SAP-REF-32" "SAP-REF-64" "SAP-REF-WORD" "SAP-REF-8" - "SAP-REF-DESCRIPTOR" - "SAP-REF-DOUBLE" "SAP-REF-LONG" + "SAP-REF-DOUBLE" "SAP-REF-LISPOBJ" "SAP-REF-LONG" + "SAP-REF-OCTETS" "SAP-REF-SAP" "SAP-REF-SINGLE" "SAP<" "SAP<=" "SAP=" "SAP>" "SAP>=" "SCRUB-CONTROL-STACK" "SERVE-ALL-EVENTS" @@ -2099,7 +2477,7 @@ SB-KERNEL) have been undone, but probably more remain." ;; FIXME: STRUCTURE!OBJECT stuff probably belongs in SB!KERNEL. "STRUCTURE!OBJECT" "STRUCTURE!OBJECT-MAKE-LOAD-FORM" "SYSTEM-AREA-POINTER" "SYSTEM-AREA-POINTER-P" - "SYSTEM-CONDITION" "SYSTEM-CONDIION-ADDRESS" + "SYSTEM-CONDITION" "SYSTEM-CONDITION-ADDRESS" "SYSTEM-CONDITION-CONTEXT" "REINIT-INTERNAL-REAL-TIME" "SYSTEM-INTERNAL-RUN-TIME" @@ -2126,11 +2504,17 @@ This package only tries to implement what happens to be needed by the current implementation of SBCL, and makes no guarantees of interface stability." :use ("CL" "SB!ALIEN" "SB!EXT" "SB!INT" "SB!SYS") + :reexport ("OFF-T" + "SIZE-T") :export ( ;; wrappers around Unix stuff to give just what Lisp needs "NANOSLEEP" "UID-USERNAME" "UID-HOMEDIR" + "USER-HOMEDIR" "WITH-RESTARTED-SYSCALL" + "SB-MKSTEMP" + "UNIX-OFFSET" + "FD-TYPE" ;; stuff with a one-to-one mapping to Unix constructs "D-INO" "D-NAME" "D-NAMLEN" "D-OFF" "D-RECLEN" "DEV-T" "DIRECT" @@ -2140,31 +2524,35 @@ no guarantees of interface stability." "INO-T" "UNIX-ACCESS" "UNIX-SETITIMER" "UNIX-GETITIMER" "KBDCGET" "KBDCRESET" "KBDCRST" "KBDCSET" "KBDCSSTD" "KBDGCLICK" "KBDSCLICK" "KBDSGET" - "L_INCR" "L_SET" "L_XTND" "OFF-T" "O_APPEND" "O_CREAT" "O_EXCL" + "L_INCR" "L_SET" "L_XTND" "O_APPEND" "O_CREAT" "O_EXCL" "O_RDONLY" "O_RDWR" "O_TRUNC" "O_WRONLY" "POSIX-GETCWD" "POSIX-GETCWD/" "READGRP" "READOTH" "READOWN" "RLIM-CUR" "RLIM-MAX" "RU-IDRSS" "RU-INBLOCK" "RU-ISRSS" "RU-IXRSS" "RU-MAJFLT" "RU-MAXRSS" "RU-MINFLT" "RU-MSGRCV" "RU-MSGSND" "RU-NIVCSW" "RU-NSIGNALS" "RU-NSWAP" "RU-NVCSW" "RU-OUBLOCK" "RU-STIME" "RU-UTIME" "RUSAGE_CHILDREN" "RUSAGE_SELF" "RUSEAGE" - "R_OK" "S-IEXEC" "S-IFBLK" "S-IFCHR" "S-IFDIR" "S-IFLNK" "S-IFMT" + "R_OK" "S-IEXEC" "S-IFBLK" "S-IFCHR" "S-IFDIR" "S-IFIFO" "S-IFLNK" "S-IFMT" "S-IFREG" "S-IFSOCK" "S-IREAD" "S-ISGID" "S-ISUID" "S-ISVTX" - "S-IWRITE" "SAVETEXT" "SC-MASK" "SC-ONSTACK" "SC-PC" "SETGIDEXEC" + "S-IWRITE" "SAVETEXT" "SB-MKSTEMP" "SC-MASK" "SC-ONSTACK" "SETUIDEXEC" "SG-ERASE" "SG-FLAGS" "SG-ISPEED" "SG-KILL" - "SG-OSPEED" "SGTTYB" "SIZE-T" "ST-ATIME" "ST-BLKSIZE" "ST-BLOCKS" + "SG-OSPEED" "SGTTYB" "ST-ATIME" "ST-BLKSIZE" "ST-BLOCKS" "ST-CTIME" "ST-DEV" "ST-GID" "ST-MODE" "ST-MTIME" "ST-NLINK" "ST-RDEV" "ST-SIZE" "ST-UID" "STAT" "TERMINAL-SPEEDS" "TIME-T" "TIMEVAL" "TIMEZONE" "TIOCFLUSH" "TIOCGETC" "TIOCGETP" "TIOCGLTC" "TIOCGPGRP" "TIOCGWINSZ" "TIOCNOTTY" "TIOCSETC" "TIOCSETP" "TIOCSLTC" "TIOCSPGRP" "TIOCSWINSZ" "TV-SEC" "TV-USEC" - "TZ-DSTTIME" "TZ-MINUTESWEST" "UID-T" "UNIX-CHMOD" "UNIX-CLOSE" - "UNIX-DUP""UNIX-EXIT" "UNIX-FILE-MODE" "UNIX-FSTAT" + "TZ-DSTTIME" "TZ-MINUTESWEST" "UID-T" "UNIX-CLOSE" + "UNIX-CLOSEDIR" "UNIX-DIRENT-NAME" "UNIX-DUP" + "UNIX-FILE-MODE" "UNIX-FSTAT" "UNIX-GETHOSTNAME" "UNIX-GETPID" "UNIX-GETRUSAGE" - "UNIX-GETTIMEOFDAY" "UNIX-GETUID" "UNIX-GID" "UNIX-IOCTL" + "UNIX-GETTIMEOFDAY" "UNIX-GETUID" "UNIX-GID" + "UNIX-EXIT" + "UNIX-IOCTL" "UNIX-ISATTY" "UNIX-LSEEK" "UNIX-LSTAT" "UNIX-MKDIR" - "UNIX-MKSTEMP" "UNIX-OPEN" "UNIX-PATHNAME" "UNIX-PID" - "UNIX-PIPE" "UNIX-READ" "UNIX-READLINK" "UNIX-RENAME" - "UNIX-SELECT" "UNIX-STAT" "UNIX-UID" "UNIX-UNLINK" "UNIX-WRITE" + "UNIX-OPEN" "UNIX-OPENDIR" "UNIX-PATHNAME" "UNIX-PID" + "UNIX-PIPE" "UNIX-SIMPLE-POLL" "UNIX-READ" "UNIX-READDIR" "UNIX-READLINK" "UNIX-REALPATH" + "UNIX-RENAME" "UNIX-SELECT" "UNIX-STAT" "UNIX-UID" + "UNIX-UNLINK" "UNIX-WRITE" "WINSIZE" "WRITEGRP" "WRITEOTH" "WRITEOWN" "WS-COL" "WS-ROW" "WS-XPIXEL" "WS-YPIXEL" "WNOHANG" "WSTOPPED" "WUNTRACED" "W_OK" "X_OK" @@ -2195,7 +2583,7 @@ no guarantees of interface stability." "EUSERS" "EVICEERR" "EVICEOP" "EWOULDBLOCK" "EXDEV" "FD-ISSET" "FD-SET" "LTCHARS" "UNIX-FAST-SELECT" - "UNIX-FILE-KIND" "UNIX-KILL" "CODESET" + "UNIX-KILL" "CODESET" "TCSETPGRP" "FD-ZERO" "FD-CLR" "CHECK" "UNIX-RESOLVE-LINKS" "FD-SETSIZE" "TCGETPGRP" "UNIX-FAST-GETRUSAGE" "UNIX-KILLPG" @@ -2255,12 +2643,19 @@ no guarantees of interface stability." structure representations" :use ("CL" "SB!ALIEN" "SB!ALIEN-INTERNALS" "SB!ASSEM" "SB!C" "SB!EXT" "SB!FASL" "SB!INT" "SB!KERNEL" "SB!SYS" "SB!UNIX") - :export ("*ASSEMBLY-UNIT-LENGTH*" + :reexport ("WORD") + :export ("*ALLOC-SIGNAL*" + "*ASSEMBLY-UNIT-LENGTH*" "*PRIMITIVE-OBJECTS*" + "+HIGHEST-NORMAL-GENERATION+" + "+PSEUDO-STATIC-GENERATION+" + "%COMPILER-BARRIER" "%DATA-DEPENDENCY-BARRIER" + "%MEMORY-BARRIER" "%READ-BARRIER" "%WRITE-BARRIER" "AFTER-BREAKPOINT-TRAP" - "*ALLOC-SIGNAL*" + #!+(and gencgc sparc) "ALLOCATION-TRAP" "ANY-REG-SC-NUMBER" "ARRAY-DATA-SLOT" "ARRAY-DIMENSIONS-OFFSET" "ARRAY-DISPLACED-P-SLOT" "ARRAY-DISPLACEMENT-SLOT" + "ARRAY-DISPLACED-FROM-SLOT" "ARRAY-ELEMENTS-SLOT" "ARRAY-FILL-POINTER-P-SLOT" "ARRAY-FILL-POINTER-SLOT" "ATOMIC-FLAG" "CHARACTER-REG-SC-NUMBER" @@ -2290,7 +2685,15 @@ structure representations" #!+long-float "COMPLEX-LONG-FLOAT-WIDETAG" #!+long-float "COMPLEX-LONG-REG-SC-NUMBER" #!+long-float "COMPLEX-LONG-STACK-SC-NUMBER" + #!+sb-simd-pack "SIMD-PACK-TAG-SLOT" + #!+sb-simd-pack "SIMD-PACK-HI-VALUE-SLOT" + #!+sb-simd-pack "SIMD-PACK-LO-VALUE-SLOT" + #!+sb-simd-pack "SIMD-PACK-SIZE" + #!+sb-simd-pack "SIMD-PACK-WIDETAG" + #!-x86-64 #!-x86-64 "COMPLEX-SINGLE-FLOAT-IMAG-SLOT" "COMPLEX-SINGLE-FLOAT-REAL-SLOT" + #!+x86-64 + "COMPLEX-SINGLE-FLOAT-DATA-SLOT" "COMPLEX-SINGLE-FLOAT-SIZE" "COMPLEX-SINGLE-FLOAT-WIDETAG" "COMPLEX-SINGLE-REG-SC-NUMBER" "COMPLEX-SINGLE-STACK-SC-NUMBER" "COMPLEX-SIZE" "COMPLEX-BASE-STRING-WIDETAG" @@ -2302,6 +2705,7 @@ structure representations" "CONTEXT-FLOATING-POINT-MODES" "CONTEXT-FLOAT-REGISTER" "CONTEXT-PC" "CONTEXT-REGISTER" "CONTROL-STACK-SC-NUMBER" "COUNT-NO-OPS" + #!+sb-safepoint "CSP-SAFEPOINT-TRAP" "*CURRENT-CATCH-BLOCK*" "CURRENT-FLOAT-TRAP" "DEFINE-FOR-EACH-PRIMITIVE-OBJECT" "DESCRIPTOR-REG-SC-NUMBER" "DESCRIPTOR-VS-NON-DESCRIPTOR-STORAGE" @@ -2314,7 +2718,7 @@ structure representations" "DOUBLE-FLOAT-WIDETAG" "DOUBLE-FLOAT-VALUE-SLOT" "DOUBLE-INT-CARG-REG-SC-NUMBER" "DOUBLE-REG-SC-NUMBER" "DOUBLE-STACK-SC-NUMBER" - "ERROR-TRAP" "EVEN-FIXNUM-LOWTAG" + "EMIT-LONG-NOP" "ERROR-TRAP" "EVEN-FIXNUM-LOWTAG" "EXPORTED-STATIC-SYMBOLS" "FDEFN-FUN-SLOT" "FDEFN-NAME-SLOT" "FDEFN-RAW-ADDR-SLOT" "FDEFN-SIZE" "FDEFN-WIDETAG" "FIXNUMIZE" @@ -2342,12 +2746,20 @@ structure representations" "FUN-POINTER-LOWTAG" "SIMPLE-FUN-SELF-SLOT" "SIMPLE-FUN-TYPE-SLOT" - "GENCGC-PAGE-SIZE" - #!+ppc "PSEUDO-ATOMIC-INTERRUPTED-FLAG" - #!+ppc "PSEUDO-ATOMIC-FLAG" + "GENCGC-CARD-BYTES" + "GENCGC-ALLOC-GRANULARITY" + "GENCGC-RELEASE-GRANULARITY" + #!+(or ppc sparc) "PSEUDO-ATOMIC-INTERRUPTED-FLAG" + #!+(or ppc sparc) "PSEUDO-ATOMIC-FLAG" + #!+sb-safepoint "GLOBAL-SAFEPOINT-TRAP" "GENESIS" "HALT-TRAP" "IGNORE-ME-SC-NUMBER" "IMMEDIATE-CHARACTER-SC-NUMBER" "IMMEDIATE-SAP-SC-NUMBER" "IMMEDIATE-SC-NUMBER" + #!+inline-constants "CANONICALIZE-INLINE-CONSTANT" + #!+inline-constants "INLINE-CONSTANT-VALUE" + #!+inline-constants "EMIT-CONSTANT-SEGMENT-HEADER" + #!+inline-constants "SORT-INLINE-CONSTANTS" + #!+inline-constants "EMIT-INLINE-CONSTANT" "INSTANCE-HEADER-WIDETAG" "INSTANCE-POINTER-LOWTAG" "INSTANCE-SLOTS-OFFSET" "INSTANCE-USAGE" "INTERIOR-REG-SC-NUMBER" "INTERNAL-ERROR-ARGS" @@ -2366,10 +2778,10 @@ structure representations" #!+long-float "LONG-STACK-SC-NUMBER" "LOWTAG-LIMIT" "LOWTAG-MASK" "LRA-SAVE-OFFSET" - #!+(and sb-thread sb-lutex) "LUTEX-WIDETAG" "MEMORY-USAGE" "MOST-POSITIVE-COST" "N-LOWTAG-BITS" "N-FIXNUM-TAG-BITS" + "N-FIXNUM-BITS" "N-POSITIVE-FIXNUM-BITS" "NEGATIVE-IMMEDIATE-SC-NUMBER" "NFP-SAVE-OFFSET" @@ -2385,12 +2797,15 @@ structure representations" "OTHER-IMMEDIATE-2-LOWTAG" "OTHER-IMMEDIATE-3-LOWTAG" "OTHER-POINTER-LOWTAG" + "PAD0-LOWTAG" "PAD1-LOWTAG" "PAD2-LOWTAG" + "PAD3-LOWTAG" "PAD4-LOWTAG" "PAD5-LOWTAG" "PAD-DATA-BLOCK" "PENDING-INTERRUPT-TRAP" "PRIMITIVE-OBJECT" "PRIMITIVE-OBJECT-WIDETAG" "PRIMITIVE-OBJECT-LOWTAG" "PRIMITIVE-OBJECT-NAME" "PRIMITIVE-OBJECT-OPTIONS" "PRIMITIVE-OBJECT-P" "PRIMITIVE-OBJECT-SIZE" "PRIMITIVE-OBJECT-SLOTS" - "PRIMITIVE-OBJECT-VARIABLE-LENGTH-P" "PRINT-ALLOCATED-OBJECTS" + "PRIMITIVE-OBJECT-VARIABLE-LENGTH-P" + "PRINT-ALLOCATED-OBJECTS" "RANDOM-IMMEDIATE-SC-NUMBER" "RATIO-DENOMINATOR-SLOT" "RATIO-NUMERATOR-SLOT" "RATIO-SIZE" "RATIO-WIDETAG" "*READ-ONLY-SPACE-FREE-POINTER*" @@ -2400,6 +2815,8 @@ structure representations" "SAETP-N-BITS" "SAETP-TYPECODE" "SAETP-PRIMITIVE-TYPE-NAME" "SAETP-N-PAD-ELEMENTS" "SAETP-SPECIFIER" "SAETP-COMPLEX-TYPECODE" "SAETP-IMPORTANCE" + "SAETP-FIXNUM-P" + "VALID-BIT-BASH-SAETP-P" "*SPECIALIZED-ARRAY-ELEMENT-TYPE-PROPERTIES*" "SANCTIFY-FOR-EXECUTION" "SAP-POINTER-SLOT" "SAP-REG-SC-NUMBER" "SAP-SIZE" @@ -2417,23 +2834,17 @@ structure representations" "SIMPLE-ARRAY-UNSIGNED-BYTE-15-WIDETAG" "SIMPLE-ARRAY-UNSIGNED-BYTE-16-WIDETAG" "SIMPLE-ARRAY-UNSIGNED-BYTE-2-WIDETAG" - ;; FIXME: 32/64-bit issues - "SIMPLE-ARRAY-UNSIGNED-BYTE-29-WIDETAG" + "SIMPLE-ARRAY-UNSIGNED-FIXNUM-WIDETAG" "SIMPLE-ARRAY-UNSIGNED-BYTE-31-WIDETAG" "SIMPLE-ARRAY-UNSIGNED-BYTE-32-WIDETAG" - ;; FIXME: 32/64-bit issues - "SIMPLE-ARRAY-UNSIGNED-BYTE-60-WIDETAG" "SIMPLE-ARRAY-UNSIGNED-BYTE-63-WIDETAG" "SIMPLE-ARRAY-UNSIGNED-BYTE-64-WIDETAG" "SIMPLE-ARRAY-UNSIGNED-BYTE-4-WIDETAG" "SIMPLE-ARRAY-UNSIGNED-BYTE-7-WIDETAG" "SIMPLE-ARRAY-UNSIGNED-BYTE-8-WIDETAG" "SIMPLE-ARRAY-SIGNED-BYTE-16-WIDETAG" - ;; FIXME: 32/64-bit issues - "SIMPLE-ARRAY-SIGNED-BYTE-30-WIDETAG" + "SIMPLE-ARRAY-FIXNUM-WIDETAG" "SIMPLE-ARRAY-SIGNED-BYTE-32-WIDETAG" - ;; FIXME: 32/64-bit issues - "SIMPLE-ARRAY-SIGNED-BYTE-61-WIDETAG" "SIMPLE-ARRAY-SIGNED-BYTE-64-WIDETAG" "SIMPLE-ARRAY-SIGNED-BYTE-8-WIDETAG" "SIMPLE-BIT-VECTOR-WIDETAG" @@ -2462,6 +2873,7 @@ structure representations" "*CONTROL-STACK-START*" "*CONTROL-STACK-END*" "CONTROL-STACK-POINTER-VALID-P" "DYNAMIC-SPACE-START" "DYNAMIC-SPACE-END" + #!+gencgc "MAX-DYNAMIC-SPACE-END" #!+c-stack-is-control-stack "ALTERNATE-SIGNAL-STACK-START" #!-gencgc "DYNAMIC-0-SPACE-START" #!-gencgc "DYNAMIC-0-SPACE-END" @@ -2473,6 +2885,8 @@ structure representations" #!+linkage-table "LINKAGE-TABLE-SPACE-START" #!+linkage-table "LINKAGE-TABLE-SPACE-END" #!+linkage-table "LINKAGE-TABLE-ENTRY-SIZE" + #!+sb-safepoint "GC-SAFEPOINT-PAGE-ADDR" + "TLS-SIZE" "TRACE-TABLE-CALL-SITE" "TRACE-TABLE-FUN-EPILOGUE" "TRACE-TABLE-FUN-PROLOGUE" "TRACE-TABLE-NORMAL" "N-WIDETAG-BITS" "WIDETAG-MASK" @@ -2489,7 +2903,7 @@ structure representations" "WEAK-POINTER-BROKEN-SLOT" "WEAK-POINTER-NEXT-SLOT" "WEAK-POINTER-SIZE" "WEAK-POINTER-WIDETAG" "WEAK-POINTER-VALUE-SLOT" - "WORD" "N-WORD-BITS" "N-WORD-BYTES" "N-MACHINE-WORD-BITS" + "N-WORD-BITS" "N-WORD-BYTES" "N-MACHINE-WORD-BITS" "WORD-REG-SC-NUMBER" "WORD-SHIFT" #!+win32 "CONTEXT-RESTORE-TRAP" "ZERO-SC-NUMBER")) @@ -2515,10 +2929,14 @@ structure representations" :name "SB!EVAL" :doc "internal: the evaluator implementation used to execute code without compiling it." :use ("CL" "SB!KERNEL" "SB!EXT") + :reexport ("*EVAL-CALLS*") :export ("INTERPRETED-FUNCTION" "INTERPRETED-FUNCTION-P" "INTERPRETED-FUNCTION-NAME" + "INTERPRETED-FUNCTION-DEBUG-NAME" "INTERPRETED-FUNCTION-LAMBDA-LIST" + "INTERPRETED-FUNCTION-DEBUG-LAMBDA-LIST" + "INTERPRETED-FUNCTION-DECLARATIONS" "INTERPRETED-FUNCTION-DOCUMENTATION" "INTERPRETED-FUNCTION-BODY" "INTERPRETED-FUNCTION-SOURCE-LOCATION" @@ -2527,8 +2945,7 @@ structure representations" "EVAL-IN-NATIVE-ENVIRONMENT" "PREPARE-FOR-COMPILE" "COUNT-EVAL-CALLS" - "*EVAL-LEVEL*" - "*EVAL-CALLS*")) + "*EVAL-LEVEL*")) #!+win32 #s(sb-cold:package-data @@ -2537,10 +2954,41 @@ structure representations" SBCL itself" :use ("CL" "SB!ALIEN" "SB!EXT" "SB!INT" "SB!SYS") :export ("BOOL" - "DWORD" "FD-CLEAR-INPUT" "FD-LISTEN" - "FLUSH-CONSOLE-INPUT-BUFFER" "FORMAT-MESSAGE" - "GET-LAST-ERROR" "GET-OSFHANDLE" "HANDLE" - "HANDLE-CLEAR-INPUT" "HANDLE-LISTEN" "INT-PTR" - "INVALID-HANDLE" "MILLISLEEP" "PEEK-CONSOLE-INPUT" - "PEEK-NAMED-PIPE" "READ-FILE" "WRITE-FILE" - "WITH-PROCESS-TIMES" "GET-VERSION-EX"))) + "CLOSE-HANDLE" + "CREATE-FILE" + "CREATE-FILE-MAPPING" + "CRYPT-GEN-RANDOM" + "DWORD" + "FD-CLEAR-INPUT" + "FD-LISTEN" + "FILE-CREATE-ALWAYS" + "FILE-CREATE-NEW" + "FILE-OPEN-ALWAYS" + "FILE-OPEN-EXISTING" + "FILE-TRUNCATE-EXISTING" + "FLUSH-CONSOLE-INPUT-BUFFER" + "FLUSH-VIEW-OF-FILE" + "FORMAT-MESSAGE" + "GET-FILE-ATTRIBUTES" + "GET-FILE-SIZE-EX" + "GET-FILE-TYPE" + "GET-LAST-ERROR" + "GET-OSFHANDLE" + "GET-VERSION-EX" + "HANDLE" + "HANDLE-CLEAR-INPUT" + "HANDLE-LISTEN" + "INT-PTR" + "INVALID-HANDLE" + "LSEEKI64" + "MAP-VIEW-OF-FILE" + "MILLISLEEP" + "PEEK-CONSOLE-INPUT" + "PEEK-NAMED-PIPE" + "READ-FILE" + "UNIXLIKE-CLOSE" + "UNIXLIKE-OPEN" + "UNMAP-VIEW-OF-FILE" + "WAIT-OBJECT-OR-SIGNAL" + "WRITE-FILE" + "WITH-PROCESS-TIMES")))