Commit | Line | Data |
---|---|---|
feec80c3 C |
1 | (****************************************************************************** |
2 | * Sexplib * | |
3 | * * | |
4 | * Copyright (C) 2005- Jane Street Holding, LLC * | |
5 | * Contact: opensource@janestreet.com * | |
6 | * WWW: http://www.janestreet.com/ocaml * | |
7 | * Author: Markus Mottl * | |
8 | * * | |
9 | * This library is free software; you can redistribute it and/or * | |
10 | * modify it under the terms of the GNU Lesser General Public * | |
11 | * License as published by the Free Software Foundation; either * | |
12 | * version 2 of the License, or (at your option) any later version. * | |
13 | * * | |
14 | * This library is distributed in the hope that it will be useful, * | |
15 | * but WITHOUT ANY WARRANTY; without even the implied warranty of * | |
16 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU * | |
17 | * Lesser General Public License for more details. * | |
18 | * * | |
19 | * You should have received a copy of the GNU Lesser General Public * | |
20 | * License along with this library; if not, write to the Free Software * | |
21 | * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA * | |
22 | * * | |
23 | ******************************************************************************) | |
24 | ||
25 | val register : exn -> string -> unit | |
26 | ||
27 | val register1 : | |
28 | ('a -> exn) | |
29 | -> string | |
30 | -> ('a -> Sexp.t) | |
31 | -> unit | |
32 | ||
33 | val register2 : | |
34 | ('a -> 'b -> exn) | |
35 | -> string | |
36 | -> ('a -> Sexp.t) | |
37 | -> ('b -> Sexp.t) | |
38 | -> unit | |
39 | ||
40 | val register3 : | |
41 | ('a -> 'b -> 'c -> exn) | |
42 | -> string | |
43 | -> ('a -> Sexp.t) | |
44 | -> ('b -> Sexp.t) | |
45 | -> ('c -> Sexp.t) | |
46 | -> unit | |
47 | ||
48 | val register4 : | |
49 | ('a -> 'b -> 'c -> 'd -> exn) | |
50 | -> string | |
51 | -> ('a -> Sexp.t) | |
52 | -> ('b -> Sexp.t) | |
53 | -> ('c -> Sexp.t) | |
54 | -> ('d -> Sexp.t) | |
55 | -> unit | |
56 | ||
57 | val register5 : | |
58 | ('a -> 'b -> 'c -> 'd -> 'e -> exn) | |
59 | -> string | |
60 | -> ('a -> Sexp.t) | |
61 | -> ('b -> Sexp.t) | |
62 | -> ('c -> Sexp.t) | |
63 | -> ('d -> Sexp.t) | |
64 | -> ('e -> Sexp.t) | |
65 | -> unit | |
66 | ||
67 | val register6 : | |
68 | ('a -> 'b -> 'c -> 'd -> 'e -> 'f -> exn) | |
69 | -> string | |
70 | -> ('a -> Sexp.t) | |
71 | -> ('b -> Sexp.t) | |
72 | -> ('c -> Sexp.t) | |
73 | -> ('d -> Sexp.t) | |
74 | -> ('e -> Sexp.t) | |
75 | -> ('f -> Sexp.t) | |
76 | -> unit | |
77 | ||
78 | val register7 : | |
79 | ('a -> 'b -> 'c -> 'd -> 'e -> 'f -> 'g -> exn) | |
80 | -> string | |
81 | -> ('a -> Sexp.t) | |
82 | -> ('b -> Sexp.t) | |
83 | -> ('c -> Sexp.t) | |
84 | -> ('d -> Sexp.t) | |
85 | -> ('e -> Sexp.t) | |
86 | -> ('f -> Sexp.t) | |
87 | -> ('g -> Sexp.t) | |
88 | -> unit | |
89 | ||
90 | val register8 : | |
91 | ('a -> 'b -> 'c -> 'd -> 'e -> 'f -> 'g -> 'h -> exn) | |
92 | -> string | |
93 | -> ('a -> Sexp.t) | |
94 | -> ('b -> Sexp.t) | |
95 | -> ('c -> Sexp.t) | |
96 | -> ('d -> Sexp.t) | |
97 | -> ('e -> Sexp.t) | |
98 | -> ('f -> Sexp.t) | |
99 | -> ('g -> Sexp.t) | |
100 | -> ('h -> Sexp.t) | |
101 | -> unit | |
102 | ||
103 | val register9 : | |
104 | ('a -> 'b -> 'c -> 'd -> 'e -> 'f -> 'g -> 'h -> 'i -> exn) | |
105 | -> string | |
106 | -> ('a -> Sexp.t) | |
107 | -> ('b -> Sexp.t) | |
108 | -> ('c -> Sexp.t) | |
109 | -> ('d -> Sexp.t) | |
110 | -> ('e -> Sexp.t) | |
111 | -> ('f -> Sexp.t) | |
112 | -> ('g -> Sexp.t) | |
113 | -> ('h -> Sexp.t) | |
114 | -> ('i -> Sexp.t) | |
115 | -> unit | |
116 | ||
117 | val register10 : | |
118 | ('a -> 'b -> 'c -> 'd -> 'e -> 'f -> 'g -> 'h -> 'i -> 'j -> exn) | |
119 | -> string | |
120 | -> ('a -> Sexp.t) | |
121 | -> ('b -> Sexp.t) | |
122 | -> ('c -> Sexp.t) | |
123 | -> ('d -> Sexp.t) | |
124 | -> ('e -> Sexp.t) | |
125 | -> ('f -> Sexp.t) | |
126 | -> ('g -> Sexp.t) | |
127 | -> ('h -> Sexp.t) | |
128 | -> ('i -> Sexp.t) | |
129 | -> ('j -> Sexp.t) | |
130 | -> unit |