diff options
| author | dos-reis <gdr@axiomatics.org> | 2007-11-22 22:52:26 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2007-11-22 22:52:26 +0000 |
| commit | a849c01d4cb25ca4ff5e1a618b73e4d4b5603069 (patch) | |
| tree | ce7e6d2ddc80dabfc4f9ee9e01796f7caaae38a1 /src/interp/i-intern.boot | |
| parent | fcc7f11db9c755b9b58ce43d37bbe8a702af8ebf (diff) | |
| download | open-axiom-a849c01d4cb25ca4ff5e1a618b73e4d4b5603069.tar.gz | |
* i-analy.boot: Globally substtitue %noMapVal for noMapVal.
* i-intern.boot: Likewise.
* i-map.boot: Likewise.
* i-spec2.boot: Likewise.
* i-spec1.boot: Likewise.
Diffstat (limited to 'src/interp/i-intern.boot')
| -rw-r--r-- | src/interp/i-intern.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/i-intern.boot b/src/interp/i-intern.boot index 1253ebc8..37d8d72d 100644 --- a/src/interp/i-intern.boot +++ b/src/interp/i-intern.boot @@ -97,7 +97,7 @@ mkAtree1 x == null x => throwKeyedMsg("S2IP0005",['"NIL"]) VECP x => x atom x => - x in '(%noBranch noMapVal) => x + x in '(%noBranch %noMapVal) => x x in '(nil true false) => mkAtree2([x],x,NIL) x = '_/throwAway => -- don't want to actually compute this |