branch master updated: Fix test suite.

[Mathieu Othacehe]

This is an automated email from the git hooks/post-receive script.

mothacehe pushed a commit to branch master
in repository guix-cuirass.

The following commit(s) were added to refs/heads/master by this push:
     new 58e3551  Fix test suite.
58e3551 is described below

commit 58e3551d6dcc3cf4a9d072d6c56531ae3b6e7bbe
Author: Mathieu Othacehe <othacehe@gnu.org>
AuthorDate: Sat May 29 15:56:55 2021 +0200

    Fix test suite.
    
    * tests/database.scm ("dependencies trigger"): Call db-update-failed-builds!
    procedure.
---
 tests/database.scm | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/tests/database.scm b/tests/database.scm
index 2662417..9e58592 100644
--- a/tests/database.scm
+++ b/tests/database.scm
@@ -759,8 +759,11 @@ timestamp, checkouttime, evaltime) VALUES ('guix', 0, 0, 
0, 0);")
         (db-update-build-status! drv-1 (build-status failed))
         (db-update-build-status! drv-2 (build-status succeeded))
         (db-update-build-status! drv-5 (build-status canceled))
+        (let loop ()
+          (unless (eq? (db-update-failed-builds!) 0)
+            (loop)))
         (and (eq? (status drv-4) (build-status failed-dependency))
-             (eq? (status drv-6) (build-status canceled))
+             (eq? (status drv-6) (build-status failed-dependency))
              (eq? (status drv-7) (build-status failed-dependency))))))
 
   (test-assert "db-close"