X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fglobals.lisp;h=261eea2529ab67a2aa6c547d885114fffe1de450;hb=3c3006c51658323c44c3cec859838bde3ea6b565;hp=aac1ab20faf4a5877bc759980af31d0d4e379900;hpb=47eb330ef0f3b99d24c0e24d897b757f16950c4b;p=sbcl.git

diff --git a/src/code/globals.lisp b/src/code/globals.lisp
index aac1ab2..261eea2 100644
--- a/src/code/globals.lisp
+++ b/src/code/globals.lisp
@@ -18,11 +18,12 @@
 (declaim (special *keyword-package* *cl-package*
                   original-lisp-environment
                   *standard-readtable*
+                  sb!pretty::*standard-pprint-dispatch-table*
                   sb!debug:*in-the-debugger*
                   sb!debug:*stack-top-hint*
                   *handler-clusters*
                   *restart-clusters*
-                  *gc-inhibit* *gc-pending*
+                  *in-without-gcing* *gc-inhibit* *gc-pending*
                   #!+sb-thread *stop-for-gc-pending*
                   *software-interrupt-vector* *load-verbose*
                   *load-print-stuff* *in-compilation-unit*