aboutsummaryrefslogtreecommitdiff
path: root/src/interp/bootlex.lisp.pamphlet
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/bootlex.lisp.pamphlet')
-rw-r--r--src/interp/bootlex.lisp.pamphlet11
1 files changed, 0 insertions, 11 deletions
diff --git a/src/interp/bootlex.lisp.pamphlet b/src/interp/bootlex.lisp.pamphlet
index 925fe24f..db7eaece 100644
--- a/src/interp/bootlex.lisp.pamphlet
+++ b/src/interp/bootlex.lisp.pamphlet
@@ -467,17 +467,6 @@ or the chracters ?, !, ' or %"
(defun SPAD_ERROR_LOC (STR)
(format str "******** Boot Syntax Error detected ********"))
-(defun BUMPERRORCOUNT (KIND)
- (unless |$InteractiveMode|
- (LET ((INDEX (case KIND
- (|syntax| 0)
- (|precompilation| 1)
- (|semantic| 2)
- (T (ERROR "BUMPERRORCOUNT")))))
- (SETELT $SPAD_ERRORS INDEX (1+ (ELT $SPAD_ERRORS INDEX))))))
-
-
-
@
\eject
\begin{thebibliography}{99}