Something went wrong. Try again.
static-site-generator blogging hypertext ocaml
Something went wrong. Try again.
940 B · 36 lines
OCaml
at main
12345678910111213141516171819202122232425262728293031323334353637(* * SPDX-FileCopyrightText: 2024 The Forester Project Contributors * * SPDX-License-Identifier: GPL-3.0-or-later *)
open Forester_coreopen Forester_compileropen Alcotest
type severity = Grace.Diagnostic.Severity.t = | Help | Note | Warning | Error | Bug[@@deriving show]
let delim = testable Forester_core.pp_delim ( = )let code = testable Forester_core.Code.pp ( = )let code_node = testable Forester_core.Code.pp_node ( = )let syn_node = testable Forester_core.Syn.pp_node ( = )let syn = testable Syn.pp ( = )let path = testable Trie.pp_path ( = )let data = testable Syn.pp_resolver_data ( = )
let uri = testable URI.pp URI.equallet config = Alcotest.testable Config.pp ( = )
let document = let pp fmt t = Format.pp_print_string fmt (Lsp.Text_document.text t) in testable pp ( = )
let tree = testable Code.pp_tree ( = )let content = testable Types.pp_content ( = )let action = testable Action.pp ( = )