let
bin_write_string_ =
Unsafe_write_c
.bin_write_string