exception T of string

val exn : pos:Tiger_position.t -> string -> 'a