Something went wrong. Try again.
ocaml
Something went wrong. Try again.
579 B · 16 lines
OCaml
at pp-ast
1234567891011121314151617(* * SPDX-FileCopyrightText: 2024 The Forester Project Contributors * SPDX-FileCopyrightText: 2026 The Forester Project Contributors * * SPDX-License-Identifier: GPL-3.0-or-later *)
open Brr
let window () = Window.to_jv G.windowlet get (key : string) (of_jv : Jv.t -> 'a) : 'a option = Jv.find (window ()) key |> Option.map of_jvlet string (key : string) : string option = Jv.Jstr.find (window ()) key |> Option.map Jstr.to_stringlet int (key : string) : int option = Jv.Int.find (window ()) keylet bool (key : string) : bool option = Jv.Bool.find (window ()) key