-
Notifications
You must be signed in to change notification settings - Fork 57
/
Copy pathtest_abstract_j.expected.mli
127 lines (99 loc) · 3.59 KB
/
test_abstract_j.expected.mli
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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
(* Auto-generated from "test_abstract.atd" *)
[@@@ocaml.warning "-27-32-33-35-39"]
type int_assoc_list = Testj.int_assoc_list
type any_items = Test_abstract_t.any_items
type any = Test_abstract_t.any
type 'x abs2 = 'x Testj.abs2
type 'x abs1 = 'x Testj.abs1
val write_int_assoc_list :
Buffer.t -> int_assoc_list -> unit
(** Output a JSON value of type {!type:int_assoc_list}. *)
val string_of_int_assoc_list :
?len:int -> int_assoc_list -> string
(** Serialize a value of type {!type:int_assoc_list}
into a JSON string.
@param len specifies the initial length
of the buffer used internally.
Default: 1024. *)
val read_int_assoc_list :
Yojson.Safe.lexer_state -> Lexing.lexbuf -> int_assoc_list
(** Input JSON data of type {!type:int_assoc_list}. *)
val int_assoc_list_of_string :
string -> int_assoc_list
(** Deserialize JSON data of type {!type:int_assoc_list}. *)
val write_any_items :
Buffer.t -> any_items -> unit
(** Output a JSON value of type {!type:any_items}. *)
val string_of_any_items :
?len:int -> any_items -> string
(** Serialize a value of type {!type:any_items}
into a JSON string.
@param len specifies the initial length
of the buffer used internally.
Default: 1024. *)
val read_any_items :
Yojson.Safe.lexer_state -> Lexing.lexbuf -> any_items
(** Input JSON data of type {!type:any_items}. *)
val any_items_of_string :
string -> any_items
(** Deserialize JSON data of type {!type:any_items}. *)
val write_abs2 :
(Buffer.t -> 'x -> unit) ->
Buffer.t -> 'x abs2 -> unit
(** Output a JSON value of type {!type:abs2}. *)
val string_of_abs2 :
(Buffer.t -> 'x -> unit) ->
?len:int -> 'x abs2 -> string
(** Serialize a value of type {!type:abs2}
into a JSON string.
@param len specifies the initial length
of the buffer used internally.
Default: 1024. *)
val read_abs2 :
(Yojson.Safe.lexer_state -> Lexing.lexbuf -> 'x) ->
Yojson.Safe.lexer_state -> Lexing.lexbuf -> 'x abs2
(** Input JSON data of type {!type:abs2}. *)
val abs2_of_string :
(Yojson.Safe.lexer_state -> Lexing.lexbuf -> 'x) ->
string -> 'x abs2
(** Deserialize JSON data of type {!type:abs2}. *)
val write_abs1 :
(Buffer.t -> 'x -> unit) ->
Buffer.t -> 'x abs1 -> unit
(** Output a JSON value of type {!type:abs1}. *)
val string_of_abs1 :
(Buffer.t -> 'x -> unit) ->
?len:int -> 'x abs1 -> string
(** Serialize a value of type {!type:abs1}
into a JSON string.
@param len specifies the initial length
of the buffer used internally.
Default: 1024. *)
val read_abs1 :
(Yojson.Safe.lexer_state -> Lexing.lexbuf -> 'x) ->
Yojson.Safe.lexer_state -> Lexing.lexbuf -> 'x abs1
(** Input JSON data of type {!type:abs1}. *)
val abs1_of_string :
(Yojson.Safe.lexer_state -> Lexing.lexbuf -> 'x) ->
string -> 'x abs1
(** Deserialize JSON data of type {!type:abs1}. *)
(** {3 Generic Modules } *)
module Any_items : sig
type nonrec t = any_items
val write :
Buffer.t -> any_items -> unit
(** Output a JSON value of type {!type:any_items}. *)
val to_string :
?len:int -> any_items -> string
(** Serialize a value of type {!type:any_items}
into a JSON string.
@param len specifies the initial length
of the buffer used internally.
Default: 1024. *)
val read :
Yojson.Safe.lexer_state -> Lexing.lexbuf -> any_items
(** Input JSON data of type {!type:any_items}. *)
val of_string :
string -> any_items
(** Deserialize JSON data of type {!type:any_items}. *)
end