-let enabled_gc = Gc.get()
-let disabled_gc = { Gc.get() with
- Gc.max_overhead = 1000000;
- Gc.space_overhead = 100 }
+let default_gc = Gc.get()
+let tuned_gc = { Gc.get() with
+ Gc.minor_heap_size = 4*1024*1024;
+ Gc.major_heap_increment = 1024*1024;
+ Gc.max_overhead = 1000000;
+ }