commons/backtrace_c.c

   1 #include "caml/mlvalues.h"
   2
   3 CAMLextern void caml_print_exception_backtrace(void);
   4
   5 CAMLprim value print_exception_backtrace_stub(value /*__unused*/ unit)
   6 {
   7   caml_print_exception_backtrace();
   8   return Val_unit;
   9 }