gnu: findutils: Modify gnulib-tests/test-lock for riscv64

* gnu/packages/base.scm (findutils)[arguments]: Add ‘modify-test-lock’ phase
for riscv64-linux.

Change-Id: I506d28d387505dceb6acf77163335f9762c877ab
Signed-off-by: Ludovic Courtès <ludo@gnu.org>

1 files changed, 8 insertions, 0 deletions

diff --git a/gnu/packages/base.scm b/gnu/packages/base.scm
index 7487612232a..27c73c023b5 100644
--- a/gnu/packages/base.scm
+++ b/gnu/packages/base.scm
@@ -431,6 +431,14 @@ interactive means to merge two files.")
                                  "gnulib-tests/test-strerror_r.c"
                                (("(^| )main *\\(.*" all)
                                 (string-append all "{\n  exit (77);//"))))))
+                       '())
+                 ,@(if (string=? "riscv64-linux" (%current-system))
+                       ;; Unmodified test-lock will fail or crash riscv64
+                       '((add-before 'check 'modify-test-lock
+                           (lambda _
+                             (substitute* "gnulib-tests/test-lock.c"
+                               (("#define DO_TEST_RWLOCK 1")
+                                "#define DO_TEST_RWLOCK 0")))))
                        '()))))
    (synopsis "Operating on files matching given criteria")
    (description