diff options
| author | Gabriel Dos Reis <gdr@axiomatics.org> | 2015-12-26 20:09:37 -0800 |
|---|---|---|
| committer | Gabriel Dos Reis <gdr@axiomatics.org> | 2015-12-26 20:10:26 -0800 |
| commit | ba0eeb3c591ebb8e51a5ea2679749e4ceca95e08 (patch) | |
| tree | 70d11889dc5f474598e78b5210af82cb5dec77cb /src/interp | |
| parent | d5011e370ab68f22c646683740e630193e8cd8d1 (diff) | |
| download | open-axiom-ba0eeb3c591ebb8e51a5ea2679749e4ceca95e08.tar.gz | |
Rename 'lastItem' to 'last'. Remove the macro definition.
Diffstat (limited to 'src/interp')
| -rw-r--r-- | src/interp/nruncomp.boot | 2 | ||||
| -rw-r--r-- | src/interp/sys-utility.boot | 4 |
2 files changed, 1 insertions, 5 deletions
diff --git a/src/interp/nruncomp.boot b/src/interp/nruncomp.boot index 99fa085a..761dd2a7 100644 --- a/src/interp/nruncomp.boot +++ b/src/interp/nruncomp.boot @@ -665,7 +665,7 @@ NRTputInLocalReferences(db,bod) == bod isnt [.,:.] => nil bod is ['SPADCALL,:.] => NRTputInTail(db,bod.args) - fn := lastItem bod.args + fn := last bod.args -- The following test allows function-returning expressions fn is [elt,dom,ind] and dom ~='$ and elt in '(ELT CONST) => k := assocIndex(db,dom) => lastNode(bod).first := ['%tref,'_$,k] diff --git a/src/interp/sys-utility.boot b/src/interp/sys-utility.boot index ce2b7838..c22a2d6f 100644 --- a/src/interp/sys-utility.boot +++ b/src/interp/sys-utility.boot @@ -379,10 +379,6 @@ displayTextFile f == stream ~= nil => closeStream stream --% -macro last x == - lastNode(x).first - ---% macro loopBody x == take(-2,x).first |