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