X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=inline;f=src%2Fcode%2Finspect.lisp;h=f143295fd155b0e257bb32141a4eb6af19689401;hb=ec735ab75335c1744b39190314142a7e6f1ecdb3;hp=2fe8ca224baf392285a37fcb8e80b65a9e0b72cd;hpb=1bfc464c657a8f4ad24ef612f76a38d8f6f1bbad;p=sbcl.git

diff --git a/src/code/inspect.lisp b/src/code/inspect.lisp
index 2fe8ca2..f143295 100644
--- a/src/code/inspect.lisp
+++ b/src/code/inspect.lisp
@@ -41,7 +41,7 @@ evaluated expressions.
 ")
 
 (defun %inspect (*inspected* s)
-  (named-let redisplay () ; "lambda, the ultimate GOTO":-|
+  (named-let redisplay () ; "LAMBDA, the ultimate GOTO":-|
     (multiple-value-bind (description named-p elements)
 	(inspected-parts *inspected*)
       (tty-display-inspected-parts description named-p elements s)