blob: d4ae516d21c18d6e98ca7b861d86818c281b4c4c (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
(*type value_constraint = Regex of string | External of string * string option*)
type value_constraint =
| Regex of string [@name "regex"]
| External of string * string option [@name "exec"]
[@@deriving yojson]
exception Bad_validator of string
val validate_value : string -> Buffer.t -> value_constraint -> string -> bool
val validate_any : string -> value_constraint list -> string -> string option
val validate_all : string -> value_constraint list -> string -> string option
|
