package dolmen
A parser library for automated deduction
Install
Dune Dependency
Authors
Maintainers
Sources
dolmen-0.10.tbz
sha256=c5c85f77e3924f378e8d82f166eefe4131b4e041bf9cdeca467410f33c71fa61
sha512=42feb39d13cfdc8a2054abe85ccc47755f45059cda7d95e9261b5a9fd5c730f420732547b3fa19c4af059474f887ef78c119ab5933375a5ea2dbe888f65a3e4f
doc/src/dolmen.std/tok.ml.html
Source file tok.ml
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22
(* This file is free software, part of dolmen. See file "LICENSE" for more information *) type descr = Dolmen_intf.Tok.descr = { article : string; kind : string; lexeme : string; hint : string option; } let descr ?hint ?(article="the") ~kind lexeme = { article; kind; lexeme; hint; } let print fmt { article; kind; lexeme; _ } = let lxm = if String.length lexeme < 15 then lexeme else String.sub lexeme 0 14 ^ "…" in match lxm with | "" -> Format.fprintf fmt "%s %s" article kind | s -> Format.fprintf fmt "%s %s '%s'" article kind s
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>