let
bin_read_int__ _sptr_ptr _eptr _vint =
Unsafe_read_c
.raise_variant_wrong_type
"int"