gen_string

Strings mix well-formed text with the malformed byte runs decoders must reject.

gen_string :: (r: *Rng) -> string