1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-04-30 03:40:34 +02:00

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.
This commit is contained in:
Ludovic Courtès 2015-03-04 09:43:46 +01:00 committed by Andy Wingo
parent 30db824b92
commit 05bea208b3

View file

@ -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