From 9852c96d425eaad7f299ed36558930514a0487d3 Mon Sep 17 00:00:00 2001
From: dos-reis <gdr@axiomatics.org>
Date: Sun, 24 Apr 2011 20:42:47 +0000
Subject: 	* boot/initial-env.lisp (MEMQ): Remove. 	*
 boot/ast.boot (shoeATOMs): Don't use it. 	(isDynamicVariable): Likewise.
 	(shoeCompTran1): Likewise. 	* boot/translator.boot (defuse1):
 Likewise.

---
 src/boot/initial-env.lisp | 3 ---
 1 file changed, 3 deletions(-)

(limited to 'src/boot/initial-env.lisp')

diff --git a/src/boot/initial-env.lisp b/src/boot/initial-env.lisp
index 3496cdd8..0a9f8b7c 100644
--- a/src/boot/initial-env.lisp
+++ b/src/boot/initial-env.lisp
@@ -67,9 +67,6 @@
 ;; is called interactively.
 (defparameter |$InteractiveMode| nil)
 
-(defmacro memq (a b) 
-  `(member ,a ,b :test #'eq))
-
 (defvar *lisp-bin-filetype* "o")
 
 (defvar *lisp-source-filetype* "lisp")
-- 
cgit v1.2.3