Module Job.OpSource
Open type and add combinators. Meant to be opened
Source
type 'a job = | Done of 'a| Run of OpamProcess.command * OpamProcess.result -> 'a OpamProcess.Job.Op.job
Source
val (@@>) :
OpamProcess.command ->
(OpamProcess.result -> 'a OpamProcess.Job.Op.job) ->
'a OpamProcess.Job.Op.jobStage a shell command with its continuation, eg:
command "ls" ["-a"] @@> fun result ->
if OpamProcess.is_success result then Done result.r_stdout
else failwith "ls"Source
val (@@+) :
'a OpamProcess.Job.Op.job ->
('a -> 'b OpamProcess.Job.Op.job) ->
'b OpamProcess.Job.Op.jobjob1 @@+ fun r -> job2 appends the computation of tasks in job2 after job1
job @@| f maps f on the results of job. Equivalent to job @@+ fun r -> Done (f r)