diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2015-03-04 09:43:46 +0100 |
|---|---|---|
| committer | Andy Wingo <wingo@pobox.com> | 2016-05-22 19:09:25 +0200 |
| commit | 05bea208b3c0cb26a1a1a800e82d8e29e73bfba4 (patch) | |
| tree | f29d5504b60cdc8634bb5aa365412b377173d4b2 /test-suite/standalone | |
| parent | 30db824b923ba9cdb3dc1783af03f9b164a87f6e (diff) | |
| download | guile-05bea208b3c0cb26a1a1a800e82d8e29e73bfba4.tar.gz | |
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.
Diffstat (limited to 'test-suite/standalone')
| -rwxr-xr-x | test-suite/standalone/test-guild-compile | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/test-suite/standalone/test-guild-compile b/test-suite/standalone/test-guild-compile index 525ecc6e0..5972d5474 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 |