diff options
Diffstat (limited to 'src/interp/bootlex.lisp.pamphlet')
| -rw-r--r-- | src/interp/bootlex.lisp.pamphlet | 11 |
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} |