X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=inline;f=package-data-list.lisp-expr;h=cad8f2a10d591baf963311674d0e9dc2536f4687;hb=b43b6e70ce48d959d77f7f56be9d11aa101fdd7d;hp=569a836041abd8251e690de45cde6b7e5b4118f3;hpb=6fedcdf1b31e40855fec7845d8bce5ad8beeaaf1;p=sbcl.git

diff --git a/package-data-list.lisp-expr b/package-data-list.lisp-expr
index 569a836..cad8f2a 100644
--- a/package-data-list.lisp-expr
+++ b/package-data-list.lisp-expr
@@ -337,6 +337,7 @@ of SBCL which maintained the CMU-CL-style split into two packages.)"
                "DEF-SETTER"
                "FIXED-ALLOC"
                "MAKE-UNBOUND-MARKER"
+               "MAKE-FUNCALLABLE-INSTANCE-TRAMP"
                "RETURN-SINGLE"
                "NOTE-NEXT-INSTRUCTION"
                "SET-SLOT"
@@ -345,7 +346,6 @@ of SBCL which maintained the CMU-CL-style split into two packages.)"
                "BLOCK-NUMBER"
                "BACKEND"
                "IR2-BLOCK-BLOCK"
-               "FUNCALLABLE-INSTANCE-LEXENV"
                "VOP-BLOCK"
                "*ASSEMBLY-OPTIMIZE*"
                "LARGE-ALLOC"
@@ -1154,8 +1154,7 @@ is a good idea, but see SB-SYS re. blurring of boundaries."
                "%RAW-INSTANCE-SET/COMPLEX-SINGLE"
                "%RAW-INSTANCE-REF/COMPLEX-DOUBLE"
                "%RAW-INSTANCE-SET/COMPLEX-DOUBLE"
-               "%SET-ARRAY-DIMENSION" "%SET-FUNCALLABLE-INSTANCE-FUN"
-               "%SET-FUNCALLABLE-INSTANCE-INFO"
+               "%SET-ARRAY-DIMENSION" "%SET-FUNCALLABLE-INSTANCE-INFO"
                "%SET-RAW-BITS" "%SET-VECTOR-RAW-BITS"
                "%SET-SAP-REF-16" "%SET-SAP-REF-32" "%SET-SAP-REF-64"
                "%SET-SAP-REF-WORD" "%SET-SAP-REF-8" "%SET-SAP-REF-DOUBLE"
@@ -1502,7 +1501,9 @@ is a good idea, but see SB-SYS re. blurring of boundaries."
                "FDEFN-MAKUNBOUND" "OUTER-FDEFN"
                "%COERCE-CALLABLE-TO-FUN" "FUN-SUBTYPE"
                "*MAXIMUM-ERROR-DEPTH*" "%SET-SYMBOL-PLIST"
-               "INFINITE-ERROR-PROTECT" "FIND-CALLER-NAME-AND-FRAME"
+               "INFINITE-ERROR-PROTECT" 
+               "FIND-CALLER-NAME-AND-FRAME"
+               "FIND-INTERRUPTED-NAME-AND-FRAME"
                "%SET-SYMBOL-VALUE" "%SET-SYMBOL-PACKAGE"
                "OUTPUT-SYMBOL-NAME" "%COERCE-NAME-TO-FUN"
                "INVOKE-MACROEXPAND-HOOK" "DEFAULT-STRUCTURE-PRINT"
@@ -1546,8 +1547,8 @@ is a good idea, but see SB-SYS re. blurring of boundaries."
                "REGISTER-LAYOUT"
                "FUNCALLABLE-INSTANCE" "RANDOM-FIXNUM-MAX"
                "MAKE-STATIC-CLASSOID" "INSTANCE-LAMBDA"
-               "%FUNCALLABLE-INSTANCE-LEXENV" "%MAKE-SYMBOL"
-               "%FUNCALLABLE-INSTANCE-FUN" "SYMBOL-HASH"
+               "%MAKE-SYMBOL"
+               "%FUNCALLABLE-INSTANCE-FUNCTION" "SYMBOL-HASH"
 
                "BUILT-IN-CLASSOID" "CONDITION-CLASSOID-P"
                "CONDITION-CLASSOID-SLOTS" "MAKE-UNDEFINED-CLASSOID"
@@ -1589,12 +1590,16 @@ is a good idea, but see SB-SYS re. blurring of boundaries."
                "!LATE-PROCLAIM-COLD-INIT" "!CLASS-FINALIZE"
                "!CONSTANTP-COLD-INIT"
 
+               "FLOAT-COLD-INIT-OR-REINIT"
                "GC-REINIT"
                "SIGNAL-COLD-INIT-OR-REINIT"
                "STREAM-COLD-INIT-OR-RESET"
 
                ;; Cleanups to run before saving a core
-               "DEBUG-DEINIT" "FOREIGN-DEINIT" "PROFILE-DEINIT"
+               "DEBUG-DEINIT" 
+               "FLOAT-DEINIT"
+               "FOREIGN-DEINIT" 
+               "PROFILE-DEINIT"
 
                ;; Note: These are out of lexicographical order
                ;; because in CMU CL they were defined as
@@ -2162,7 +2167,7 @@ structure representations"
                "FORWARDING-POINTER-TYPE"
                "FP-CONSTANT-SC-NUMBER"
                "FP-DOUBLE-ZERO-SC-NUMBER" "FP-SINGLE-ZERO-SC-NUMBER"
-               "FUNCALLABLE-INSTANCE-FUN-SLOT"
+               "FUNCALLABLE-INSTANCE-TRAMPOLINE-SLOT"
                "FUNCALLABLE-INSTANCE-HEADER-WIDETAG"
                "FUNCALLABLE-INSTANCE-INFO-OFFSET"
                "SIMPLE-FUN-ARGLIST-SLOT" "SIMPLE-FUN-CODE-OFFSET"
@@ -2177,8 +2182,6 @@ structure representations"
                "FUN-POINTER-LOWTAG"
                "SIMPLE-FUN-SELF-SLOT"
                "SIMPLE-FUN-TYPE-SLOT"
-               "FUNCALLABLE-INSTANCE-LAYOUT-SLOT"
-               "FUNCALLABLE-INSTANCE-LEXENV-SLOT"
                "GENCGC-PAGE-SIZE"
                #!+ppc "PSEUDO-ATOMIC-INTERRUPTED-FLAG"
                #!+ppc "PSEUDO-ATOMIC-FLAG"