efraim pushed a commit to branch wip-ppc
in repository guix.

commit a904d83e2e2cd0509a9148862d78188aa2d81166
Author: Efraim Flashner <[email protected]>
AuthorDate: Tue Apr 28 22:44:44 2020 +0300

    gnu: elfutils: Skip tests on powerpc.
    
    * gnu/packages/elf.scm (elfutils)[arguments]: Skip tests on powerpc.
---
 gnu/packages/elf.scm | 11 +++++++----
 1 file changed, 7 insertions(+), 4 deletions(-)

diff --git a/gnu/packages/elf.scm b/gnu/packages/elf.scm
index 5fa6621..01fbdd0 100644
--- a/gnu/packages/elf.scm
+++ b/gnu/packages/elf.scm
@@ -2,7 +2,7 @@
 ;;; Copyright © 2013, 2014, 2015 Ludovic Courtès <[email protected]>
 ;;; Copyright © 2014, 2015 Mark H Weaver <[email protected]>
 ;;; Copyright © 2015 Andreas Enge <[email protected]>
-;;; Copyright © 2017, 2018, 2019 Efraim Flashner <[email protected]>
+;;; Copyright © 2017, 2018, 2019, 2020 Efraim Flashner <[email protected]>
 ;;; Copyright © 2017 Leo Famulari <[email protected]>
 ;;; Copyright © 2018 Tobias Geerinckx-Rice <[email protected]>
 ;;; Copyright © 2018 Marius Bakke <[email protected]>
@@ -38,7 +38,9 @@
   #:use-module (gnu packages python)
   #:use-module (gnu packages sphinx)
   #:use-module (gnu packages texinfo)
-  #:use-module (gnu packages xml))
+  #:use-module (gnu packages xml)
+  #:use-module (srfi srfi-1)
+  #:use-module (srfi srfi-26))
 
 (define-public elfutils
   (package
@@ -69,8 +71,9 @@
 
        ;; Disable tests on MIPS (without changing
        ;; the arguments list on other systems).
-       ,@(if (string-prefix? "mips" (or (%current-target-system)
-                                        (%current-system)))
+       ,@(if (any (cute string-prefix? <> (or (%current-target-system)
+                                              (%current-system)))
+                  '("mips" "powerpc"))
              '(#:tests? #f)
              '())
 

Reply via email to