optimizer: fix bug

Repair a typo in b0f4a32049; thanks to Blake Johnson.
This commit is contained in:
Matthew Flatt 2014-09-05 21:10:16 -06:00
parent 79f7a642e1
commit 51d91032f5

View File

@ -3179,7 +3179,7 @@ static int *unresolve_stack_pop(Unresolve_Info *ui, int pos, int n)
if (n) {
f = (int *)scheme_malloc_atomic(sizeof(int) * n);
for (i = 0; i < n; i++) {
f[i] = ui->flags[pos + (n - i -i)];
f[i] = ui->flags[pos + (n - i - 1)];
}
ui->depth -= n;
} else