Fix syncproc test to avoid bashism.

diff --git a/tests/runtime/test-syncproc.scm b/tests/runtime/test-syncproc.scm
index f525d6b41c29a0f5da21f4f9bda07d7bef6ef1e0..45013e42603c176a10d027a1b3893647935fe213 100644 (file)
--- a/tests/runtime/test-syncproc.scm
+++ b/tests/runtime/test-syncproc.scm
@@ -66,7 +66,7 @@ USA.
     (let* ((reply (call-with-output-string
                   (lambda (out)
                     (run-shell-command
-                     "if read; then echo \"Lose\"; else echo \"Win\"; fi"
+                     "if read x; then echo \"Lose\"; else echo \"Win\"; fi"
                      'input #f 'output out)))))
       (assert-string= reply "Win\n"))))