X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fglobals.lisp;h=13068225312dadc8b0f1dcfc3cb7ef5f834f2f7c;hb=840832c6ca7fae0af981d721bdbb38e567d575cf;hp=2ca7e36d3ed3c750cd2b96a9f2e2dccc4b918dea;hpb=2d195da5e29feadce7190ea1a68a2efa83a5e1c0;p=sbcl.git

diff --git a/src/code/globals.lisp b/src/code/globals.lisp
index 2ca7e36..1306822 100644
--- a/src/code/globals.lisp
+++ b/src/code/globals.lisp
@@ -26,7 +26,7 @@
 		  *software-interrupt-vector* *load-verbose*
 		  *load-print-stuff* *in-compilation-unit*
 		  *aborted-compilation-unit-count* *char-name-alist*
-		  *beep-function* *gc-notify-before* *gc-notify-after*
+		  *gc-notify-before* *gc-notify-after*
 		  *posix-argv*))
 
 (declaim (ftype (function * *)
@@ -34,7 +34,7 @@
 		assert-prompt check-type-error case-body-error print-object
 		describe-object sb!pcl::check-wrapper-validity))
 
-;;; Gray streams functions not defined until after PCL is loaded.
+;;; Gray streams functions not defined until after PCL is loaded
 (declaim (ftype (function * *)
 		stream-advance-to-column stream-clear-input
 		stream-clear-output stream-finish-output stream-force-output