Skip to content

Commit 583e889

Browse files
committed
fix: comparison to current dummy index count in FunLevel
All other cases in FunLevel check if the dummy index code is > AN.IndDum, rather than >=. Fixing this comparison fixes Issue 710. Commit 079398e changes >= to > in all the other cases, presumably the INDEX case was missed by accident.
1 parent 37dc3b6 commit 583e889

File tree

2 files changed

+5
-1
lines changed

2 files changed

+5
-1
lines changed

sources/proces.c

Lines changed: 4 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -3619,6 +3619,10 @@ SkipCount: level++;
36193619
// If the term was modified by WildFill, set RepCount.
36203620
if ( term_changed ) *AN.RepPoint = 1;
36213621
AT.WorkPointer = ow;
3622+
// Most other calls to ReNumber reset AN.IndDum to AM.IndDum first. Here it is
3623+
// not done, but doing it is one way to fix Issue #710. The fix that is actually
3624+
// implemented is to change a comparison in FunLevel and then a reset of
3625+
// AN.IndDum appears unnecessary here. But maybe one day this comment is useful.
36223626
ReNumber(BHEAD term);
36233627
goto Renormalize;
36243628
}

sources/reshuf.c

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -222,7 +222,7 @@ void FunLevel(PHEAD WORD *term)
222222
else {
223223
if ( *t == -INDEX ) {
224224
t++;
225-
if ( *t >= AN.IndDum ) {
225+
if ( *t > AN.IndDum ) {
226226
if ( AN.NumFound >= AN.MaxRenumScratch ) AdjustRenumScratch(BHEAD0);
227227
AN.NumFound++;
228228
*AN.DumFound++ = *t;

0 commit comments

Comments
 (0)