X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=package-data-list.lisp-expr;h=54430d77c3dfdb451c3ebdbc419148af4dce7ec6;hb=1a61f069111cb6f7263852b73eea1bd8cda9ef68;hp=112d88e5fe073a1e3da8cff4e68513ac680f6b01;hpb=ad4b18f5d843d91cc48c9b6cc936a6c7be5fce27;p=sbcl.git diff --git a/package-data-list.lisp-expr b/package-data-list.lisp-expr index 112d88e..54430d7 100644 --- a/package-data-list.lisp-expr +++ b/package-data-list.lisp-expr @@ -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" @@ -613,6 +626,7 @@ like *STACK-TOP-HINT* and unsupported stuff like *TRACED-FUN-LIST*." "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" @@ -785,6 +799,7 @@ like *STACK-TOP-HINT* and unsupported stuff like *TRACED-FUN-LIST*." "TYPEXPAND-1" "TYPEXPAND" "TYPEXPAND-ALL" "DEFINED-TYPE-NAME-P" "VALID-TYPE-SPECIFIER-P" "DELETE-DIRECTORY" + "SET-SBCL-SOURCE-LOCATION" ;; stepping interface "STEP-CONDITION" "STEP-FORM-CONDITION" "STEP-FINISHED-CONDITION" @@ -1084,7 +1099,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? @@ -1331,6 +1346,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" @@ -1596,22 +1612,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" @@ -1663,22 +1675,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" @@ -1731,8 +1738,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" @@ -2017,7 +2024,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" @@ -2656,10 +2668,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" @@ -2675,6 +2687,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" @@ -2710,23 +2724,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" @@ -2836,13 +2844,20 @@ SBCL itself" :use ("CL" "SB!ALIEN" "SB!EXT" "SB!INT" "SB!SYS") :export ("BOOL" "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"