My agentic slop goes here. Not intended for anyone else!
anil.recoil.org
1(** JMAP Comparator for Sorting
2
3 Reference: RFC 8620 Section 5.5
4 Test files: test/data/core/request_query.json
5*)
6
7(** Comparator type *)
8type t
9
10(** {1 Accessors} *)
11
12val property : t -> string
13val is_ascending : t -> bool
14val collation : t -> string option
15
16(** {1 Constructor} *)
17
18val v :
19 ?is_ascending:bool ->
20 ?collation:string ->
21 property:string ->
22 unit ->
23 t
24
25(** Alias for constructor *)
26val make :
27 ?is_ascending:bool ->
28 ?collation:string ->
29 string ->
30 t
31
32(** {1 JSON Conversion} *)
33
34val of_json : Ezjsonm.value -> t
35val to_json : t -> Ezjsonm.value