diff options
| author | dos-reis <gdr@axiomatics.org> | 2007-11-05 01:51:35 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2007-11-05 01:51:35 +0000 |
| commit | 259d1b019dabdf6a0c2b40cabaf013afcbc582ac (patch) | |
| tree | c368f6f5fbb7709667a28af3b352bad5ce603c97 /src/interp/i-util.boot.pamphlet | |
| parent | d3ec46dd9a15a12b6456c70b9e92ab0a780adacf (diff) | |
| download | open-axiom-259d1b019dabdf6a0c2b40cabaf013afcbc582ac.tar.gz | |
* Makefile.pamphlet (iterator.$(FASLEXT)): New rule.
(modemap.$(FASLEXT)): Likewise.
(info.$(FASLEXT)): Likewise.
(msgdb.$(FASLEXT)): Likewise.
(<<info.clisp>>): Remove.
(<<iterator.clisp>>): Likewise.
(<<modemap.clisp>>): Likewise.
(<<msgdb.clisp>>): Likewise.
* c-util.boot (intersectionContour): Change setIntersection to
intersection. Change SetUnion to union.
* database.boot (insertModemap): Move to modemap.boot.pamphlet.
* i-util.boot.pamphlet (addModemap): Likewise.
* info.boot.pamphlet: Push into package "BOOT". Fix syntax.
* iterator.boot.pamphlet: Push into package "BOOT".
* modemap.boot.pamphlet: Likewise.
* msgdb.boot.pamphlet: Push into package "BOOT". Fix syntax.
* sys-globals.boot (*BUILD-VERSION*): Define.
(*YEARWEEK*): Likewise.
Diffstat (limited to 'src/interp/i-util.boot.pamphlet')
| -rw-r--r-- | src/interp/i-util.boot.pamphlet | 9 |
1 files changed, 0 insertions, 9 deletions
diff --git a/src/interp/i-util.boot.pamphlet b/src/interp/i-util.boot.pamphlet index c0d785da..899cc18f 100644 --- a/src/interp/i-util.boot.pamphlet +++ b/src/interp/i-util.boot.pamphlet @@ -189,15 +189,6 @@ HasSignature(domain,[op,sig]) == makeInitialModemapFrame() == COPY $InitialModemapFrame -addModemap(op,mc,sig,pred,fn,$e) == - $InteractiveMode => $e - if knownInfo pred then pred:=true - $insideCapsuleFunctionIfTrue=true => - $CapsuleModemapFrame := - addModemap0(op,mc,sig,pred,fn,$CapsuleModemapFrame) - $e - addModemap0(op,mc,sig,pred,fn,$e) - isCapitalWord x == (y := PNAME x) and and/[UPPER_-CASE_-P y.i for i in 0..MAXINDEX y] |