diff --git a/src/future.ml b/src/future.ml index b0ed3288..7ceb8d54 100644 --- a/src/future.ml +++ b/src/future.ml @@ -279,7 +279,7 @@ module Scheduler = struct match status with | WEXITED 0 -> if output <> "" then - Printf.eprintf "Output[%d]:\n%s%!" job.id output; + Format.eprintf "@{Output@}[@{%d@}]:\n%s%!" job.id output; Ivar.fill job.job.ivar () | WEXITED n -> Format.eprintf "\n@{Command@} [@{%d@}] exited with code %d:\n\