let to_ascii t =
  let x = t + offset in
  if 33 <= x && x <= 126 then
    Char.of_int_exn x
  else
    Error (sprintf "%d cannot be encoded as a visible ASCII character" t) |> raise