From d051b81d80dc2d406b1dfe4897253f4461d9cec3 Mon Sep 17 00:00:00 2001
From: Justin Ethier <justin.ethier@gmail.com>
Date: Wed, 5 Feb 2020 17:55:24 -0500
Subject: [PATCH] Added more GC trace logging

---
 gc.c | 12 ++++++++++++
 1 file changed, 12 insertions(+)

diff --git a/gc.c b/gc.c
index 72506218..9dcae32d 100644
--- a/gc.c
+++ b/gc.c
@@ -1177,6 +1177,9 @@ hrt_log_delta("gc sweep", tstamp);
 #endif
       h_passed->num_unswept_children--;
       if (!keep) {
+#if GC_DEBUG_TRACE
+  fprintf(stderr, "heap %p marked for deletion\n", h);
+#endif
         // Heap marked for deletion, remove it and keep searching
         gc_heap *freed = gc_heap_free(h, h_prev);
         if (freed) {
@@ -1213,6 +1216,9 @@ hrt_log_delta("gc sweep", tstamp);
     } else {
       // TODO: else, assign heap full? YES for fixed-size, for REST maybe not??
       h->is_full = 1;
+#if GC_DEBUG_TRACE
+  fprintf(stderr, "heap %p is full\n", h);
+#endif
     }
   }
   return result;
@@ -1297,6 +1303,9 @@ hrt_log_delta("gc sweep fixed size", tstamp);
 #endif
       h_passed->num_unswept_children--;
       if (!keep) {
+#if GC_DEBUG_TRACE
+  fprintf(stderr, "heap %p marked for deletion\n", h);
+#endif
         // Heap marked for deletion, remove it and keep searching
         gc_heap *freed = gc_heap_free(h, h_prev);
         if (freed) {
@@ -1318,6 +1327,9 @@ hrt_log_delta("gc sweep fixed size", tstamp);
     } else {
       // TODO: else, assign heap full? YES for fixed-size, for REST maybe not??
       h->is_full = 1;
+#if GC_DEBUG_TRACE
+  fprintf(stderr, "heap %p is full\n", h);
+#endif
     }
   }
   return result;