Source file spot.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
include Base

module Monad      = Monad

module Option     = Option
include Option.Stdlib

module Weaktbl    = Weaktbl
(* module Phantom    = Phantom *)
module Hashset    = Hashset
module File       = File
module Comopt     = Comopt
module Overload   = Overload
module Mtypes     = Mtypes
module Stream     = SpotStream
module Poly_result = Poly_result
module Result     = Vresult
include Result.Stdlib

module Tuple      = Tuple
include Tuple.Stdlib

module Exn        = Exn
include Exn.Stdlib

module Temporal = Temporal
module Year = Temporal.Year
module Date = Temporal.Date
module Time = Temporal.Time
module Datetime = Temporal.Datetime

module IntRange = IntRange

module List = struct
  include List
  include Xlist
end
include Xlist.Stdlib

module Array = struct
  include Array
  include Xarray
end

module Format = struct
  include Format
  include Xformat
end

module Hashtbl = struct
  include Hashtbl
  include Xhashtbl
end

module String = struct
  include String
  include Xstring
end
include Xstring.Stdlib

module Bytes = struct
  include Bytes
  include Xbytes
end

module Lazy = struct
  include Lazy
  include Xlazy
end

module Filename = struct
  include Filename
  include Xfilename
end
include Xfilename.Stdlib

module Filepath = Filepath

module Unix = struct
  include Unix
  include Xunix
end
include Xunix.Stdlib
  
module Printf = struct
  include Printf
  include Xprintf
end

module Sys = struct
  include Sys
  include Xsys
end

module Set = Xset
module StringSet = Set.Make(String)
module IntSet = Set.Make(struct
  type t = int
  let compare (x:int) y = compare x y
end)

module Int64 = struct
  include Int64
  include Xint64
end

module Printexc = struct
  include Printexc
  include Xprintexc
end

module Obj = struct
  include Obj
  include Xobj
end

module URL = URL

module Gc = struct
  include Gc
  include Xgc
end

module UniqueID = UniqueID

module Once = Once

module Shell = Shell

module Lexing = struct
  include Lexing
  include Xlexing
end

module Command = Command