1 files changed, 2 insertions, 1 deletions
diff --git a/runtime/array.c b/runtime/array.c
index 64790423b4..37af6b7f60 100644
--- a/runtime/array.c
+++ b/runtime/array.c
@@ -23,6 +23,7 @@
 #include "caml/misc.h"
 #include "caml/mlvalues.h"
 #include "caml/signals.h"
+#include "caml/eventlog.h"
 /* Why is caml/spacetime.h included conditionnally sometimes and not here ? */
 #include "caml/spacetime.h"
 
@@ -320,7 +321,7 @@ CAMLprim value caml_make_vect(value len, value init)
       if (Is_block(init) && Is_young(init)) {
         /* We don't want to create so many major-to-minor references,
            so [init] is moved to the major heap by doing a minor GC. */
-        CAML_INSTR_INT ("force_minor/make_vect@", 1);
+        CAML_EV_COUNTER (EV_C_FORCE_MINOR_MAKE_VECT, 1);
         caml_minor_collection ();
       }
       CAMLassert(!(Is_block(init) && Is_young(init)));