changes
authorbdemsky <bdemsky>
Sat, 24 Oct 2009 06:46:10 +0000 (06:46 +0000)
committerbdemsky <bdemsky>
Sat, 24 Oct 2009 06:46:10 +0000 (06:46 +0000)
Robust/src/Runtime/garbage.c

index 44f4024f87d380106e9a712ae3bdc41dd442c17a..6f9825253b6446e6a0879b00240f4c704debc251 100644 (file)
@@ -200,7 +200,13 @@ void fixtable(chashlistnode_t ** tc_table, chashlistnode_t **tc_list, cliststruc
          int length=ao->___length___;
          int i;
          SENQUEUE((void *)ao->___objlocation___, *((void **)&ao->___objlocation___));
+#ifdef STMARRAY
+         int lowindex=(ao->lowindex)/sizeof(void *);
+         int highindex=(ao->highindex+INDEXLENGTH)/sizeof(void *);
+         for(i=lowindex; i<highindex; i++) {
+#else
          for(i=0; i<length; i++) {
+#endif
            void *objptr=((void **)(((char *)&ao->___length___)+sizeof(int)))[i];
            SENQUEUE(objptr, ((void **)(((char *)&ao->___length___)+sizeof(int)))[i]);
          }