diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix shunting where it breaks variable order.

Browse Source
This commit is contained in:
Vitor Santos Costa 2009-03-24 00:17:59 +00:00
parent 58560d4f2c
commit 7769c33be7
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
C/heapgc.c
View File

@ -1186,7 +1186,7 @@ mark_variable(CELL_PTR current)
if (!MARKED_PTR(next)) { if (!MARKED_PTR(next)) {
if (IsVarTerm(cnext) && (CELL)next == cnext) { if (IsVarTerm(cnext) && (CELL)next == cnext) {
/* new global variable to new global variable */ /* new global variable to new global variable */
if (current < prev_HB && current >= HB && next >= HB && next < prev_HB) { if (next > current && current < prev_HB && current >= HB && next >= HB && next < prev_HB) {
#ifdef INSTRUMENT_GC #ifdef INSTRUMENT_GC
inc_var(current, current); inc_var(current, current);
#endif #endif