aboutsummaryrefslogtreecommitdiff
path: root/src/interp/wi1.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/wi1.boot')
-rw-r--r--src/interp/wi1.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/wi1.boot b/src/interp/wi1.boot
index 1d987854..f97716eb 100644
--- a/src/interp/wi1.boot
+++ b/src/interp/wi1.boot
@@ -1225,7 +1225,7 @@ compDefineCategory2(form,signature,specialCases,body,m,e,
fun:= compile [op',['LAM,sargl,body]]
-- 5. give operator a 'modemap property
- pairlis:= [[a,:v] for a in argl for v in $FormalMapVariableList]
+ pairlis:= pairList(argl,$FormalMapVariableList)
parSignature:= SUBLIS(pairlis,signature')
parForm:= SUBLIS(pairlis,form)
---- lisplibWrite('"compilerInfo",