X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fcode%2Ftoplevel.lisp;h=2f17bcff0d9325da5de73b4882915b7357350da5;hb=e29e89b56564b0d302f0ded969a298b948722add;hp=67bb513489670b49580e93563d86f59fafbca28a;hpb=bd0ba0f214518e8d72ff2d44de5a1e3e4b02af2c;p=sbcl.git

diff --git a/src/code/toplevel.lisp b/src/code/toplevel.lisp
index 67bb513..2f17bcf 100644
--- a/src/code/toplevel.lisp
+++ b/src/code/toplevel.lisp
@@ -26,7 +26,6 @@
 
 ;;; FIXME: These could be converted to DEFVARs.
 (declaim (special *gc-inhibit* *need-to-collect-garbage*
-		  *gc-notify-stream*
 		  *before-gc-hooks* *after-gc-hooks*
 		  #!+x86 *pseudo-atomic-atomic*
 		  #!+x86 *pseudo-atomic-interrupted*
@@ -88,7 +87,7 @@
 	 (error-error "Help! "
 		      *current-error-depth*
 		      " nested errors. "
-		      "KERNEL:*MAXIMUM-ERROR-DEPTH* exceeded.")
+		      "SB-KERNEL:*MAXIMUM-ERROR-DEPTH* exceeded.")
 	 t)
 	(t
 	 (/show0 "returning normally from INFINITE-ERROR-PROTECTOR")
@@ -115,7 +114,7 @@
 	  (error-error "Help! "
 		       *current-error-depth*
 		       " nested errors. "
-		       "KERNEL:*MAXIMUM-ERROR-DEPTH* exceeded.")
+		       "SB-KERNEL:*MAXIMUM-ERROR-DEPTH* exceeded.")
 	  (progn ,@forms)
 	  t)
 	 (t