03/04: gnu: guile-git: Skip faulty tests on non-x86_64.

[Ludovic Courtès]

civodul pushed a commit to branch master
in repository guix.

commit 44b0faee6bb76c73384d42af95e492329fd45842
Author: Ludovic Courtès <address@hidden>
Date:   Mon Jul 31 15:19:14 2017 +0200

    gnu: guile-git: Skip faulty tests on non-x86_64.
    
    Reported by Mark H Weaver.
    
    * gnu/packages/guile.scm (guile-git)[arguments]: Add 'skip-tests' phase
    unless on x86_64-linux.
---
 gnu/packages/guile.scm | 16 ++++++++++++++--
 1 file changed, 14 insertions(+), 2 deletions(-)

diff --git a/gnu/packages/guile.scm b/gnu/packages/guile.scm
index 6011e85..376cdee 100644
--- a/gnu/packages/guile.scm
+++ b/gnu/packages/guile.scm
@@ -1822,10 +1822,22 @@ is not available for Guile 2.0.")
                 (file-name (git-file-name name version))))
       (build-system gnu-build-system)
       (arguments
-       '(#:phases (modify-phases %standard-phases
+       `(#:phases (modify-phases %standard-phases
                     (add-after 'unpack 'bootstrap
                       (lambda _
-                        (zero? (system* "autoreconf" "-vfi")))))))
+                        (zero? (system* "autoreconf" "-vfi"))))
+
+                    ;; FIXME: On i686, bytestructures miscalculates the offset
+                    ;; of the 'old-file' and 'new-file' fields within the
+                    ;; '%diff-delta' structure.
+                    ,@(if (string=? (%current-system) "x86_64-linux")
+                          '()
+                          '((add-before 'check 'skip-tests
+                              (lambda _
+                                (substitute* "Makefile"
+                                  (("tests/status\\.scm")
+                                   ""))
+                                #t)))))))
       (native-inputs
        `(("autoconf" ,autoconf)
          ("automake" ,automake)