-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1
Hi list,
the two sleep 999's in test-suite/tests/popen.test are really annoying. Is
there any good reason for them to be there? The following patch alleviates the
issue:
- --- test-suite/tests/popen.test 2007-05-25 16:44:34.000000000 +0200
+++ newpopen 2007-05-25 16:56:09.000000000 +0200
@@ -82,7 +82,7 @@
(port (with-error-to-port (cdr pair)
(lambda ()
(open-input-pipe
- - "exec 1>/dev/null; echo closed 1>&2; exec 2>/dev/null;
sleep 999")))))
+ "exec 1>/dev/null; echo closed 1>&2; exec 2>/dev/null;
sleep 1")))))
(close-port (cdr pair)) ;; write side
(and (char? (read-char (car pair))) ;; wait for child to do its thing
(char-ready? port)
@@ -132,7 +132,7 @@
(port (with-error-to-port (cdr pair)
(lambda ()
(open-output-pipe
- - "exec 0</dev/null; echo closed 1>&2; exec
2>/dev/null; sleep 999")))))
+ "exec 0</dev/null; echo closed 1>&2; exec
2>/dev/null; sleep 1")))))
(close-port (cdr pair)) ;; write side
(and (char? (read-char (car pair))) ;; wait for child to do its thing
(catch 'system-error
Marijn
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v2.0.4 (GNU/Linux)
Comment: Using GnuPG with Mozilla - http://enigmail.mozdev.org
iD8DBQFGVvnqp/VmCx0OL2wRAsMQAKCDRdQ6f/42vQdPB0Wyf7O0YGxF5QCcC7Ha
lSeyDsPfy5hgYEj+3UlJ8UI=
=9tdD
-----END PGP SIGNATURE-----
_______________________________________________
Bug-guile mailing list
Bug-guile@gnu.org
http://lists.gnu.org/mailman/listinfo/bug-guile
