PR#6919: corrupted final_table

Damien Doligez · Damien Doligez · commit 0c666ad6f664 · 2015-07-10T14:09:42.000Z
git-svn-id: http://caml.inria.fr/svn/ocaml/version/4.02@16197 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
diff --git a/Changes b/Changes
@@ -1,3 +1,10 @@
+OCaml 4.02.3:
+-------------
+
+Bug fixes:
+- PR#6919: corrupted final_table
+  (ygrek)
+
 OCaml 4.02.2:
 -------------
 
diff --git a/byterun/minor_gc.c b/byterun/minor_gc.c
@@ -259,6 +259,8 @@ void caml_empty_minor_heap (void)
     ++ caml_stat_minor_collections;
     caml_final_empty_young ();
     if (caml_minor_gc_end_hook != NULL) (*caml_minor_gc_end_hook) ();
+  }else{
+    caml_final_empty_young ();
   }
 #ifdef DEBUG
   {

Original file line number	Diff line number	Diff line change
`@@ -259,6 +259,8 @@ void caml_empty_minor_heap (void)`
`259`	`259`	`++ caml_stat_minor_collections;`
`260`	`260`	`caml_final_empty_young ();`
`261`	`261`	`if (caml_minor_gc_end_hook != NULL) (*caml_minor_gc_end_hook) ();`
	`262`	`+ }else{`
	`263`	`+ caml_final_empty_young ();`
`262`	`264`	`}`
`263`	`265`	`#ifdef DEBUG`
`264`	`266`	`{`