wingo pushed a commit to branch master
in repository guile.
commit 05bea208b3c0cb26a1a1a800e82d8e29e73bfba4
Author: Ludovic Courtès <[email protected]>
Date: Wed Mar 4 09:43:46 2015 +0100
tests: Make 'test-guild-compile' more reliable.
Before that it would occasionally fail because the "$target" (not the
intermediate temporary file) would be produced.
* test-suite/standalone/test-guild-compile: Call 'pause' before 'sleep'
in test program.
---
test-suite/standalone/test-guild-compile | 5 +++++
1 file changed, 5 insertions(+)
diff --git a/test-suite/standalone/test-guild-compile
b/test-suite/standalone/test-guild-compile
index 525ecc6..5972d54 100755
--- a/test-suite/standalone/test-guild-compile
+++ b/test-suite/standalone/test-guild-compile
@@ -10,6 +10,11 @@ trap 'rm -f "$source" "$target"' EXIT
cat > "$source"<<EOF
(eval-when (expand load eval)
+ ;; Wait for SIGINT.
+ (pause)
+
+ ;; Then sleep so that the SIGINT handler gets to run
+ ;; and compilation doesn't complete before it runs.
(sleep 100))
(define chbouib 42)
EOF