diff options
Diffstat (limited to 'src/interp/patches.lisp')
-rw-r--r-- | src/interp/patches.lisp | 11 |
1 files changed, 0 insertions, 11 deletions
diff --git a/src/interp/patches.lisp b/src/interp/patches.lisp index 5f68687b..6d599002 100644 --- a/src/interp/patches.lisp +++ b/src/interp/patches.lisp @@ -371,17 +371,6 @@ ;; (|xdrRead| xfoo (make-array 10 :element-type 'long-float )) ;; (setq *print-array* NIL) -;; clearParserMacro has problems as boot code (package notation) -;; defined here in Lisp -;;--------------------> NEW DEFINITION (see i-syscmd.boot.pamphlet) -(DEFUN |clearParserMacro| (|macro|) - (PROG () - (RETURN (COND - ((NULL (IFCDR (|assoc| |macro| |$pfMacros|))) NIL) - ((QUOTE T) (SPADLET |$pfMacros| - (REMALIST |$pfMacros| |macro|))))))) -; - (setq /MAJOR-VERSION 2) (setq echo-meta nil) (defun /versioncheck (n) (unless (= n /MAJOR-VERSION) (throw 'versioncheck -1))) |