Fix cram tests

This commit is contained in:
Jeremie Dimino 2017-09-29 17:13:51 +01:00
parent 0e46cdd4e3
commit a47e3ab78a
1 changed files with 1 additions and 1 deletions

View File

@ -30,7 +30,7 @@ rule file = parse
| Comment s -> Buffer.add_string buf s; Buffer.add_char buf '\n'
| Command s ->
Printf.bprintf buf " $ %s\n" s;
let fd = Unix.openfile temp_file [O_WRONLY] 0 in
let fd = Unix.openfile temp_file [O_WRONLY; O_TRUNC] 0 in
let pid =
Unix.create_process "sh" [|"sh"; "-c"; s|] Unix.stdin fd fd
in