Commit 77e46959 authored by Andrei Paskevich's avatar Andrei Paskevich
Browse files

reset the task buffer immediately after call

parent e90fe240
......@@ -259,7 +259,9 @@ let prove_task ~command ?timelimit ?memlimit ?old drv task =
let buf = Buffer.create 1024 in
let fmt = formatter_of_buffer buf in
print_task ?old drv fmt task; pp_print_flush fmt ();
call_on_buffer ~command ?timelimit ?memlimit drv buf
let res = call_on_buffer ~command ?timelimit ?memlimit drv buf in
Buffer.reset buf;
(* exception report *)
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment