fix type for on_notification_unhandled

This commit is contained in:
Simon Cruanes 2021-04-07 18:06:18 -04:00
parent 6d9d2e51e3
commit 3fac121a48

View file

@ -144,7 +144,7 @@ module Make(IO : IO) = struct
(** Code action. (** Code action.
@since NEXT_RELEASE *) @since NEXT_RELEASE *)
method on_req_code_action ~notify_back:(_:notify_back) (c:CodeActionParams.t) method on_req_code_action ~notify_back:(_:notify_back) (_c:CodeActionParams.t)
: CodeActionResult.t IO.t = : CodeActionResult.t IO.t =
assert false (* TODO *) assert false (* TODO *)
@ -296,6 +296,7 @@ module Make(IO : IO) = struct
| Lsp.Client_notification.Unknown_notification _ | Lsp.Client_notification.Unknown_notification _
| Lsp.Client_notification.CancelRequest _ | Lsp.Client_notification.CancelRequest _
-> ->
let notify_back = new notify_back ~notify_back () in
self#on_notification_unhandled ~notify_back n self#on_notification_unhandled ~notify_back n
end end
end end