diff options
| author | Damien Doligez <damien.doligez-inria.fr> | 2002-01-18 15:13:26 +0000 |
|---|---|---|
| committer | Damien Doligez <damien.doligez-inria.fr> | 2002-01-18 15:13:26 +0000 |
| commit | 09a8c6bc78f4a84c99b68baef2a1dfb10b8c4a4e (patch) | |
| tree | 5af49766e2f79faac1b5cd24b6fe7e3247ed82dc /byterun/gc_ctrl.c | |
| parent | e0c8e458d294b4d6bfeafcaba75ebede3dc22b5a (diff) | |
configure: suppression "smart preprocessing" pour MacOS X
asmrun/roots.c, byterun/alloc.c, byterun/gc_ctrl.c, byterun/minor_gc.c,
byterun/minor_gc.h, byterun/roots.c, byterun/startup.c:
derecursivation du GC mineur
byterun/config.h, stdlib/gc.mli: compactage active par defaut (300%)
otherlibs/unix/select.c: ajout include MacOS X
.cvsignore: bricoles
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@4264 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'byterun/gc_ctrl.c')
| -rw-r--r-- | byterun/gc_ctrl.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/byterun/gc_ctrl.c b/byterun/gc_ctrl.c index 1871d8cc2..6d945359e 100644 --- a/byterun/gc_ctrl.c +++ b/byterun/gc_ctrl.c @@ -207,7 +207,7 @@ static value heap_stats (int returnstats) double majwords = stat_major_words + (double) allocated_words; long mincoll = stat_major_collections; long majcoll = stat_minor_collections; - long heapsz = stat_heap_size; + long heap_words = Wsize_bsize (stat_heap_size); long cpct = stat_compactions; res = alloc_tuple (14); @@ -216,7 +216,7 @@ static value heap_stats (int returnstats) Store_field (res, 2, copy_double (majwords)); Store_field (res, 3, Val_long (mincoll)); Store_field (res, 4, Val_long (majcoll)); - Store_field (res, 5, Val_long (heapsz)); + Store_field (res, 5, Val_long (heap_words)); Store_field (res, 6, Val_long (heap_chunks)); Store_field (res, 7, Val_long (live_words)); Store_field (res, 8, Val_long (live_blocks)); |