external sys_exit : int -> 'a = "caml_sys_exit"