blob: bffebad22d4e219dfe20f4876f6fed6f0de4d40b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
|
type node_type = Leaf | Tag | Other
type ref_node_data = {
node_type: node_type;
constraints: (Value_checker.value_constraint list);
help: string;
value_help: (string * string) list;
constraint_error_message: string;
multi: bool;
valueless: bool;
owner: string option;
keep_order: bool;
}
exception Validation_error of string
type t = ref_node_data Vytree.t
val default_data : ref_node_data
val load_from_xml : t -> string -> t
val validate_path : (string, string) Hashtbl.t -> t -> string list -> string list * string option
val is_multi : t -> string list -> bool
|
