diff options
Diffstat (limited to 'runtime/memprof.c')
| -rw-r--r-- | runtime/memprof.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/runtime/memprof.c b/runtime/memprof.c index 2f7413cf78..42e446027a 100644 --- a/runtime/memprof.c +++ b/runtime/memprof.c @@ -30,6 +30,7 @@ #include "caml/misc.h" #include "caml/compact.h" #include "caml/printexc.h" +#include "caml/eventlog.h" #define MT_STATE_SIZE 624 @@ -779,7 +780,7 @@ void caml_memprof_track_young(uintnat wosize, int from_caml, /* We can now restore the minor heap in the state needed by [Alloc_small_aux]. */ if (Caml_state->young_ptr - whsize < Caml_state->young_trigger) { - CAML_INSTR_INT("force_minor/memprof@", 1); + CAML_EV_COUNTER(EV_C_FORCE_MINOR_MEMPROF, 1); caml_gc_dispatch(); } |