From 55893dcd3118428f046d5f539d80e9aa5345b885 Mon Sep 17 00:00:00 2001
From: dos-reis <gdr@axiomatics.org>
Date: Mon, 24 Mar 2008 11:47:01 +0000
Subject: Add support for SBCL and CLisp

---
 src/interp/g-util.boot | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'src/interp/g-util.boot')

diff --git a/src/interp/g-util.boot b/src/interp/g-util.boot
index 52c9a7fc..3bcb22da 100644
--- a/src/interp/g-util.boot
+++ b/src/interp/g-util.boot
@@ -729,8 +729,8 @@ gensymInt g ==
   n
 
 ++
-newDomainShell: %Short -> SIMPLE_-ARRAY
-newDomainShell n ==
+newShell: %Short -> SIMPLE_-ARRAY
+newShell n ==
   MAKE_-ARRAY(n,KEYWORD::INITIAL_-ELEMENT,nil)
 
 
-- 
cgit v1.2.3