Permalink
Switch branches/tags
Nothing to show
Find file
Fetching contributors…
Cannot retrieve contributors at this time
9 lines (5 sloc) 199 Bytes
type 'a t
type match_result = Matched of string | Mismatched of string
val make : string -> ('a -> match_result) -> 'a t
val check : 'a -> 'a t -> match_result
val description_of : 'a t -> string