From f588d52a143502bd381681fbeee417111b51e1d8 Mon Sep 17 00:00:00 2001
From: Christopher Baines <mail@cbaines.net>
Date: Wed, 15 May 2024 16:12:29 +0100
Subject: Export port timeout error predicates

---
 guix-build-coordinator/utils/fibers.scm | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'guix-build-coordinator')

diff --git a/guix-build-coordinator/utils/fibers.scm b/guix-build-coordinator/utils/fibers.scm
index ec1db12..4f6431c 100644
--- a/guix-build-coordinator/utils/fibers.scm
+++ b/guix-build-coordinator/utils/fibers.scm
@@ -27,6 +27,9 @@
 
             letpar&
 
+            port-timeout-error?
+            port-read-timeout-error?
+            port-write-timeout-error?
             with-fibers-timeout
             with-fibers-port-timeouts)
   #:replace (retry-on-error))
-- 
cgit v1.2.3