diff options
Diffstat (limited to 'src/interp/wi2.boot.pamphlet')
-rw-r--r-- | src/interp/wi2.boot.pamphlet | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/wi2.boot.pamphlet b/src/interp/wi2.boot.pamphlet index 38601fea..e4dd5a8a 100644 --- a/src/interp/wi2.boot.pamphlet +++ b/src/interp/wi2.boot.pamphlet @@ -791,7 +791,7 @@ genDeltaEntry opMmPair == RPLACA(saveNRTdeltaListComp,compEntry) chk(saveNRTdeltaListComp,102) u := - [eltOrConst,'$,$NRTbase+$NRTdeltaLength-index] where index == + [eltOrConst,'$,$NRTbase+$NRTdeltaLength-index] where index() == (n:= POSN1(opModemapPair,$NRTdeltaList)) => n + 1 --n + 1 since $NRTdeltaLength is 1 too large $NRTdeltaList:= [opModemapPair,:$NRTdeltaList] |