Update Guile Knots

guix-data-service/jobs/load-new-guix-revision.scm

@@ -2515,11 +2515,11 @@ SELECT store_path FROM derivation_source_files WHERE id = $1"
                                  ignore-systems ignore-targets)
   (define call-with-utility-thread
     (let* ((thread-pool
-            (make-thread-pool parallelism))
+            (make-fixed-size-thread-pool parallelism))
            (queued-channel
             ;; There might be high demand for this, so order the requests
             (spawn-queueing-fiber
-             (thread-pool-channel thread-pool))))
+             (fixed-size-thread-pool-channel thread-pool))))
       (lambda (thunk)
         (call-with-thread
          thread-pool

guix-dev.scm

@@ -42,7 +42,7 @@
              (srfi srfi-1))
 
 (define guile-knots
-  (let ((commit "1dca6d755e910b67636b791242f0948356cf8c4d")
+  (let ((commit "016f37f108ca19da3664516baa97e907aa972b90")
         (revision "1"))
     (package
     (name "guile-knots")
@@ -54,7 +54,7 @@
                     (commit commit)))
               (sha256
                (base32
-                "1ycczphiqqz39fm7cfga5q0aklny22a014y1v0b4jsq6jc00wydk"))
+                "12j3l9p4acf47cjpfzm41ddxyxs1v6vlfa2vrymdd4gdday62xfn"))
               (file-name (string-append name "-" version "-checkout"))))
     (build-system gnu-build-system)
     (native-inputs
@@ -63,11 +63,11 @@
            automake
            guile-next
            guile-lib
-           guile-fibers))
+           guile-fibers-next))
     (inputs
-     (list guile-3.0))
+     (list guile-next))
     (propagated-inputs
-     (list guile-fibers))
+     (list guile-fibers-next))
     (home-page "https://git.cbaines.net/guile/knots")
     (synopsis "Patterns and functionality to use with Guile Fibers")
     (description