X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=package-data-list.lisp-expr;h=c898ccc2e972b5e9f9300967e77e2894af795bb0;hb=76f7887e98cbc10b4cd23e81b3e5cdfcc35c8741;hp=112d88e5fe073a1e3da8cff4e68513ac680f6b01;hpb=ad4b18f5d843d91cc48c9b6cc936a6c7be5fce27;p=sbcl.git

diff --git a/package-data-list.lisp-expr b/package-data-list.lisp-expr
index 112d88e..c898ccc 100644
--- a/package-data-list.lisp-expr
+++ b/package-data-list.lisp-expr
@@ -603,6 +603,9 @@ like *STACK-TOP-HINT* and unsupported stuff like *TRACED-FUN-LIST*."
                "WORD"
                "MOST-POSITIVE-WORD"
 
+               ;; Not an atomic operation, but should be used with them
+               "SPIN-LOOP-HINT"
+
                ;; Time related things
                "CALL-WITH-TIMING"
                "GET-TIME-OF-DAY"
@@ -1331,6 +1334,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"
@@ -2836,13 +2840,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"