external get : string ‑> int ‑> char = "%string_safe_get"
external length : string ‑> int = "%string_length"
external unsafe_get : string ‑> int ‑> char = "%string_unsafe_get"
include Base__.String_set_primitives
external set : string ‑> int ‑> char ‑> unit = "%bytes_safe_set"
external unsafe_set : string ‑> int ‑> char ‑> unit = "%bytes_unsafe_set"