Source file warning.ml

1
2
3
4
5
6
type t =
  | Unsupported_feature of {
      feature : string;
      details : string option;
    }
  | Other of { message : string }