From e669075246f815bf20b66bc57873c0cf27ac20b0 Mon Sep 17 00:00:00 2001 From: dos-reis Date: Thu, 6 Dec 2007 06:41:13 +0000 Subject: daily bump --- src/interp/patches.lisp | 11 ----------- 1 file changed, 11 deletions(-) (limited to 'src/interp/patches.lisp') 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))) -- cgit v1.2.3