X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=package-data-list.lisp-expr;h=1dd2e782665bac49f50126b5a6248b77df5c4939;hb=492dce07cf27b3cbee8ce4800c938fcb884aa53e;hp=8560e0bd3b83d76ff28253843f066c8a674978c8;hpb=f575ddaffe838c611359430946fe26b80808a35a;p=sbcl.git

diff --git a/package-data-list.lisp-expr b/package-data-list.lisp-expr
index 8560e0b..1dd2e78 100644
--- a/package-data-list.lisp-expr
+++ b/package-data-list.lisp-expr
@@ -410,20 +410,26 @@ is still mixed indiscriminately with low-level internal implementation stuff
 like *STACK-TOP-HINT* and unsupported stuff like *TRACED-FUN-LIST*."
       :use ("CL" "SB!EXT" "SB!INT" "SB!SYS" "SB!KERNEL")
       :reexport ("*DEBUG-PRINT-VARIABLE-ALIST*")
-      :export ("*DEBUG-BEGINNER-HELP-P*"
+      :export ("*BACKTRACE-FRAME-COUNT*"
+               "*DEBUG-BEGINNER-HELP-P*"
                "*DEBUG-CONDITION*"
                "*DEBUG-READTABLE*" "*DEBUG-HELP-STRING*"
                "*FLUSH-DEBUG-ERRORS*" "*IN-THE-DEBUGGER*"
-               "*SHOW-ENTRY-POINT-DETAILS*"
+               "*METHOD-FRAME-STYLE*"
                "*TRACE-INDENTATION-STEP*" "*MAX-TRACE-INDENTATION*"
                "*TRACE-FRAME*" "*TRACED-FUN-LIST*"
-               "ARG" "BACKTRACE" "BACKTRACE-AS-LIST" "INTERNAL-DEBUG" "VAR"
+               "ARG"
+               "INTERNAL-DEBUG" "VAR"
                "*PRINT-LOCATION-KIND*"
                "*ONLY-BLOCK-START-LOCATIONS*" "*STACK-TOP-HINT*"
                "*TRACE-VALUES*" "DO-DEBUG-COMMAND"
                "*TRACE-ENCAPSULATE-DEFAULT*"
                "FRAME-HAS-DEBUG-TAG-P"
-               "UNWIND-TO-FRAME-AND-CALL"))
+               "UNWIND-TO-FRAME-AND-CALL"
+               ;; Deprecated
+               "BACKTRACE" "BACKTRACE-AS-LIST" "*SHOW-ENTRY-POINT-DETAILS*"
+               ;; Replaced by
+               "PRINT-BACKTRACE" "LIST-BACKTRACE"))
 
    #s(sb-cold:package-data
       :name "SB!DI"