From 0d4f1ba18290e0b091f6cd6172f4e96156ed9ad2 Mon Sep 17 00:00:00 2001 From: David Allsopp Date: Fri, 4 Sep 2020 15:59:43 +0100 Subject: [PATCH] Guard caml_fatal_uncaught_exception with CAML_INTERNALS --- runtime/caml/printexc.h | 2 ++ 1 file changed, 2 insertions(+) diff --git a/runtime/caml/printexc.h b/runtime/caml/printexc.h index 92c5af536..8ae788b13 100644 --- a/runtime/caml/printexc.h +++ b/runtime/caml/printexc.h @@ -26,7 +26,9 @@ extern "C" { CAMLextern char * caml_format_exception (value); +#ifdef CAML_INTERNALS CAMLnoreturn_start void caml_fatal_uncaught_exception (value) CAMLnoreturn_end; +#endif /* CAML_INTERNALS */ #ifdef __cplusplus }