Skip to content

Commit 36450e7

Browse files
committed
Fix parameter to Remove_Series
The "n" to Remove_Series should be the number of elements to be removed from the series, not the size of the element in bytes, as the width of the series is sizeof(REBSER *) (See Init_Memory in m-gc.c) It should only remove the series in question.
1 parent d62ab79 commit 36450e7

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

src/core/m-gc.c

+1-1
Original file line numberDiff line numberDiff line change
@@ -771,7 +771,7 @@ static void Mark_Series(REBSER *series, REBCNT depth);
771771
sp = (REBSER **)GC_Series->data;
772772
for (n = 0; n < SERIES_TAIL(GC_Series); n++) {
773773
if (sp[n] == series) {
774-
Remove_Series(GC_Series, n, sizeof(REBSER *));
774+
Remove_Series(GC_Series, n, 1);
775775
break;
776776
}
777777
}

0 commit comments

Comments
 (0)