* gc.c (make_obj, gc): Move resetting of prev_malloc_bytes

out of make_obj into gc.

2 files changed, 6 insertions, 2 deletions

diff --git a/ChangeLog b/ChangeLog
index cbbca10c..90a5304b 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2015-05-06  Kaz Kylheku  <kaz@kylheku.com>
+
+	* gc.c (make_obj, gc): Move resetting of prev_malloc_bytes
+	out of make_obj into gc.
+
 2015-05-05  Kaz Kylheku  <kaz@kylheku.com>
 
 	Do some cleanup in progn-like form sequences.
diff --git a/gc.c b/gc.c
index a553a81c..4965066a 100644
--- a/gc.c
+++ b/gc.c
@@ -174,7 +174,6 @@ val make_obj(void)
       gc_enabled)
   {
     gc();
-    prev_malloc_bytes = malloc_bytes;
   }
 
   if (freshobj_idx >= FRESHOBJ_VEC_SIZE)
@@ -182,7 +181,6 @@ val make_obj(void)
 #else
   if ((opt_gc_debug || malloc_delta >= opt_gc_delta) && gc_enabled) {
     gc();
-    prev_malloc_bytes = malloc_bytes;
   }
 #endif
 
@@ -695,6 +693,7 @@ void gc(void)
 #endif
   call_finals();
   gc_enabled = 1;
+  prev_malloc_bytes = malloc_bytes;
 }
 
 int gc_state(int enabled)