From 431bfaa2ee046f519715d1aa51b74f05eba74f87 Mon Sep 17 00:00:00 2001
From: dos-reis <gdr@axiomatics.org>
Date: Mon, 3 Nov 2008 19:15:35 +0000
Subject: 	* interp/br-data.boot: Remove uses of BOUNDP. 	*
 interp/br-op1.boot: Likewise. 	* interp/c-doc.boot: Likewise. 	*
 interp/functor.boot: Likewise. 	* interp/category.boot: Likewise. 
 * interp/g-cndata.boot: Likewise. 	* interp/i-util.boot: Likewise. 
 * interp/lisplib.boot: Likewise. 	* interp/mark.boot: Likewise. 	*
 interp/wi1.boot: Likewise. 	* interp/wi2.boot: Likewise.

---
 src/interp/category.boot | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/interp/category.boot')

diff --git a/src/interp/category.boot b/src/interp/category.boot
index 63e42c75..20a4c686 100644
--- a/src/interp/category.boot
+++ b/src/interp/category.boot
@@ -573,7 +573,7 @@ JoinInner(l,$e) ==
 
 Join(:l) ==
   e :=
-    (not BOUNDP '$e) or null $e or $InteractiveMode => $CategoryFrame
+    null $e or $InteractiveMode => $CategoryFrame
     $e
   JoinInner(l, e)
  
-- 
cgit v1.2.3