summaryrefslogtreecommitdiffstats
path: root/byterun/gc_ctrl.c
diff options
context:
space:
mode:
authorDamien Doligez <damien.doligez-inria.fr>2002-02-05 17:11:33 +0000
committerDamien Doligez <damien.doligez-inria.fr>2002-02-05 17:11:33 +0000
commit8ea64b58dcbafff1b20d1c25a342f595df82500e (patch)
tree970ac860b967777be0055598a17b30d39a70fca7 /byterun/gc_ctrl.c
parentaad8905de3937cc56a2fb0d54e5b42fbddd5c4e2 (diff)
byterun/finalise.c: support pour les lazy finalises
byterun/gc_ctrl.c: ajout Gc.major_slice byterun/major_gc.c: gros bug dans les valeurs finalisees + ajout Gc.major_slice byterun/major_gc.h: gros bug dans les valeurs finalisees + ajout Gc.major_slice byterun/memory.c: typo dans un commentaire byterun/minor_gc.c: petit bug, ajout Gc.major_slice parsing/parser.mly: plus de conflits; l'automate reste identique stdlib/gc.ml: ajout Gc.major_slice stdlib/gc.mli: ajout Gc.major_slice stdlib/sys.ml: ajout Sys.ocaml_version stdlib/sys.mli: ajout Sys.ocaml_version utils/config.mlp: ajout Sys.ocaml_version git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@4357 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'byterun/gc_ctrl.c')
-rw-r--r--byterun/gc_ctrl.c7
1 files changed, 7 insertions, 0 deletions
diff --git a/byterun/gc_ctrl.c b/byterun/gc_ctrl.c
index 7d6249057..b8e89c470 100644
--- a/byterun/gc_ctrl.c
+++ b/byterun/gc_ctrl.c
@@ -377,6 +377,13 @@ CAMLprim value gc_full_major(value v)
return Val_unit;
}
+CAMLprim value gc_major_slice (value v)
+{
+ Assert (Is_long (v));
+ empty_minor_heap ();
+ return Val_long (major_collection_slice (Long_val (v)));
+}
+
CAMLprim value gc_compaction(value v)
{ Assert (v == Val_unit);
empty_minor_heap ();