aboutsummaryrefslogtreecommitdiff
path: root/src/interp/modemap.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/modemap.boot')
-rw-r--r--src/interp/modemap.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/modemap.boot b/src/interp/modemap.boot
index 89fe9f48..ce3b64cc 100644
--- a/src/interp/modemap.boot
+++ b/src/interp/modemap.boot
@@ -340,7 +340,7 @@ substNames(domainName,viewName,functorForm,opalist) ==
[sel, viewName,if domainName = "$" then pos else
modemapform.mmTarget]]
for [:modemapform,[sel,"$",pos]] in
- EQSUBSTLIST(KDR functorForm,$FormalMapVariableList, opalist)]
+ applySubst(pairList($FormalMapVariableList,KDR functorForm),opalist)]
addConstructorModemaps(name,form is [functorName,:.],e) ==
$InteractiveMode: local:= nil