sig
module type LONG_RUNNING =
sig
type run_parameters
val name : string
val serialize :
Ketrew.Long_running.LONG_RUNNING.run_parameters -> string
val deserialize_exn :
string -> Ketrew.Long_running.LONG_RUNNING.run_parameters
val start :
Ketrew.Long_running.LONG_RUNNING.run_parameters ->
(Ketrew.Long_running.LONG_RUNNING.run_parameters,
Ketrew.Host_io.Error.classified)
Unix_io.Deferred_result.t
val update :
Ketrew.Long_running.LONG_RUNNING.run_parameters ->
([ `Failed of
Ketrew.Long_running.LONG_RUNNING.run_parameters * string
| `Still_running of Ketrew.Long_running.LONG_RUNNING.run_parameters
| `Succeeded of Ketrew.Long_running.LONG_RUNNING.run_parameters ],
Ketrew.Host_io.Error.classified)
Unix_io.Deferred_result.t
val kill :
Ketrew.Long_running.LONG_RUNNING.run_parameters ->
([ `Killed of Ketrew.Long_running.LONG_RUNNING.run_parameters ],
Ketrew.Host_io.Error.classified)
Unix_io.Deferred_result.t
val log :
Ketrew.Long_running.LONG_RUNNING.run_parameters ->
(string * Ketrew_pure.Internal_pervasives.Log.t) list
val additional_queries :
Ketrew.Long_running.LONG_RUNNING.run_parameters ->
(string * Ketrew_pure.Internal_pervasives.Log.t) list
val query :
Ketrew.Long_running.LONG_RUNNING.run_parameters ->
string ->
(string, Ketrew_pure.Internal_pervasives.Log.t)
Unix_io.Deferred_result.t
end
end