only update fragmentation data for pages that are not lazily freed

d-netto · udesou · commit 82a15d58916a · 2025-05-07T02:35:34.000Z
diff --git a/src/gc-stock.c b/src/gc-stock.c
@@ -957,6 +957,7 @@ static void gc_sweep_page(gc_page_profiler_serializer_t *s, jl_gc_pool_t *p, jl_
 
 done:
     if (re_use_page) {
+        gc_update_page_fragmentation_data(pg);
         push_lf_back(allocd, pg);
     }
     else {
@@ -965,7 +966,6 @@ static void gc_sweep_page(gc_page_profiler_serializer_t *s, jl_gc_pool_t *p, jl_
         push_lf_back(&global_page_pool_lazily_freed, pg);
     }
     gc_page_profile_write_to_file(s);
-    gc_update_page_fragmentation_data(pg);
     gc_time_count_page(freedall, pg_skpd);
     jl_ptls_t ptls = jl_current_task->ptls;
     // Note that we aggregate the `pool_live_bytes` over all threads before returning this

Original file line number	Diff line number	Diff line change
`@@ -957,6 +957,7 @@ static void gc_sweep_page(gc_page_profiler_serializer_t s, jl_gc_pool_t p, jl_`
`957`	`957`
`958`	`958`	`done:`
`959`	`959`	`if (re_use_page) {`
	`960`	`+ gc_update_page_fragmentation_data(pg);`
`960`	`961`	`push_lf_back(allocd, pg);`
`961`	`962`	`}`
`962`	`963`	`else {`
`@@ -965,7 +966,6 @@ static void gc_sweep_page(gc_page_profiler_serializer_t s, jl_gc_pool_t p, jl_`
`965`	`966`	`push_lf_back(&global_page_pool_lazily_freed, pg);`
`966`	`967`	`}`
`967`	`968`	`gc_page_profile_write_to_file(s);`
`968`		`- gc_update_page_fragmentation_data(pg);`
`969`	`969`	`gc_time_count_page(freedall, pg_skpd);`
`970`	`970`	`jl_ptls_t ptls = jl_current_task->ptls;`
`971`	`971`	// Note that we aggregate the `pool_live_bytes` over all threads before returning this