diff --git a/code/debug.lisp b/code/debug.lisp
index 1b9f1457fc23bbb53c955a7ebd66266584e0e92b..1c1d0c2e0a9490553014d28ad6a7608e5d046682 100644
--- a/code/debug.lisp
+++ b/code/debug.lisp
@@ -54,7 +54,8 @@
    Otherwise, all locations are displayed.")
 
   "If true, list the code location type in the LIST-LOCATIONS command.")
-    (princ " ")))
+
+;;; A list of the types of code-locations that should not be stepped to and
 ;;; should not be listed when listing breakpoints.
 ;;;
   "A lambda of no args that prints the debugger prompt on *debug-io*.")