aboutsummaryrefslogtreecommitdiff
path: root/src/interp/nruncomp.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2011-02-01 04:14:22 +0000
committerdos-reis <gdr@axiomatics.org>2011-02-01 04:14:22 +0000
commitf0d35b6faab7983de66e2127af4f4a67dc6acd59 (patch)
tree86895ff5a496ef29b6677b7e6d9d900fa1bccca4 /src/interp/nruncomp.boot
parentf1fe7d232e54727f76f7c550af0926487ce88f88 (diff)
downloadopen-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.boot4
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