summaryrefslogtreecommitdiff
path: root/tests/run.scm
diff options
context:
space:
mode:
Diffstat (limited to 'tests/run.scm')
-rw-r--r--tests/run.scm4
1 files changed, 3 insertions, 1 deletions
diff --git a/tests/run.scm b/tests/run.scm
index ab023eb..2ad287f 100644
--- a/tests/run.scm
+++ b/tests/run.scm
@@ -68,7 +68,9 @@
(let ((echo-command 'echo))
(test "Subprocess piped to another process, writing to a file"
"1235\n"
- (begin (run (pipe (,echo-command "1234" + 1) ("bc")) (> outfile))
+ (begin (run (pipe (,echo-command "1234" + 1)
+ ("sh" -c "read foo; echo $(($foo))"))
+ (> outfile))
(read-all "outfile"))))
(delete-file* "outfile")