type registry = private {projects : Cobol_lsp__.Lsp_project.SET.t;docs : Cobol_lsp__.Lsp_document.TYPES.document Stdlib__Map.Make(Lsp.Uri).t;indirect_diags : Lsp.Types.Diagnostic.t list Stdlib__Map.Make(Lsp.Uri).t
Stdlib__Map.Make(Lsp.Uri).t;pending_tasks : pending_tasks;sub_state : sub_state;params : Cobol_lsp__.Lsp_types.params;
}type state = | NotInitialized of Cobol_lsp__.Lsp_types.config| Initialized of Cobol_lsp__.Lsp_types.params| Running of registry| ShuttingDown| Exit of exit_status
and exit_status = (unit, string) Stdlib.resulttype 'a error = | InvalidStatus of state| UnhandledRequest of 'a Lsp.Client_request.t| UnknownRequest of string
exception Document_not_found of Lsp.Types.TextDocumentIdentifier.t