X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fruntime%2Fgc-common.c;h=4d2ef2b222f98deb146a860315bf2484784e646a;hb=e4542bc034db18cf98f005b2dac53a6d7d5c7260;hp=251aa6a7b2394ec0b1b2324748c9882a0ad71176;hpb=be7adb92bf0012ab07adac2943e73772dfad7911;p=sbcl.git diff --git a/src/runtime/gc-common.c b/src/runtime/gc-common.c index 251aa6a..4d2ef2b 100644 --- a/src/runtime/gc-common.c +++ b/src/runtime/gc-common.c @@ -127,8 +127,8 @@ scavenge(lispobj *start, long n_words) lispobj *end = start + n_words; lispobj *object_ptr; long n_words_scavenged; - for (object_ptr = start; + for (object_ptr = start; object_ptr < end; object_ptr += n_words_scavenged) {