Source file stdcompat__stdlib.ml

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
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
(*
include Stdlib
*)

module Pervasives = Stdcompat__pervasives

include Pervasives

let acosh x =
  log (x +. sqrt (x *. x -. 1.0))

let asinh x =
  log (x +. sqrt (x *. x +. 1.0))

let atanh x =
  0.5 *. log ((1.0 +. x) /. (1.0 -. x))


external __FUNCTION__ : string = "%loc_FUNCTION"

(*
let __FUNCTION__ = "<unknown>"
*)

module Arg = Stdcompat__arg

module Array = Stdcompat__array

module ArrayLabels = Stdcompat__arrayLabels

module Atomic = Stdcompat__atomic

(* Bigarray is not exported before 4.02.0 to allow programs not
   to be compiled with this module, this may change in the future.
   From 4.02.0 and before 4.07.0, Bigarray is effectively
   available only if the library is linked, but --no-alias-deps
   allows the alias to be defined here without requiring such
   a link. *)

module Bigarray = Bigarray


module Bool = Stdcompat__bool

module Buffer = Stdcompat__buffer

module Bytes = Stdcompat__bytes

module BytesLabels = Stdcompat__bytesLabels

module Callback = Callback

module Char = Stdcompat__char

module Complex = Complex

module Digest = Stdcompat__digest

module Either = Stdcompat__either

module Ephemeron = Stdcompat__ephemeron

module Filename = Stdcompat__filename

module Float = Stdcompat__float

module Format = Stdcompat__format

module Fun = Stdcompat__fun

module Gc = Gc

module Genlex = Genlex

module Hashtbl = Stdcompat__hashtbl

module In_channel = Stdcompat__in_channel

module Int = Stdcompat__int

module Int32 = Stdcompat__int32

module Int64 = Stdcompat__int64

module Lazy = Stdcompat__lazy

module Lexing = Stdcompat__lexing

module List = Stdcompat__list

module ListLabels = Stdcompat__listLabels

module Map = Stdcompat__map

module Marshal = Marshal

module MoreLabels = MoreLabels

module Nativeint = Stdcompat__nativeint

module Obj = Obj

module Oo = Oo

module Option = Stdcompat__option

module Out_channel = Stdcompat__out_channel

module Parsing = Parsing

module Printexc = Stdcompat__printexc

module Printf = Stdcompat__printf

module Queue = Stdcompat__queue

module Random = Stdcompat__random

module Result = Stdcompat__result

module Scanf = Scanf

module Seq = Stdcompat__seq

module Set = Stdcompat__set

module Stack = Stdcompat__stack

module StdLabels = struct
  module Array = Stdcompat__arrayLabels

  module Bytes = Stdcompat__bytesLabels

  module List = Stdcompat__listLabels

  module String = Stdcompat__stringLabels
end

module String = Stdcompat__string

module StringLabels = Stdcompat__stringLabels

module Sys = Stdcompat__sys

module Uchar = Stdcompat__uchar

module Unit = Stdcompat__unit

module Weak = Stdcompat__weak