X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=package-data-list.lisp-expr;h=612236da49d14c8df0335ad9b93d96499a7b6e88;hb=HEAD;hp=5cd38ac05a2a141283f9e7134ffa52c67fbba6bf;hpb=315285fcf8bf1f7e732da307cfaf31f18f412811;p=sbcl.git diff --git a/package-data-list.lisp-expr b/package-data-list.lisp-expr index 5cd38ac..612236d 100644 --- a/package-data-list.lisp-expr +++ b/package-data-list.lisp-expr @@ -142,8 +142,9 @@ of SBCL which maintained the CMU-CL-style split into two packages.)" "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" + "EMIT-LABEL" "LABEL-POSITION" "APPEND-SEGMENT" + "FINALIZE-SEGMENT" + "SEGMENT-CONTENTS-AS-VECTOR" "WRITE-SEGMENT-CONTENTS" "READS" "WRITES" "SEGMENT" "WITHOUT-SCHEDULING" "VARIABLE-LENGTH" @@ -242,7 +243,6 @@ 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" - "CHECK-MOD-FIXNUM" "CLOSURE-INIT" "CLOSURE-REF" "CLOSURE-INIT-FROM-FP" "*CODE-COVERAGE-INFO*" "COMPARE-AND-SWAP-SLOT" @@ -393,7 +393,7 @@ of SBCL which maintained the CMU-CL-style split into two packages.)" "GENERATE-CALL-SEQUENCE" "GENERATE-RETURN-SEQUENCE" "LOCATION-NUMBER" - + "WITH-COMPILER-ERROR-RESIGNALLING" "WITH-SOURCE-LOCATION" "*SOURCE-LOCATION-THUNKS*" @@ -513,8 +513,7 @@ like *STACK-TOP-HINT* and unsupported stuff like *TRACED-FUN-LIST*." "DEFINE-ARG-TYPE" "GEN-ARG-TYPE-DEF-FORM" "READ-SIGNED-SUFFIX" "ADD-OFFS-HOOK" "MAKE-MEMORY-SEGMENT" "GEN-PREAMBLE-FORM" - "MAKE-SEGMENT" "SEGMENT-OVERFLOW" - "SEG-VIRTUAL-LOCATION" + "MAKE-SEGMENT" "SEG-VIRTUAL-LOCATION" "DCHUNK" "*DEFAULT-DSTATE-HOOKS*" "MAKE-CODE-SEGMENT" "MAKE-OFFS-HOOK" "DSTATE-SEGMENT" "DSTATE-CUR-OFFS" @@ -824,6 +823,7 @@ like *STACK-TOP-HINT* and unsupported stuff like *TRACED-FUN-LIST*." "DELETE-DIRECTORY" "SET-SBCL-SOURCE-LOCATION" "*DISASSEMBLE-ANNOTATE*" + "PRINT-SYMBOL-WITH-PREFIX" ;; stepping interface "STEP-CONDITION" "STEP-FORM-CONDITION" "STEP-FINISHED-CONDITION" @@ -871,7 +871,10 @@ like *STACK-TOP-HINT* and unsupported stuff like *TRACED-FUN-LIST*." #!+sb-simd-pack "%SIMD-PACK-UB32S" #!+sb-simd-pack "%SIMD-PACK-UB64S" #!+sb-simd-pack "%SIMD-PACK-DOUBLES" - #!+sb-simd-pack "%SIMD-PACK-SINGLES")) + #!+sb-simd-pack "%SIMD-PACK-SINGLES" + + ;; versioning utility + "ASSERT-VERSION->=")) #s(sb-cold:package-data :name "SB!FORMAT" @@ -907,7 +910,7 @@ Lisp extension proposal by David N. Gray" :doc "private: miscellaneous unsupported extensions to the ANSI spec. Much of the stuff in here originated in CMU CL's EXTENSIONS package and is retained, -possibly temporariliy, because it might be used internally." +possibly temporarily, because it might be used internally." :use ("CL" "SB!ALIEN" "SB!GRAY" "SB!FASL" "SB!SYS") :export (;; lambda list keyword extensions "&MORE" @@ -1004,7 +1007,10 @@ possibly temporariliy, because it might be used internally." "SEQUENCE-BOUNDING-INDICES-BAD-ERROR" "SPECIAL-FORM-FUNCTION" "STYLE-WARN" "SIMPLE-COMPILER-NOTE" - + "TWO-ARG-CHAR-EQUAL" "TWO-ARG-CHAR-NOT-EQUAL" + "TWO-ARG-CHAR-LESSP" "TWO-ARG-CHAR-NOT-LESSP" + "TWO-ARG-CHAR-GREATERP" "TWO-ARG-CHAR-NOT-GREATERP" + "CHAR-EQUAL-CONSTANT" ;; FIXME: potential SB!EXT exports "CHARACTER-CODING-ERROR" "CHARACTER-DECODING-ERROR" "CHARACTER-DECODING-ERROR-OCTETS" @@ -1065,6 +1071,8 @@ possibly temporariliy, because it might be used internally." "%BREAK" "NTH-BUT-WITH-SANE-ARG-ORDER" "BIT-VECTOR-=" + "PATHNAME=" + "HASH-TABLE-EQUALP" "READ-EVALUATED-FORM" "MAKE-UNPRINTABLE-OBJECT" "POWER-OF-TWO-CEILING" @@ -1221,10 +1229,6 @@ possibly temporariliy, because it might be used internally." "SET-FLOATING-POINT-MODES" "WITH-FLOAT-TRAPS-MASKED" - ;; compatibility hacks for old-style CMU CL data formats - "UNIX-ENVIRONMENT-CMUCL-FROM-SBCL" - "UNIX-ENVIRONMENT-SBCL-FROM-CMUCL" - ;; a sort of quasi-unbound tag for use in hash tables "+EMPTY-HT-SLOT+" @@ -1347,6 +1351,7 @@ is a good idea, but see SB-SYS re. blurring of boundaries." "%COMPARE-AND-SWAP-SYMBOL-VALUE" "%CONCATENATE-TO-BASE-STRING" "%CONCATENATE-TO-STRING" + "CONTAINS-UNKNOWN-TYPE-P" "%COS" "%COS-QUICK" "%COSH" "%DATA-VECTOR-AND-INDEX" "%DEPOSIT-FIELD" "%DOUBLE-FLOAT" "%DPB" "%EQL" @@ -1357,6 +1362,7 @@ is a good idea, but see SB-SYS re. blurring of boundaries." "%FIND-POSITION-VECTOR-MACRO" "%FIND-POSITION-IF" "%FIND-POSITION-IF-VECTOR-MACRO" "%FIND-POSITION-IF-NOT" "%FIND-POSITION-IF-NOT-VECTOR-MACRO" + "FIXNUM-MOD-P" "%HYPOT" "%LDB" "%LOG" "%LOGB" "%LOG10" "%LAST0" "%LAST1" @@ -1364,6 +1370,7 @@ is a good idea, but see SB-SYS re. blurring of boundaries." "%LASTN/BIGNUM" "%LOG1P" #!+long-float "%LONG-FLOAT" + "%MAKE-ARRAY" "%MAKE-COMPLEX" "%MAKE-FUNCALLABLE-INSTANCE" "%MAKE-FUNCALLABLE-STRUCTURE-INSTANCE-ALLOCATOR" "%MAKE-RATIO" "%MAKE-LISP-OBJ" @@ -1616,7 +1623,7 @@ is a good idea, but see SB-SYS re. blurring of boundaries." "OBJECT-NOT-DOUBLE-FLOAT-ERROR" "OBJECT-NOT-FIXNUM-ERROR" "OBJECT-NOT-FLOAT-ERROR" "OBJECT-NOT-FUN-ERROR" "OBJECT-NOT-INSTANCE-ERROR" "OBJECT-NOT-INTEGER-ERROR" - "OBJECT-NOT-LIST-ERROR" "OBJECT-NOT-MOD-ERROR" + "OBJECT-NOT-LIST-ERROR" #!+long-float "OBJECT-NOT-LONG-FLOAT-ERROR" "OBJECT-NOT-NUMBER-ERROR" "OBJECT-NOT-RATIO-ERROR" "OBJECT-NOT-RATIONAL-ERROR" "OBJECT-NOT-REAL-ERROR" @@ -1696,6 +1703,7 @@ is a good idea, but see SB-SYS re. blurring of boundaries." "SCALE-DOUBLE-FLOAT" #!+long-float "SCALE-LONG-FLOAT" "SCALE-SINGLE-FLOAT" + "SCHWARTZIAN-STABLE-SORT-LIST" "SCRUB-POWER-CACHE" "SEQUENCEP" "SEQUENCE-COUNT" "SEQUENCE-END" "SEQUENCE-OF-CHECKED-LENGTH-GIVEN-TYPE" @@ -1757,7 +1765,8 @@ is a good idea, but see SB-SYS re. blurring of boundaries." "TYPE-SINGLE-VALUE-P" "TYPE-SPECIFIER" "TYPE-UNION" "TYPE/=" "TYPE=" "TYPES-EQUAL-OR-INTERSECT" "UNBOUND-SYMBOL-ERROR" "UNBOXED-ARRAY" - "UNDEFINED-FUN-ERROR" "UNION-TYPE" "UNION-TYPE-P" + "UNDEFINED-FUN-ERROR" "UNDEFINED-ALIEN-FUN-ERROR" + "UNION-TYPE" "UNION-TYPE-P" "UNION-TYPE-TYPES" "UNKNOWN-ERROR" "UNKNOWN-KEY-ARG-ERROR" "UNKNOWN-TYPE" "UNKNOWN-TYPE-P" "UNKNOWN-TYPE-SPECIFIER" "UNSEEN-THROW-TAG-ERROR" @@ -1860,6 +1869,7 @@ is a good idea, but see SB-SYS re. blurring of boundaries." "FIND-CALLER-NAME-AND-FRAME" "FIND-INTERRUPTED-NAME-AND-FRAME" "%SET-SYMBOL-VALUE" "%SET-SYMBOL-GLOBAL-VALUE" "%SET-SYMBOL-PACKAGE" + "SET-SYMBOL-GLOBAL-VALUE" "OUTPUT-SYMBOL-NAME" "%COERCE-NAME-TO-FUN" "DEFAULT-STRUCTURE-PRINT" "LAYOUT" "LAYOUT-LENGTH" "LAYOUT-PURE" "DSD-RAW-TYPE" @@ -1922,9 +1932,11 @@ is a good idea, but see SB-SYS re. blurring of boundaries." ;; symbols from former SB!CONDITIONS "*HANDLER-CLUSTERS*" "*RESTART-CLUSTERS*" - "*CONDITION-RESTARTS*" "CASE-FAILURE" - "NAMESTRING-PARSE-ERROR" "NAMESTRING-PARSE-ERROR-OFFSET" - "MAKE-RESTART" "COERCE-TO-CONDITION" + + "CASE-FAILURE" "NAMESTRING-PARSE-ERROR" + "NAMESTRING-PARSE-ERROR-OFFSET" + "MAKE-RESTART" "RESTART-ASSOCIATED-CONDITIONS" + "COERCE-TO-CONDITION" "ALLOCATE-CONDITION" @@ -1936,6 +1948,7 @@ is a good idea, but see SB-SYS re. blurring of boundaries." "CONDITION-SLOT-INITARGS" "CONDITION-SLOT-INITFORM" "CONDITION-SLOT-INITFORM-P" + "CONDITION-SLOT-INITFUNCTION" "CONDITION-SLOT-NAME" "CONDITION-SLOT-READERS" "CONDITION-SLOT-WRITERS" @@ -1988,7 +2001,6 @@ is a good idea, but see SB-SYS re. blurring of boundaries." "STREAM-COLD-INIT-OR-RESET" ;; Cleanups to run before saving a core - "DEBUG-DEINIT" "FLOAT-DEINIT" "FOREIGN-DEINIT" "PROFILE-DEINIT" @@ -2010,9 +2022,8 @@ is a good idea, but see SB-SYS re. blurring of boundaries." "STRING<*" "STRING/=*" "%SVSET" "%SP-STRING-COMPARE" "%SETNTH" "%SETELT" "%SET-ROW-MAJOR-AREF" "%SET-FILL-POINTER" - "%SET-FDEFINITION" "%SCHARSET" "%SBITSET" - "%RPLACD" "%RPLACA" "%PUT" "%CHARSET" "%BITSET" - "%ASET")) + "%SET-FDEFINITION" "%SCHARSET" + "%RPLACD" "%RPLACA" "%PUT" "%CHARSET")) #s(sb-cold:package-data :name "SB!THREAD" @@ -2041,7 +2052,7 @@ is a good idea, but see SB-SYS re. blurring of boundaries." "THREAD-ERROR" "THREAD-ERROR-THREAD" "THREAD-ALIVE-P" - "THREAD-EMPHEMERAL-P" + "THREAD-EPHEMERAL-P" "THREAD-NAME" "THREAD-YIELD" "FOREIGN-THREAD" @@ -2194,6 +2205,69 @@ ISBN 0-262-61074-4, with exceptions as noted in the User Manual." "WRITER-METHOD-CLASS")) #s(sb-cold:package-data + :name "SB!REGALLOC" + :doc "private: implementation of the compiler's register allocator" + :use ("CL" "SB!ALIEN-INTERNALS" "SB!ALIEN" "SB!ASSEM" "SB!BIGNUM" + #!+sb-dyncount "SB-DYNCOUNT" "SB!EXT" "SB!FASL" "SB!INT" + "SB!KERNEL" "SB!SYS" + "SB!C") + :import-from (("SB!C" + "*LOOP-ANALYZE*" + "BLOCK-INFO" "BLOCK-LAST" "BLOCK-LOOP" "BLOCK-NEXT" + "CLEAR-BIT-VECTOR" "COMPONENT-HEAD" "COMPONENT-TAIL" + "DEFEVENT" "DELETE-VOP" "DO-IR2-BLOCKS" "DO-LIVE-TNS" + "EMIT-LOAD-TEMPLATE" "EVENT" "FIND-IN" + "FINITE-SB" "FINITE-SB-ALWAYS-LIVE" + "FINITE-SB-ALWAYS-LIVE-COUNT" "FINITE-SB-CONFLICTS" + "FINITE-SB-CURRENT-SIZE" "FINITE-SB-LAST-BLOCK-COUNT" + "FINITE-SB-LAST-OFFSET" "FINITE-SB-LIVE-TNS" + "FINITE-SB-SIZE-ALIGNMENT" "FINITE-SB-SIZE-INCREMENT" + "GET-OPERAND-INFO" "GLOBAL-CONFLICTS-BLOCK" + "GLOBAL-CONFLICTS-CONFLICTS" "GLOBAL-CONFLICTS-KIND" + "GLOBAL-CONFLICTS-NEXT-TNWISE" "GLOBAL-CONFLICTS-NUMBER" + "GLOBAL-CONFLICTS-NEXT-BLOCKWISE" "GLOBAL-CONFLICTS-TN" + "IR2-BLOCK" "IR2-BLOCK-COUNT" "IR2-BLOCK-GLOBAL-TNS" + "IR2-BLOCK-LAST-VOP" "IR2-BLOCK-LIVE-IN" + "IR2-BLOCK-LOCAL-TN-COUNT" "IR2-BLOCK-LOCAL-TNS" + "IR2-BLOCK-NEXT" "IR2-BLOCK-NUMBER" "IR2-BLOCK-PREV" + "IR2-BLOCK-START-VOP" "IR2-COMPONENT" + "IR2-COMPONENT-GLOBAL-TN-COUNTER" + "IR2-COMPONENT-NORMAL-TNS" "IR2-COMPONENT-RESTRICTED-TNS" + "IR2-COMPONENT-SPILLED-TNS" "IR2-COMPONENT-SPILLED-VOPS" + "IR2-COMPONENT-WIRED-TNS" + "LAMBDA-PARENT" "LEXENV-LAMBDA" "LISTIFY-RESTRICTIONS" + "LOCAL-TN-BIT-VECTOR" "LOCAL-TN-COUNT" "LOCAL-TN-LIMIT" + "LOCAL-TN-NUMBER" "LOCAL-TN-VECTOR" + "LOOP-DEPTH" "MAKE-TN" "MOVE-OPERAND" "NODE" "NODE-LEXENV" + "OPERAND-PARSE-NAME" "POSITION-IN" + "PRIMITIVE-TYPE-SCS" "PRINT-TN-GUTS" + "SB-KIND" "SB-SIZE" + "SC-ALIGNMENT" "SC-ALLOWED-BY-PRIMITIVE-TYPE" + "SC-ALTERNATE-SCS" "SC-CONSTANT-SCS" "SC-ELEMENT-SIZE" + "SC-LOCATIONS" "SC-MOVE-FUNS" "SC-RESERVE-LOCATIONS" + "SC-SAVE-P" "SC-VECTOR" + "SET-BIT-VECTOR" + "SSET" "SSET-ELEMENT" "SSET-ADJOIN" "SSET-DELETE" + "SSET-MEMBER" "SSET-EMPTY" "COPY-SSET" + "TEMPLATE-NAME" + "TN" "TN-COST" "TN-GLOBAL-CONFLICTS" "TN-KIND" "TN-LEAF" + "TN-LOCAL" "TN-LOCAL-CONFLICTS" "TN-LOCAL-NUMBER" + "TN-LOOP-DEPTH" "TN-NEXT" "TN-NUMBER" "TN-PRIMITIVE-TYPE" + "TN-READS" "TN-SAVE-TN" "TN-WRITES" + "TNS-CONFLICT" "TNS-CONFLICT-GLOBAL-GLOBAL" + "TNS-CONFLICT-LOCAL-GLOBAL" + "VOP" "VOP-ARGS" "VOP-INFO" "VOP-INFO-ARG-LOAD-SCS" + "VOP-INFO-MOVE-ARGS" "VOP-INFO-NAME" + "VOP-INFO-RESULT-LOAD-SCS" "VOP-INFO-SAVE-P" + "VOP-INFO-TARGET-FUN" "VOP-NEXT" "VOP-NODE" + "VOP-PARSE-OR-LOSE" "VOP-PARSE-TEMPS" "VOP-PREV" + "VOP-REFS" "VOP-RESULTS" "VOP-SAVE-SET" "VOP-TEMPS")) + :export ("PACK" "TARGET-IF-DESIRABLE" "*REGISTER-ALLOCATION-METHOD*" + "*PACK-ITERATIONS*" + "*PACK-ASSIGN-COSTS*" "*PACK-OPTIMIZE-SAVES*" + "*TN-WRITE-COSTS*" "*TN-LOOP-DEPTH-MULTIPLIER*")) + + #s(sb-cold:package-data :name "SB!PCL" :doc "semi-public: This package includes useful meta-object protocol @@ -2374,6 +2448,7 @@ SB-KERNEL) have been undone, but probably more remain." "*PERIODIC-POLLING-PERIOD*" "*RUNTIME-DLHANDLE*" "*SHARED-OBJECTS*" + #!-sb-dynamic-core "*STATIC-FOREIGN-SYMBOLS*" "*STDERR*" "*STDIN*" "*STDOUT*" @@ -2919,7 +2994,7 @@ SBCL itself" "FILE-TRUNCATE-EXISTING" "FLUSH-CONSOLE-INPUT-BUFFER" "FLUSH-VIEW-OF-FILE" - "FORMAT-MESSAGE" + "FORMAT-SYSTEM-MESSAGE" "GET-FILE-ATTRIBUTES" "GET-FILE-SIZE-EX" "GET-FILE-TYPE"