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
|
open Js_of_ocaml_compiler
let printl l = List.iter (fun name -> print_endline name) (List.sort String.compare l)
module SS = Set.Make (String)
let%expect_test _ =
let all = List.map Builtins.File.name (Builtins.all ()) in
let runtime = List.map Builtins.File.name Js_of_ocaml_compiler_runtime_files.runtime in
let extra = SS.elements (SS.diff (SS.of_list all) (SS.of_list runtime)) in
printl all;
[%expect
{|
+array.js
+backtrace.js
+bigarray.js
+bigstring.js
+blake2.js
+compare.js
+domain.js
+dynlink.js
+effect.js
+fail.js
+format.js
+fs.js
+fs_fake.js
+fs_node.js
+gc.js
+graphics.js
+hash.js
+ieee_754.js
+int64.js
+internalMod.js
+ints.js
+io.js
+jslib.js
+jslib_js_of_ocaml.js
+lexing.js
+marshal.js
+md5.js
+mlBytes.js
+nat.js
+obj.js
+parsing.js
+prng.js
+runtime_events.js
+stdlib.js
+stdlib_modern.js
+str.js
+sync.js
+sys.js
+toplevel.js
+unix.js
+weak.js
+zstd.js |}];
printl runtime;
[%expect
{|
+array.js
+backtrace.js
+bigarray.js
+bigstring.js
+blake2.js
+compare.js
+domain.js
+effect.js
+fail.js
+format.js
+fs.js
+fs_fake.js
+fs_node.js
+gc.js
+graphics.js
+hash.js
+ieee_754.js
+int64.js
+internalMod.js
+ints.js
+io.js
+jslib.js
+jslib_js_of_ocaml.js
+lexing.js
+marshal.js
+md5.js
+mlBytes.js
+nat.js
+obj.js
+parsing.js
+prng.js
+runtime_events.js
+stdlib.js
+str.js
+sync.js
+sys.js
+unix.js
+weak.js
+zstd.js |}];
printl extra;
[%expect {|
+dynlink.js
+stdlib_modern.js
+toplevel.js |}]
|
