diff options
| author | Christopher Baines <mail@cbaines.net> | 2023-03-29 11:59:27 +0100 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2023-03-29 11:59:27 +0100 |
| commit | 32a4ff23d7c40137a31aa8d618cd0f62f4a6fe0d (patch) | |
| tree | 8a6f9a909afa5dd94e26b93eef76d051927fd628 /guix-build-coordinator/utils.scm | |
| parent | 5ae5e71e16a8cd8907836fd1188e0ca4b0889788 (diff) | |
| download | build-coordinator-32a4ff23d7c40137a31aa8d618cd0f62f4a6fe0d.tar build-coordinator-32a4ff23d7c40137a31aa8d618cd0f62f4a6fe0d.tar.gz | |
Try and ensure that the non-fibers sleep is used in places
When not using fibers. I don't know if a different sleep is being used, and I
don't think I've read anything about having to avoid this, but I'm running out
of ideas.
Diffstat (limited to 'guix-build-coordinator/utils.scm')
| -rw-r--r-- | guix-build-coordinator/utils.scm | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/guix-build-coordinator/utils.scm b/guix-build-coordinator/utils.scm index 68c59d1..005ebc8 100644 --- a/guix-build-coordinator/utils.scm +++ b/guix-build-coordinator/utils.scm @@ -96,7 +96,9 @@ get-gc-metrics-updater get-guix-memory-metrics-updater - check-locale!)) + check-locale! + + core-guile-sleep)) (eval-when (eval load compile) (begin @@ -1467,3 +1469,6 @@ falling back to en_US.utf8\n" (lambda _ (setlocale LC_ALL "")) #:unwind? #t)) + +(define core-guile-sleep + sleep) |