unikernel/duniverse/dune_/otherlibs/dune-rpc/private/procedures.mli

@@ -0,0 +1,37 @@
+open Types
+open Exported_types
+
+module Public : sig
+  val ping : (unit, unit) Decl.Request.t
+  val diagnostics : (unit, Diagnostic.t list) Decl.Request.t
+  val shutdown : unit Decl.Notification.t
+  val format_dune_file : (Path.t * [ `Contents of string ], string) Decl.Request.t
+  val promote : (Path.t, unit) Decl.Request.t
+  val promote_many : (Files_to_promote.t, Build_outcome_with_diagnostics.t) Decl.request
+  val build_dir : (unit, Path.t) Decl.Request.t
+end
+
+module Server_side : sig
+  val abort : Message.t Decl.Notification.t
+  val log : Message.t Decl.Notification.t
+end
+
+module Poll : sig
+  type 'a t
+
+  val poll : 'a t -> (Id.t, 'a option) Decl.Request.t
+  val cancel : 'a t -> Id.t Decl.Notification.t
+
+  module Name : sig
+    type t
+
+    val make : string -> t
+    val compare : t -> t -> Ordering.t
+  end
+
+  val make : Name.t -> (Id.t, 'a option) Decl.Request.gen list -> 'a t
+  val name : 'a t -> Name.t
+  val progress : Progress.t t
+  val diagnostic : Diagnostic.Event.t list t
+  val running_jobs : Job.Event.t list t
+end