exception T of string

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