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 (38)

Authors

Maintainers

E

e@x80.org

Sources

coq-lsp-0.2.5+9.0.tbz

sha256=11ba9a2f5c25f55fdfe1c00072f89940e35bd1441c64e2adac388a1cda53c881

sha512=b13d76d054c47354032d3371db8ff8bc2fbc78e2509596733249ebca8a2f5ce94529fcdb76cce0a353ecea26f66a52cd2b51310dad9156be10de7fe2ee66f6ba

doc/src/coq-lsp.coq/message.ml.html

Source file `message.ml`

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
(** Messages from Coq *)
module Payload = struct
  type 'l t =
    { range : 'l option
    ; quickFix : 'l Lang.Qf.t list option
    ; msg : Pp.t
    }

  let make ?range ?quickFix msg = { range; quickFix; msg }

  let map ~f { range; quickFix; msg } =
    let quickFix = Option.map (List.map (Lang.Qf.map ~f)) quickFix in
    { range = Option.map f range; quickFix; msg }
end

type 'l t = Lang.Diagnostic.Severity.t * 'l Payload.t

let map ~f (lvl, pl) = (lvl, Payload.map ~f pl)