janneke pushed a commit to branch hurd-team
in repository guix.
commit 8123cc7d5d3d2ebdc2bc8b07918798f895035008
Author: Janneke Nieuwenhuizen <[email protected]>
AuthorDate: Tue Jun 6 16:53:09 2023 +0200
gnu: libbsd: Skip failing test on the Hurd.
* gnu/packages/libbsd.scm (libbsd)[arguments]: When building natively on the
Hurd, add stage 'skip-tests'.
---
gnu/packages/libbsd.scm | 12 +++++++++++-
1 file changed, 11 insertions(+), 1 deletion(-)
diff --git a/gnu/packages/libbsd.scm b/gnu/packages/libbsd.scm
index 79f1389081..46a11a61e2 100644
--- a/gnu/packages/libbsd.scm
+++ b/gnu/packages/libbsd.scm
@@ -1,6 +1,7 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2016 Leo Famulari <[email protected]>
;;; Copyright © 2022 Marius Bakke <[email protected]>
+;;; Copyright © 2023 Janneke Nieuwenhuizen <[email protected]>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -23,6 +24,7 @@
#:use-module (guix licenses)
#:use-module (guix packages)
#:use-module (guix gexp)
+ #:use-module (guix utils)
#:use-module (gnu packages crypto))
(define-public libbsd
@@ -64,7 +66,15 @@
;; build container.
(substitute* "test/Makefile"
(("pwcache\\$\\(EXEEXT\\) ")
- "")))))))
+ ""))))
+ #$@(if (system-hurd?)
+ #~((add-after 'unpack 'skip-tests
+ (lambda _
+ (substitute* "test/explicit_bzero.c"
+ (("(^| )main *\\(.*" all)
+ (string-append all
+ "{\n exit (77);//"))))))
+ #~()))))
(inputs
(list libmd))
(synopsis "Utility functions from BSD systems")
