X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=package-data-list.lisp-expr;h=c87ae89786a1407dcafe7291df11e1d1722cc7fb;hb=7fb597b585fc715537ea644f7d84440eca217ca1;hp=80006e6629b63a698ee0e7371ca0c37e14b34d0d;hpb=fec3614baf361523a4fb154ed80d9b73e1452b2d;p=sbcl.git

diff --git a/package-data-list.lisp-expr b/package-data-list.lisp-expr
index 80006e6..c87ae89 100644
--- a/package-data-list.lisp-expr
+++ b/package-data-list.lisp-expr
@@ -43,6 +43,7 @@ of SBCL which maintained the CMU-CL-style split into two packages.)"
                "UNION"  "VALUES" "*")
     :export ("ADDR"
              "ALIEN"
+             #!+win32 "ALIEN-FUNCALL-STDCALL"
              "ALIEN-FUNCALL" "ALIEN-SAP" "ALIEN-SIZE"
              "CAST" "C-STRING"
              "DEFINE-ALIEN-ROUTINE" "DEFINE-ALIEN-TYPE" "DEFINE-ALIEN-VARIABLE"
@@ -196,6 +197,7 @@ of SBCL which maintained the CMU-CL-style split into two packages.)"
                  "SB!KERNEL" "SB!SYS")
       :reexport ("SLOT" "CODE-INSTRUCTIONS" "FLUSHABLE")
       :export ("%ALIEN-FUNCALL"
+               #!+win32 "%ALIEN-FUNCALL-STDCALL"
                "%CATCH-BREAKUP" "%CONTINUE-UNWIND"
                "%LISTIFY-REST-ARGS" "%MORE-ARG" "%MORE-ARG-VALUES"
                "%UNWIND-PROTECT-BREAKUP"
@@ -1114,7 +1116,7 @@ is a good idea, but see SB-SYS re. blurring of boundaries."
                "%CHECK-BOUND" "%CHECK-VECTOR-SEQUENCE-BOUNDS"
                "%CLOSURE-FUN" "%CLOSURE-INDEX-REF" "%COS" "%COS-QUICK"
                "%COSH" "%DATA-VECTOR-AND-INDEX" "%DEPOSIT-FIELD"
-               "%DOUBLE-FLOAT" "%DPB" "%EXP" "%EXPM1" "%FIND-POSITION"
+               "%DOUBLE-FLOAT" "%DPB" "%EQL" "%EXP" "%EXPM1" "%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"
@@ -1247,6 +1249,7 @@ is a good idea, but see SB-SYS re. blurring of boundaries."
                "INTEGER-DECODE-DOUBLE-FLOAT"
                #!+long-float "INTEGER-DECODE-LONG-FLOAT"
                "INTEGER-DECODE-SINGLE-FLOAT" "INTERNAL-ERROR"
+               #!+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"
@@ -2307,6 +2310,7 @@ structure representations"
                "WEAK-POINTER-VALUE-SLOT"
                "WORD" "N-WORD-BITS" "N-WORD-BYTES" "N-MACHINE-WORD-BITS"
                "WORD-REG-SC-NUMBER" "WORD-SHIFT"
+               #!+win32 "CONTEXT-RESTORE-TRAP"
                "ZERO-SC-NUMBER"))
 
    #s(sb-cold:package-data