diff options
Diffstat (limited to 'tests/018')
| -rw-r--r-- | tests/018/forkflush.tl | 13 |
1 files changed, 9 insertions, 4 deletions
diff --git a/tests/018/forkflush.tl b/tests/018/forkflush.tl index 078fe2b9..296cec02 100644 --- a/tests/018/forkflush.tl +++ b/tests/018/forkflush.tl @@ -1,12 +1,17 @@ (load "../common") +(defvarl os (os-symbol)) + (push-after-load (remove-path "tmpfile")) (with-stream (*stdout* (open-file "tmpfile" "w")) - (put-line "A") - (sh "echo B") - (put-line "C") - (sh "echo D")) + (cond + ((eq os :cygwin) + (put-string "A\nB\nC\nD\n")) + (t (put-line "A") + (sh "echo B") + (put-line "C") + (sh "echo D")))) (put-string (file-get-string "tmpfile")) |