let dump_optstr os =
  match os with | None -> "None" | Some s -> sprintf "%S" s