1
external raise : exn -> 'a = "%raise"
2
val invalid_arg : string -> 'a
3
val failwith : string -> 'a
5
external (=) : 'a -> 'a -> bool = "%equal"
6
external (<>) : 'a -> 'a -> bool = "%notequal"
7
external (<) : 'a -> 'a -> bool = "%lessthan"
8
external (>) : 'a -> 'a -> bool = "%greaterthan"
9
external (<=) : 'a -> 'a -> bool = "%lessequal"
10
external (>=) : 'a -> 'a -> bool = "%greaterequal"
11
external compare : 'a -> 'a -> int = "%compare"
12
val min : 'a -> 'a -> 'a
13
val max : 'a -> 'a -> 'a
14
external (==) : 'a -> 'a -> bool = "%eq"
15
external (!=) : 'a -> 'a -> bool = "%noteq"
16
external not : bool -> bool = "%boolnot"
17
external (&&) : bool -> bool -> bool = "%sequand"
18
external (&) : bool -> bool -> bool = "%sequand"
19
external (||) : bool -> bool -> bool = "%sequor"
20
external (or) : bool -> bool -> bool = "%sequor"
21
external (|>) : 'a -> ('a -> 'b) -> 'b = "%revapply"
22
external (@@) : ('a -> 'b) -> 'a -> 'b = "%apply"
23
external (~-) : int -> int = "%negint"
24
external (~+) : int -> int = "%identity"
25
external succ : int -> int = "%succint"
26
external pred : int -> int = "%predint"
27
external (+) : int -> int -> int = "%addint"
28
external (-) : int -> int -> int = "%subint"
29
external ( * ) : int -> int -> int = "%mulint"
30
external (/) : int -> int -> int = "%divint"
31
external (mod) : int -> int -> int = "%modint"
35
external (land) : int -> int -> int = "%andint"
36
external (lor) : int -> int -> int = "%orint"
37
external (lxor) : int -> int -> int = "%xorint"
39
external (lsl) : int -> int -> int = "%lslint"
40
external (lsr) : int -> int -> int = "%lsrint"
41
external (asr) : int -> int -> int = "%asrint"
42
external (~-.) : float -> float = "%negfloat"
43
external (~+.) : float -> float = "%identity"
44
external (+.) : float -> float -> float = "%addfloat"
45
external (-.) : float -> float -> float = "%subfloat"
46
external ( *. ) : float -> float -> float = "%mulfloat"
47
external (/.) : float -> float -> float = "%divfloat"
48
external ( ** ) : float -> float -> float = "caml_power_float" "pow" "float"
49
external sqrt : float -> float = "caml_sqrt_float" "sqrt" "float"
50
external exp : float -> float = "caml_exp_float" "exp" "float"
51
external log : float -> float = "caml_log_float" "log" "float"
52
external log10 : float -> float = "caml_log10_float" "log10" "float"
53
external expm1 : float -> float = "caml_expm1_float" "caml_expm1" "float"
54
external log1p : float -> float = "caml_log1p_float" "caml_log1p" "float"
55
external cos : float -> float = "caml_cos_float" "cos" "float"
56
external sin : float -> float = "caml_sin_float" "sin" "float"
57
external tan : float -> float = "caml_tan_float" "tan" "float"
58
external acos : float -> float = "caml_acos_float" "acos" "float"
59
external asin : float -> float = "caml_asin_float" "asin" "float"
60
external atan : float -> float = "caml_atan_float" "atan" "float"
61
external atan2 : float -> float -> float = "caml_atan2_float" "atan2" "float"
63
float -> float -> float = "caml_hypot_float" "caml_hypot" "float"
64
external cosh : float -> float = "caml_cosh_float" "cosh" "float"
65
external sinh : float -> float = "caml_sinh_float" "sinh" "float"
66
external tanh : float -> float = "caml_tanh_float" "tanh" "float"
67
external ceil : float -> float = "caml_ceil_float" "ceil" "float"
68
external floor : float -> float = "caml_floor_float" "floor" "float"
69
external abs_float : float -> float = "%absfloat"
71
float -> float -> float = "caml_copysign_float" "caml_copysign" "float"
73
float -> float -> float = "caml_fmod_float" "fmod" "float"
74
external frexp : float -> (float * int) = "caml_frexp_float"
75
external ldexp : float -> int -> float = "caml_ldexp_float"
76
external modf : float -> (float * float) = "caml_modf_float"
77
external float : int -> float = "%floatofint"
78
external float_of_int : int -> float = "%floatofint"
79
external truncate : float -> int = "%intoffloat"
80
external int_of_float : float -> int = "%intoffloat"
82
val neg_infinity : float
86
val epsilon_float : float
93
external classify_float : float -> fpclass = "caml_classify_float"
94
val (^) : string -> string -> string
95
external int_of_char : char -> int = "%identity"
96
val char_of_int : int -> char
97
external ignore : 'a -> unit = "%ignore"
98
val string_of_bool : bool -> string
99
val bool_of_string : string -> bool
100
val string_of_int : int -> string
101
external int_of_string : string -> int = "caml_int_of_string"
102
val string_of_float : float -> string
103
external float_of_string : string -> float = "caml_float_of_string"
104
external fst : ('a * 'b) -> 'a = "%field0"
105
external snd : ('a * 'b) -> 'b = "%field1"
106
val (@) : 'a list -> 'a list -> 'a list
109
val stdin : in_channel
110
val stdout : out_channel
111
val stderr : out_channel
112
val print_char : char -> unit
113
val print_string : string -> unit
114
val print_int : int -> unit
115
val print_float : float -> unit
116
val print_endline : string -> unit
117
val print_newline : unit -> unit
118
val prerr_char : char -> unit
119
val prerr_string : string -> unit
120
val prerr_int : int -> unit
121
val prerr_float : float -> unit
122
val prerr_endline : string -> unit
123
val prerr_newline : unit -> unit
124
val read_line : unit -> string
125
val read_int : unit -> int
126
val read_float : unit -> float
137
val open_out : string -> out_channel
138
val open_out_bin : string -> out_channel
139
val open_out_gen : open_flag list -> int -> string -> out_channel
140
val flush : out_channel -> unit
141
val flush_all : unit -> unit
142
val output_char : out_channel -> char -> unit
143
val output_string : out_channel -> string -> unit
144
val output : out_channel -> string -> int -> int -> unit
145
val output_byte : out_channel -> int -> unit
146
val output_binary_int : out_channel -> int -> unit
147
val output_value : out_channel -> 'a -> unit
148
val seek_out : out_channel -> int -> unit
149
val pos_out : out_channel -> int
150
val out_channel_length : out_channel -> int
151
val close_out : out_channel -> unit
152
val close_out_noerr : out_channel -> unit
153
val set_binary_mode_out : out_channel -> bool -> unit
154
val open_in : string -> in_channel
155
val open_in_bin : string -> in_channel
156
val open_in_gen : open_flag list -> int -> string -> in_channel
157
val input_char : in_channel -> char
158
val input_line : in_channel -> string
159
val input : in_channel -> string -> int -> int -> int
160
val really_input : in_channel -> string -> int -> int -> unit
161
val input_byte : in_channel -> int
162
val input_binary_int : in_channel -> int
163
val input_value : in_channel -> 'a
164
val seek_in : in_channel -> int -> unit
165
val pos_in : in_channel -> int
166
val in_channel_length : in_channel -> int
167
val close_in : in_channel -> unit
168
val close_in_noerr : in_channel -> unit
169
val set_binary_mode_in : in_channel -> bool -> unit
172
val seek_out : out_channel -> int64 -> unit
173
val pos_out : out_channel -> int64
174
val out_channel_length : out_channel -> int64
175
val seek_in : in_channel -> int64 -> unit
176
val pos_in : in_channel -> int64
177
val in_channel_length : in_channel -> int64
180
mutable contents: 'a }
181
external ref : 'a -> 'a ref = "%makemutable"
182
external (!) : 'a ref -> 'a = "%field0"
183
external (:=) : 'a ref -> 'a -> unit = "%setfield0"
184
external incr : int ref -> unit = "%incr"
185
external decr : int ref -> unit = "%decr"
186
type ('a, 'b, 'c, 'd) format4 = ('a, 'b, 'c, 'c, 'c, 'd) format6
187
type ('a, 'b, 'c) format = ('a, 'b, 'c, 'c) format4
188
val string_of_format : ('a, 'b, 'c, 'd, 'e, 'f) format6 -> string
189
external format_of_string :
190
('a, 'b, 'c, 'd, 'e, 'f) format6 -> ('a, 'b, 'c, 'd, 'e, 'f) format6 =
193
('a, 'b, 'c, 'd, 'e, 'f) format6 ->
194
('f, 'b, 'c, 'e, 'g, 'h) format6 -> ('a, 'b, 'c, 'd, 'g, 'h) format6
196
val at_exit : (unit -> unit) -> unit
197
val valid_float_lexem : string -> string
198
val unsafe_really_input : in_channel -> string -> int -> int -> unit
199
val do_at_exit : unit -> unit
added
removed
bundles/stdcompat/stdcompat-current/interfaces/4.01/pervasives.mli
