diff options
Diffstat (limited to 'src/interp')
-rw-r--r-- | src/interp/spad.lisp | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/src/interp/spad.lisp b/src/interp/spad.lisp index 0ac5ef98..ffc41c90 100644 --- a/src/interp/spad.lisp +++ b/src/interp/spad.lisp @@ -289,8 +289,6 @@ (defun \,difference (x y) (- x y)) (defun \,max (x y) (max x y)) (defun \,min (x y) (min x y)) -;; This is used in the domain Boolean (BOOLEAN.NRLIB/code.lsp) -(defun |BooleanEquality| (x y) (if x y (null y))) (defun S-PROCESS (X) (let ((|$Index| 0) |