appeler les fonctions de finalisation apres compactage

git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@6207 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
master
Damien Doligez 2004-04-15 15:00:27 +00:00
parent ebc03c1000
commit f428d9a90d
1 changed files with 1 additions and 0 deletions

View File

@ -434,6 +434,7 @@ CAMLprim value caml_gc_compaction(value v)
caml_finish_major_cycle (); caml_finish_major_cycle ();
caml_finish_major_cycle (); caml_finish_major_cycle ();
caml_compact_heap (); caml_compact_heap ();
caml_final_do_calls ();
return Val_unit; return Val_unit;
} }