From a16ca4f74e97c4e47fa2c097c489df6e5d02da1f Mon Sep 17 00:00:00 2001 From: dtc <dtc> Date: Mon, 6 Sep 1999 06:47:22 +0000 Subject: [PATCH] Export *debug-readtable* from the DEBUG package. --- code/exports.lisp | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/code/exports.lisp b/code/exports.lisp index 1c4303645..bc6cd6673 100644 --- a/code/exports.lisp +++ b/code/exports.lisp @@ -5,7 +5,7 @@ ;;; Carnegie Mellon University, and has been placed in the public domain. ;;; (ext:file-comment - "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/exports.lisp,v 1.162 1999/03/08 18:03:18 pw Exp $") + "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/exports.lisp,v 1.163 1999/09/06 06:47:22 dtc Exp $") ;;; ;;; ********************************************************************** ;;; @@ -864,8 +864,9 @@ "*TRACE-PRINT-LENGTH*" "*TRACE-PRINT-LEVEL*" "*TRACED-FUNCTION-LIST*") (:export "*AUTO-EVAL-IN-FRAME*" "*DEBUG-PRINT-LENGTH*" - "*DEBUG-PRINT-LEVEL*" "*DEBUG-PROMPT*" "*FLUSH-DEBUG-ERRORS*" - "*HELP-LINE-SCROLL-COUNT*" "*IN-THE-DEBUGGER*" + "*DEBUG-PRINT-LEVEL*" "*DEBUG-PROMPT*" + "*DEBUG-READTABLE*" "*FLUSH-DEBUG-ERRORS*" + "*HELP-LINE-SCROLL-COUNT*" "*IN-THE-DEBUGGER*" "*MAX-TRACE-INDENTATION*" "*TRACE-FRAME*" "*TRACE-PRINT-LENGTH*" "*TRACE-PRINT-LEVEL*" "*TRACED-FUNCTION-LIST*" "ARG" "BACKTRACE" "INTERNAL-DEBUG" "VAR" "*PRINT-LOCATION-KIND*" -- GitLab