1use crate::{Char, Value};
2
3extern "C" {
4 pub fn caml_raise(bucket: Value);
5 pub fn caml_raise_constant(tag: Value);
6 pub fn caml_raise_with_arg(tag: Value, arg: Value);
7 pub fn caml_raise_with_args(tag: Value, nargs: i32, arg: *mut Value);
8 pub fn caml_raise_with_string(tag: Value, msg: *const Char);
9 pub fn caml_failwith(msg: *const Char);
10 pub fn caml_failwith_value(msg: Value);
11 pub fn caml_invalid_argument(msg: *const Char);
12 pub fn caml_invalid_argument_value(msg: Value);
13 pub fn caml_raise_out_of_memory();
14 pub fn caml_raise_stack_overflow();
15 pub fn caml_raise_sys_error(arg1: Value);
16 pub fn caml_raise_end_of_file();
17 pub fn caml_raise_zero_divide();
18 pub fn caml_raise_not_found();
19 pub fn caml_array_bound_error();
20 pub fn caml_raise_sys_blocked_io();
21}