From 05bea208b3c0cb26a1a1a800e82d8e29e73bfba4 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Wed, 4 Mar 2015 09:43:46 +0100
Subject: [PATCH] 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 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