gasman: use IS_BAG_BODY in CallbackForAllBags

gap-system · Jan 8, 2018 · 43a61ec · 43a61ec
1 parent d88b829
commit 43a61ec
Showing 1 changed file with 6 additions and 8 deletions.
diff --git a/src/gasman.c b/src/gasman.c
@@ -672,15 +672,13 @@ void MarkBagWeakly(Bag bag)
 **  walking the masterpointer area. Not terribly safe.
 **
 */
-void CallbackForAllBags(
-     void (*func)(Bag) )
+void CallbackForAllBags(void (*func)(Bag))
 {
-  Bag ptr;
-  for (ptr = (Bag)MptrBags; ptr < (Bag)OldBags; ptr ++)
-    if (*ptr != 0 && !IS_WEAK_DEAD_BAG(ptr) && (Bag)(*ptr) >= (Bag)OldBags)
-      {
-        (*func)(ptr);
-      }
+    for (Bag bag = (Bag)MptrBags; bag < (Bag)OldBags; bag++) {
+        if (IS_BAG_BODY(*bag)) {
+            (*func)(bag);
+        }
+    }
 }