From 6661a9aa8e79dc934bde807293857f2dfc0eca6f Mon Sep 17 00:00:00 2001
From: dos-reis <gdr@axiomatics.org>
Date: Sat, 30 Apr 2011 09:42:31 +0000
Subject: cleanup

---
 src/interp/patches.lisp | 6 ------
 1 file changed, 6 deletions(-)

(limited to 'src/interp/patches.lisp')

diff --git a/src/interp/patches.lisp b/src/interp/patches.lisp
index fc117573..e49d0e7b 100644
--- a/src/interp/patches.lisp
+++ b/src/interp/patches.lisp
@@ -114,12 +114,6 @@
        (READSPADEXPR))
       (t (|parseTransform| (|postTransform| (|string2SpadTree| line)))))))
 
-#+(and :lucid (not :ibm/370))
- (define-function 'RUN-AIX-PROGRAM #'SYS:RUN-AIX-PROGRAM)
-;; following should be no longer necessary
-;; (eval-when (eval load compile) (shadow 'delete))
-;; (define-function 'boot::delete #'|delete|)
-
 ;; following are defined in spadtest.boot and stantest.boot
 (defun |installStandardTestPackages| () ())
 (defun |spadtestValueHook| (val type) ())
-- 
cgit v1.2.3