aboutsummaryrefslogtreecommitdiff
path: root/src/interp/lisplib.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/lisplib.boot')
-rw-r--r--src/interp/lisplib.boot3
1 files changed, 1 insertions, 2 deletions
diff --git a/src/interp/lisplib.boot b/src/interp/lisplib.boot
index 86512de3..9cd82943 100644
--- a/src/interp/lisplib.boot
+++ b/src/interp/lisplib.boot
@@ -438,8 +438,7 @@ finalizeLisplib libName ==
--lisplibWrite('"attributes",rest opsAndAtts,$libFile)
--if kind='category then NRTgenInitialAttributeAlist rest opsAndAtts
if kind='category then
- $pairlis : local := [[a,:v] for a in rest $lisplibForm
- for v in $FormalMapVariableList]
+ $pairlis : local := pairList($lisplibForm,$FormalMapVariableList)
$NRTslot1PredicateList : local := []
NRTgenInitialAttributeAlist rest opsAndAtts
lisplibWrite('"superDomain",removeZeroOne $lisplibSuperDomain,$libFile)