aboutsummaryrefslogtreecommitdiff
path: root/src/interp/nrunopt.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/nrunopt.boot')
-rw-r--r--src/interp/nrunopt.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/nrunopt.boot b/src/interp/nrunopt.boot
index ef33f475..c373e219 100644
--- a/src/interp/nrunopt.boot
+++ b/src/interp/nrunopt.boot
@@ -80,7 +80,7 @@ makeGoGetSlot(item,index) ==
--=======================================================================
--> called by getInfovecCode (see top of this file) from compDefineFunctor1
makeCompactDirect u ==
- $predListLength :local := LENGTH $NRTslot1PredicateList
+ $predListLength :local := # $NRTslot1PredicateList
$byteVecAcc: local := nil
[nam,[addForm,:opList]] := u
--pp opList