commit f75f534498c29aca9845a8e3fd67dec80972e6ef
parent ca8d7fafd944bad5e45f61b7078d815a03b530eb
Author: Natasha Kerensikova <natgh@instinctive.eu>
Date: Mon, 28 Sep 2026 17:53:20 +0000
Pauses in get-gruik are logged when very verbose
Diffstat:
1 file changed, 1 insertion(+), 0 deletions(-)
diff --git a/src/get-gruiks.scm b/src/get-gruiks.scm
@@ -48,6 +48,7 @@
(define (sleep-until deadline)
(let* ((dt (time-max min-sleep (time-difference deadline (monotonic-time))))
(sec (time->seconds dt)))
+ (write-log 2 " Sleeping for " (exact->inexact sec) "s")
(secosleep sec)))
(define (run-until deadline count thunk)
(if deadline