Lsp.Server_request
type _ t =
| WorkspaceApplyEdit : Types.ApplyWorkspaceEditParams.t -> Types.ApplyWorkspaceEditResult.t
t
| WorkspaceFolders : Types.WorkspaceFolder.t list t
| WorkspaceConfiguration : Types.ConfigurationParams.t -> Import.Json.t list t
| ClientRegisterCapability : Types.RegistrationParams.t -> unit t
| ClientUnregisterCapability : Types.UnregistrationParams.t -> unit t
| ShowMessageRequest : Types.ShowMessageRequestParams.t -> Types.MessageActionItem.t
option
t
| ShowDocumentRequest : Types.ShowDocumentParams.t -> Types.ShowDocumentResult.t
t
| WorkDoneProgressCreate : Types.WorkDoneProgressCreateParams.t -> unit t
| CodeLensRefresh : unit t
| SemanticTokensRefresh : unit t
| WorkspaceDiagnosticRefresh : unit t
| UnknownRequest : string * Jsonrpc.Structured.t option -> Import.Json.t t
val yojson_of_result : 'a t -> 'a -> Import.Json.t
val to_jsonrpc_request : _ t -> id:Jsonrpc.Id.t -> Jsonrpc.Request.t
val of_jsonrpc : Jsonrpc.Request.t -> (packed, string) Import.Result.t
val response_of_json : 'a t -> Import.Json.t -> 'a