diff options
author | dos-reis <gdr@axiomatics.org> | 2011-02-01 04:14:22 +0000 |
---|---|---|
committer | dos-reis <gdr@axiomatics.org> | 2011-02-01 04:14:22 +0000 |
commit | f0d35b6faab7983de66e2127af4f4a67dc6acd59 (patch) | |
tree | 86895ff5a496ef29b6677b7e6d9d900fa1bccca4 /src/interp/nruncomp.boot | |
parent | f1fe7d232e54727f76f7c550af0926487ce88f88 (diff) | |
download | open-axiom-f0d35b6faab7983de66e2127af4f4a67dc6acd59.tar.gz |
* interp/g-opt.boot (optCallSpecially): Remove.
(optSpeciallCall): Likeise.
(optCall): Adjust.
(optCallEval): Move to wi2.boot, sole user.
Diffstat (limited to 'src/interp/nruncomp.boot')
-rw-r--r-- | src/interp/nruncomp.boot | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/nruncomp.boot b/src/interp/nruncomp.boot index 68169169..ddcbb16e 100644 --- a/src/interp/nruncomp.boot +++ b/src/interp/nruncomp.boot @@ -171,8 +171,8 @@ optDeltaEntry(op,sig,dc,eltOrConst) == atom dc and (dcval := get(dc,'value,$e)) => dcval.expr dc sig := MSUBST(ndc,dc,sig) - -- Don't bothe if the domain of computation is not an instantiation, - -- or is candidate for inlining. + -- Don't bother if the domain of computation is not an instantiation + -- nor a candidate for inlining. atom ndc or not optimizableDomain? ndc => nil fun := lookupDefiningFunction(op,sig,ndc) -- following code is to handle selectors like first, rest |