GNU bug report logs - #62594
[me@pnelson.ca: Contributing guide building from git make check failure]

Previous Next

Package: guix;

Reported by: Leo Famulari <leo <at> famulari.name>

Date: Sat, 1 Apr 2023 16:16:01 UTC

Severity: normal

To reply to this bug, email your comments to 62594 AT debbugs.gnu.org.

Toggle the display of automated, internal messages from the tracker.

View this report as an mbox folder, status mbox, maintainer mbox


Report forwarded to bug-guix <at> gnu.org:
bug#62594; Package guix. (Sat, 01 Apr 2023 16:16:01 GMT) Full text and rfc822 format available.

Acknowledgement sent to Leo Famulari <leo <at> famulari.name>:
New bug report received and forwarded. Copy sent to bug-guix <at> gnu.org. (Sat, 01 Apr 2023 16:16:01 GMT) Full text and rfc822 format available.

Message #5 received at submit <at> debbugs.gnu.org (full text, mbox):

From: Leo Famulari <leo <at> famulari.name>
To: bug-guix <at> gnu.org
Subject: [me <at> pnelson.ca: Contributing guide building from git make check
 failure]
Date: Sat, 1 Apr 2023 12:14:58 -0400
----- Forwarded message from Philip Nelson <me <at> pnelson.ca> -----

Date: Tue, 28 Mar 2023 04:42:25 +0000
From: Philip Nelson <me <at> pnelson.ca>
To: guix-devel <at> gnu.org
Subject: Contributing guide building from git make check failure

I've been following the Contributing guide "Building from Git" section (
https://guix.gnu.org/manual/devel/en/html_node/Building-from-Git.html). I
get as far as `make check` but it fails on the following test. Others on
IRC have reported this issue. I'm unsure how to proceed. Any suggestions?

test-name: fold-available-packages with/without cache
location: /home/main/src/guix/tests/packages.scm:1739
source:
+ (test-assert
+   "fold-available-packages with/without cache"
+   (let ()
+     (define no-cache
+	(fold-available-packages
+	  (lambda* (name version result #:rest rest)
+	    (cons (cons* name version rest) result))
+	  '()))
+     (define from-cache
+	(call-with-temporary-directory
+	  (lambda (cache)
+	    (generate-package-cache cache)
+	    (mock ((guix describe) current-profile (const cache))
+		  (mock ((gnu packages)
+			 cache-is-authoritative?
+			 (const #t))
+			(fold-available-packages
+			  (lambda* (name version result #:rest rest)
+			    (cons (cons* name version rest) result))
+			  '()))))))
+     (define (list->set* lst)
+	(let loop ((lst lst) (duplicates '()) (seen (set)))
+	  (match lst
+		 (() (values seen duplicates))
+		 ((head . tail)
+		  (if (set-contains? seen head)
+		    (loop tail (cons head duplicates) seen)
+		    (loop tail duplicates (set-insert head seen)))))))
+     (let ((set1 duplicates1 (list->set* from-cache))
+	    (set2 duplicates2 (list->set* no-cache)))
+	(and (null? duplicates1)
+	     (null? duplicates2)
+	     (every (cut set-contains? set1 <>) no-cache)
+	     (every (cut set-contains? set2 <>) from-cache)))))
actual-value: #f
result: FAIL


Thanks,
Phil

----- End forwarded message -----




This bug report was last modified 362 days ago.

Previous Next


GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.