aboutsummaryrefslogtreecommitdiff
path: root/src/interp/wi1.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2009-10-31 23:35:17 +0000
committerdos-reis <gdr@axiomatics.org>2009-10-31 23:35:17 +0000
commit43e4aa26464a27fdd5d80272f72839653a0f6cf9 (patch)
treeeaf2ecc325c8a72b3c3a9c0ed8d936d1f11a9d5f /src/interp/wi1.boot
parent402e10d38c81689647ae1004c80acb9841798e9b (diff)
downloadopen-axiom-43e4aa26464a27fdd5d80272f72839653a0f6cf9.tar.gz
* interp/br-op2.boot (pairlis): Remove.
(modemap2Sig): Use pairList. * interp/compiler.boot (applyMapping): Likewise. * interp/database.boot (augLisplibModemapsFromCategory): Likewise. (getOplistForConstructorForm): Likewise. * interp/define.boot (compDefineCategory2): Likewise. (compDefineFunctor1): Likewise. (mkOpVec): Likewise. * interp/lisplib.boot (finalizeLisplib): Likewise. * interp/nruncomp.boot (mkSlot1sublis): Likewise. * interp/wi1.boot (compDefineCategory2): Likewise. * interp/wi2.boot (compDefineFunctor1): Likewise.
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",