aboutsummaryrefslogtreecommitdiff
path: root/src/interp/g-util.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2011-02-24 18:06:28 +0000
committerdos-reis <gdr@axiomatics.org>2011-02-24 18:06:28 +0000
commit1f68c8c90efaf97535bfc1bfc99cad368213870e (patch)
treeb58a560a5e83f5dc73b3e5443e3a8bcabf5d0f19 /src/interp/g-util.boot
parent04608dfa938b011bce60031e7eccfb6cb67c2ced (diff)
downloadopen-axiom-1f68c8c90efaf97535bfc1bfc99cad368213870e.tar.gz
* interp/sys-macros.lisp (shellEntry): New.
* interp/g-util.boot (setShellEntry): Remove. * interp/compiler.boot: Use %store to %tref forms instead of setHSellEntry. * interp/define.boot: Likewise. * interp/functor.boot: Likewise. * interp/nruncomp.boot: Likewise. * interp/nrunfast.boot: Likewise. * interp/showimp.boot: Likewise. * interp/c-util.boot (isSimple): Tidy. (isSideEffectFree): Likewise. (updateCapsuleDirectory): Likewise.
Diffstat (limited to 'src/interp/g-util.boot')
-rw-r--r--src/interp/g-util.boot6
1 files changed, 0 insertions, 6 deletions
diff --git a/src/interp/g-util.boot b/src/interp/g-util.boot
index 17b6d459..9e0d7126 100644
--- a/src/interp/g-util.boot
+++ b/src/interp/g-util.boot
@@ -901,11 +901,5 @@ newShell: %Short -> SIMPLE_-ARRAY
newShell n ==
MAKE_-ARRAY(n,KEYWORD::INITIAL_-ELEMENT,nil)
-++ sets the nth nth entry of a domain shell to an item.
-setShellEntry: (%Shell,%Short,%Thing) -> %Thing
-setShellEntry(s,i,t) ==
- SVREF(s,i) := t
-
-
-- Push into the BOOT package when invoked in batch mode.
AxiomCore::$sysScope := '"BOOT"