diff options
author | dos-reis <gdr@axiomatics.org> | 2009-03-02 08:01:57 +0000 |
---|---|---|
committer | dos-reis <gdr@axiomatics.org> | 2009-03-02 08:01:57 +0000 |
commit | 4eff9ac27bbd21e51053b5366558c18e561ae0fd (patch) | |
tree | 204fadfc204f6c26a51610a764772776c47737b6 /src/interp/compiler.boot | |
parent | f2592f61b346e61ce99d3443f7533f7aa6bac643 (diff) | |
download | open-axiom-4eff9ac27bbd21e51053b5366558c18e561ae0fd.tar.gz |
* interp/compiler.boot (modeIsAggregateOf): Use RepIfRepHack.
* interp/g-opt.boot (optimizeFunctionDef): Tidy.
* interp/i-syscmd.boot (compileSpad2Cmd): Support ')report' option.
* interp/sys-driver.boot (initializeGlobalState): Likewise.
Diffstat (limited to 'src/interp/compiler.boot')
-rw-r--r-- | src/interp/compiler.boot | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/interp/compiler.boot b/src/interp/compiler.boot index 7f903248..b2906c81 100644 --- a/src/interp/compiler.boot +++ b/src/interp/compiler.boot @@ -2144,8 +2144,7 @@ modeIsAggregateOf(ListOrVector,m,e) == 1=#mList => first mList name:= m is [fn,:.] => fn - m="$" => "Rep" - m + RepIfRepHack m get(name,"value",e) is [[ =ListOrVector,R],:.] => [m,R] --% VECTOR ITERATORS |