summaryrefslogtreecommitdiff
path: root/Lisp/reader-syntax.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'Lisp/reader-syntax.lisp')
-rw-r--r--Lisp/reader-syntax.lisp13
1 files changed, 0 insertions, 13 deletions
diff --git a/Lisp/reader-syntax.lisp b/Lisp/reader-syntax.lisp
index a8a4978..18174d2 100644
--- a/Lisp/reader-syntax.lisp
+++ b/Lisp/reader-syntax.lisp
@@ -20,19 +20,6 @@
(defvar *method-syntax-macro-chars* (list))
(defvar *bracket-syntax-macro-chars* (list))
-(defvar *readtable-stack* (list))
-
-
-(defun restore-readtable ()
- (when *readtable-stack*
- (setq *readtable* (pop *readtable-stack*)))
- (values))
-
-
-(defun save-readtable ()
- (push *readtable* *readtable-stack*)
- (setq *readtable* (copy-readtable *readtable*))
- (values))
(defun enable-method-syntax ()