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:
parent
30db824b92
commit
05bea208b3
1 changed files with 5 additions and 0 deletions
|
@ -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
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue