external unsafe_get_uint8 : string -> int -> int = "caml_extunix_get_u8"