aboutsummaryrefslogtreecommitdiff
path: root/src/interp/i-intern.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2011-04-29 09:51:00 +0000
committerdos-reis <gdr@axiomatics.org>2011-04-29 09:51:00 +0000
commit52889faf70db19459d18fd18123635479e7266d1 (patch)
treedd020d1d4dc6c245bdec5f7b6c2594d4e6f77a18 /src/interp/i-intern.boot
parent75b600291e154f55fe8d6d10658980315204ced2 (diff)
downloadopen-axiom-52889faf70db19459d18fd18123635479e7266d1.tar.gz
* boot/utility.boot (assocSymbol): New.
(applySubst): Likewise. Export. * boot/ast.boot: Use it. Remove SUBLIS and SUBLISLIS. * interp/ax.boot: Likewise. * interp/br-con.boot: Likewise. * interp/br-op1.boot: Likewise. * interp/br-op2.boot: Likewise. * interp/br-prof.boot: Likewise. * interp/br-saturn.boot: Likewise. * interp/buildom.boot: Likewise. * interp/c-doc.boot: Likewise. * interp/c-util.boot: Likewise. * interp/cattable.boot: Likewise. * interp/compiler.boot: Likewise.
Diffstat (limited to 'src/interp/i-intern.boot')
-rw-r--r--src/interp/i-intern.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/i-intern.boot b/src/interp/i-intern.boot
index b9c8eec9..1e3cfab2 100644
--- a/src/interp/i-intern.boot
+++ b/src/interp/i-intern.boot
@@ -309,7 +309,7 @@ signatureFromModemap m ==
pred = true => rest sig
pred.op in '(AND %and) =>
sl := [[a,:b] for [.,a,b] in rest pred]
- rest SUBLIS(sl,sig)
+ rest applySubst(sl,sig)
collectDefTypesAndPreds args ==
-- given an arglist to a DEF-like form, this function returns