Mark H Weaver <[email protected]> skribis:
> substitute-binary: In guix/scripts/substitute-binary.scm:
> substitute-binary: 634: 0 [#<procedure 9e74470 ()>]
> substitute-binary:
> substitute-binary: guix/scripts/substitute-binary.scm:634:2: In procedure
> #<procedure 9e74470 ()>:
> substitute-binary: guix/scripts/substitute-binary.scm:634:2: Throw to key
> `match-error' with args `("match" "no matching pattern" ())'.
This sounds possibly related to commit 41c45e7.
> The 'guix' command being run here is using 'pre-inst-env' within a git
> checkout that's on 9d297fa but with some local commits added including
> 'wip-http-pipelining'. The 'guix-daemon' being run is from
> guix-0.8.1.07157e8, which I suppose is using its own copy of 'guix
> substitute' (right?).
Yes, on GuixSD the daemon is using its own copy of ‘guix substitute’,
that is 07157e8.
So the problem could have to do with what the client passes with
‘set-build-options’, although I don’t know what’s going on. Could you
try something like this:
diff --git a/guix/store.scm b/guix/store.scm
index 45c555b..35cb680 100644
--- a/guix/store.scm
+++ b/guix/store.scm
@@ -487,7 +487,7 @@ encoding conversion errors."
(let ((pairs `(,@(if timeout
`(("build-timeout" . ,(number->string timeout)))
'())
- ("substitute-urls" . ,(string-join substitute-urls)))))
+ ("substitute-urls" . ,(pk 'surls (string-join substitute-urls))))))
(send (string-pairs pairs))))
(let loop ((done? (process-stderr server)))
(or done? (process-stderr server)))))
Thanks,
Ludo’.
