Deprecation
type t = {
since : string option;
note : string option;
}
val make : ?since:string -> ?note:string -> unit -> t
val create_warning : object_name:string -> warning_name:string -> ('b -> Pp.t) -> ?loc:Loc.t -> ('b * t) -> unit