diff options
-rw-r--r-- | ChangeLog | 5 | ||||
-rw-r--r-- | gc.c | 3 |
2 files changed, 6 insertions, 2 deletions
@@ -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. @@ -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) |