Something went wrong. Try again.
static-site-generator blogging hypertext ocaml
Something went wrong. Try again.
345 B · 13 lines
OCaml
at main
1234567891011121314(* * SPDX-FileCopyrightText: 2024 The Forester Project Contributors * SPDX-FileCopyrightText: 2026 The Forester Project Contributors * * SPDX-License-Identifier: GPL-3.0-or-later *)
let ( let@ ) = ( @@ )let ( @~ ) f x y = f y xlet ( >>> ) g f = Fun.compose f glet ( <<< ) g f = Fun.compose g f
let guard b k = if b then k () else None