aboutsummaryrefslogtreecommitdiff
path: root/src/interp/interop.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2010-05-08 14:20:57 +0000
committerdos-reis <gdr@axiomatics.org>2010-05-08 14:20:57 +0000
commit9306af57a53ceace77f8f0cfea65f6ceed76d5c1 (patch)
tree5ec4343bb04a9868541dea01c08a3244e15a831d /src/interp/interop.boot
parent9ede6cd0b5be47c119455a8df1bc41cb56e2f5ff (diff)
downloadopen-axiom-9306af57a53ceace77f8f0cfea65f6ceed76d5c1.tar.gz
* boot/parser.boot (bpArgumentList): New.
(bpParenthesizedApplication): Use it. New. (bpPrimary1): Use it to implement function call with explicit parenthesis as primary. (bpOperator): Remove. (bpAssignLHS): Rework. Allow field path after function call. * boot/translator.boot: Remove debugging statement. * interp/as.boot: Adjust to new syntax. * interp/br-con.boot: Likewise. * interp/br-data.boot: Likewise. * interp/c-doc.boot: Likewise. * interp/category.boot: Likewise. * interp/cattable.boot: Likewise. * interp/define.boot: Likewise. * interp/functor.boot: Likewise. * interp/g-util.boot: Likewise. * interp/interop.boot: Likewise. * interp/nrunopt.boot: Likewise. * interp/pspad1.boot: Likewise. * interp/setvars.boot: Likewise. * interp/trace.boot: Likewise.
Diffstat (limited to 'src/interp/interop.boot')
-rw-r--r--src/interp/interop.boot6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/interp/interop.boot b/src/interp/interop.boot
index 9e9b6581..48ed5ebd 100644
--- a/src/interp/interop.boot
+++ b/src/interp/interop.boot
@@ -139,13 +139,13 @@ closeOldAxiomFunctor(name) ==
lazyOldAxiomDomainLookupExport(domenv, self, op, sig, box, skipdefaults, env) ==
dom := instantiate domenv
- SPADCALL(rest dom, self, op, sig, box, skipdefaults, first(dom).3)
+ SPADCALL(rest dom, self, op, sig, box, skipdefaults, first dom.3)
lazyOldAxiomDomainHashCode(domenv, env) == first domenv
lazyOldAxiomDomainDevaluate(domenv, env) ==
dom := instantiate domenv
- SPADCALL(rest dom, first(dom).1)
+ SPADCALL(rest dom, first dom.1)
lazyOldAxiomAddChild(domenv, kid, env) ==
CONS($lazyOldAxiomDomainDispatch,domenv)
@@ -328,7 +328,7 @@ oldAxiomDomainHasCategory(domenv, cat, env) ==
HasCategory(domvec, devaluate cat)
oldAxiomDomainDevaluate(domenv, env) ==
- SExprToDName(rest(domenv).0, 'T)
+ SExprToDName(rest domenv.0, 'T)
oldAxiomAddChild(domenv, child, env) == CONS($oldAxiomDomainDispatch, domenv)