sig type error = Empty_name | Invalid_character of char exception Exception of OutputName.error type t = private string val make : string -> OutputName.t end