From a34ef7a705f7029f6dd5d9ec9059179d28b7df72 Mon Sep 17 00:00:00 2001
From: ram <ram>
Date: Thu, 22 Feb 1990 10:46:54 +0000
Subject: [PATCH] Added FORCE-OUTPUT in DEBUG-PROMPT.  This brings us up to
 date with respect to the working code version as of this date.

---
 code/debug.lisp | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/code/debug.lisp b/code/debug.lisp
index 1b9f1457f..1c1d0c2e0 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*.")
-- 
GitLab