package coq-lsp

You can search for identifiers within the package.

in-package search v0.2.0

Language Server Protocol native server for Coq

Install

dune-project

Dependency

github.com Readme Changelog Edit opam file Versions (34)

Authors

Maintainers

E

e@x80.org

Sources

coq-lsp-0.2.4.8.20.tbz

sha256=9e3736371fe2c2dd5af50e2a360f070f8c329516c60f01ba3dc7378b80b77172

sha512=d5302f5dc4d7700910b7a7a2d1558770e15bfc0c7bcf9de2ccfd321b4e3cd591848d8e11f03e87362a8d81df72ec4af57dda2c3c5737b34726dcee35de2e56c8

doc/src/fleche_waterproof/json.ml.html

Source file `json.ml`

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
type token =
  | NULL
  | TRUE
  | FALSE
  | STRING of string
  | INT of int
  | FLOAT of float
  | LEFT_BRACK
  | RIGHT_BRACK
  | LEFT_BRACE
  | RIGHT_BRACE
  | COMMA
  | COLON
  | EOF

module CAst = struct
  type 'a t =
    { v : 'a
    ; range : Lang.Range.t
    }

  let make ~range v = { v; range }
end

type lstring = string CAst.t

type value_r =
  | Assoc of (lstring * value) list
  | Bool of bool
  | Float of float
  | Int of int
  | List of value list
  | Null
  | String of string

and value = value_r CAst.t

let rec find key = function
  | [] -> None
  | ({ CAst.v; _ }, b) :: l -> if compare v key = 0 then Some b else find key l