type t = string option
val wrap : string -> string option
val unwrap : string CCOpt.t -> string