this repo has no description
Site redesign, new content, blog gen, E2E tests, and build improvements
New blog posts (monopam-madness, open-source-and-ai, weeknotes-2026-10),
notebook showcase with card layout and screenshots, Atom feed generator,
foundations notebook fixes, ONNX test improvements, widget interaction
tests, deploy script updates for oxcaml switch, and .gitignore for
build artifacts.
Co-Authored-By: Claude Opus 4.6 <noreply@anthropic.com>
+23
-6
+15
-6
bin/mk_backend.ml
+15
-6
bin/mk_backend.ml
···
22
22
in
23
23
let _ = Util.lines_of_process cmd in
24
24
(* No longer query library stubs - they are now linked directly into each library's JS file *)
25
+
(* TODO: This probes for basement in every switch, but basement only exists
26
+
in oxcaml switches. Should only check when building for an oxcaml switch,
27
+
or better yet, detect from worker.bc's actual dependencies. *)
28
+
let has_basement =
29
+
let cmd = Bos.Cmd.(ocamlfind_cmd % "query" % "basement") in
30
+
match Bos.OS.Cmd.(run_out ~err:err_null cmd |> out_null |> success) with
31
+
| Ok () -> true
32
+
| Error _ -> false
33
+
in
25
34
let cmd =
26
35
Bos.Cmd.(
27
36
js_of_ocaml_cmd % "--toplevel" % "--linkall" % "--pretty")
28
37
in
38
+
let runtime_files =
39
+
[ "+dynlink.js"; "+toplevel.js"; "+bigstringaf/runtime.js";
40
+
"+js_top_worker/stubs.js" ]
41
+
@ (if has_basement then [ "+basement/runtime.js" ] else [])
42
+
in
29
43
let cmd =
30
44
List.fold_right
31
45
(fun a cmd -> Bos.Cmd.(cmd % a))
32
-
[
33
-
"+dynlink.js";
34
-
"+toplevel.js";
35
-
"+bigstringaf/runtime.js";
36
-
"+js_top_worker/stubs.js";
37
-
]
46
+
runtime_files
38
47
cmd
39
48
in
40
49
let cmd =
+8
bin/opam.ml
+8
bin/opam.ml
···
1
+
(* TODO: Add content-addressed output paths (like day10's jtw_gen.ml) so that
2
+
worker.js, .cma.js, and .cmi files are served from paths containing a
3
+
content hash. This prevents stale browser caches after rebuilds.
4
+
See day10/bin/jtw_gen.ml for the reference implementation:
5
+
- compiler/<version>/<hash>/worker.js
6
+
- p/<pkg>/<version>/<hash>/lib/<name>/...
7
+
- findlib_index.json references hashed paths *)
8
+
1
9
open Bos
2
10
3
11
let opam = Cmd.v "opam"