X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=package-data-list.lisp-expr;h=e27b6e8e9518de84c24466641579a944798bd676;hb=ab5427d31da2bd95805cccc8e47b8f43d3dd606d;hp=b17b5ed488ffd8c7072fa6fcf4fc6d6340ba6df5;hpb=fb15ad0ff2373a50b3b0717f705c49339b39f996;p=sbcl.git diff --git a/package-data-list.lisp-expr b/package-data-list.lisp-expr index b17b5ed..e27b6e8 100644 --- a/package-data-list.lisp-expr +++ b/package-data-list.lisp-expr @@ -163,7 +163,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" @@ -545,6 +545,7 @@ 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" @@ -562,7 +563,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" @@ -596,13 +597,25 @@ like *STACK-TOP-HINT* and unsupported stuff like *TRACED-FUN-LIST*." "*USERINIT-PATHNAME-FUNCTION*" "*SYSINIT-PATHNAME-FUNCTION*" - ;; Atomic operations and types related to them + ;; 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" "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" @@ -1084,7 +1097,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? @@ -1282,6 +1295,7 @@ is a good idea, but see SB-SYS re. blurring of boundaries." "%ATAN" "%ATAN2" "%ATANH" "%CALLER-FRAME" "%CALLER-PC" + "%CEILING" "%CHECK-BOUND" "%CHECK-GENERIC-SEQUENCE-BOUNDS" "%CHECK-VECTOR-SEQUENCE-BOUNDS" @@ -1295,7 +1309,9 @@ is a good idea, but see SB-SYS re. blurring of boundaries." "%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" "%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" @@ -1328,6 +1344,7 @@ is a good idea, but see SB-SYS re. blurring of boundaries." "%MEMBER-KEY-TEST-NOT" "%MEMBER-TEST" "%MEMBER-TEST-NOT" + "%MULTIPLY-HIGH" "%NEGATE" "%POW" "%OTHER-POINTER-WIDETAG" "%PUTHASH" @@ -1593,22 +1610,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" @@ -1660,22 +1673,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" @@ -1728,8 +1736,8 @@ is a good idea, but see SB-SYS re. blurring of boundaries." "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-BYTE-29-P" "VECTOR-UNSIGNED-BYTE-31-P" - "VECTOR-UNSIGNED-BYTE-32-P" "VECTOR-UNSIGNED-BYTE-60-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" @@ -2014,7 +2022,12 @@ is a good idea, but see SB-SYS re. blurring of boundaries." "SEMAPHORE-COUNT" "SIGNAL-SEMAPHORE" "TRY-SEMAPHORE" - "WAIT-ON-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" @@ -2653,10 +2666,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" @@ -2672,6 +2685,8 @@ 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" @@ -2707,23 +2722,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" @@ -2832,10 +2841,34 @@ 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" + "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-LAST-ERROR" + "GET-OSFHANDLE" + "GET-VERSION-EX" + "HANDLE" + "HANDLE-CLEAR-INPUT" + "HANDLE-LISTEN" + "INT-PTR" + "INVALID-HANDLE" + "MAP-VIEW-OF-FILE" + "MILLISLEEP" + "PEEK-CONSOLE-INPUT" + "PEEK-NAMED-PIPE" + "READ-FILE" + "UNMAP-VIEW-OF-FILE" + "WRITE-FILE" + "WITH-PROCESS-TIMES")))