guile/patches/guile-1.8.7-testsuite.patch

   1 diff -up guile-1.8.7/test-suite/tests/popen.test.testsuite guile-1.8.7/test-suite/tests/popen.test
   2 --- guile-1.8.7/test-suite/tests/popen.test.testsuite   2009-07-04 00:19:00.000000000 +0200
   3 +++ guile-1.8.7/test-suite/tests/popen.test     2009-07-16 17:09:57.000000000 +0200
   4 @@ -168,7 +168,7 @@
   5            (port (with-error-to-port (cdr c2p)
   6                    (lambda ()
   7                      (open-output-pipe
   8 -                     "exec 0</dev/null; while true; do echo closed 1>&2; done")))))
   9 +                     "exec 0</dev/null; echo closed 1>&2; sleep 3")))))
  10        (close-port (cdr c2p))   ;; write side
  11        (with-epipe
  12         (lambda ()