external set : bytes ‑> int ‑> char ‑> unit = "%bytes_safe_set"
external unsafe_set : bytes ‑> int ‑> char ‑> unit = "%bytes_unsafe_set"