From 957bbe2f5051a066b171b7bd5da704181248b8e6 Mon Sep 17 00:00:00 2001
From: Christopher Baines <mail@cbaines.net>
Date: Sun, 24 May 2020 11:45:59 +0100
Subject: Unlock the mutex when deq! fails unexpectedly

So that it can be locked again.
---
 guix-build-coordinator/utils.scm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/guix-build-coordinator/utils.scm b/guix-build-coordinator/utils.scm
index 239fe9f..7487fad 100644
--- a/guix-build-coordinator/utils.scm
+++ b/guix-build-coordinator/utils.scm
@@ -558,6 +558,7 @@ References: ~a~%"
                    (simple-format (current-error-port)
                                   "exception for deq!: ~A\n"
                                   exn)
+                   (unlock-mutex queue-mutex)
                    #f)
                (lambda ()
                  (deq! queue))
-- 
cgit v1.2.3