Archived
1
0
Fork 0

gnu: icu4c-70: Fix gexp in builder script for riscv64.

As phases from icu4c is a gexp.

* gnu/packages/icu4c.scm (icu4c-70)[arguments]: Use gexps.
This commit is contained in:
Christopher Baines 2023-05-07 09:16:01 +01:00
parent a795a02a9d
commit b1e9ae7f0e
No known key found for this signature in database
GPG key ID: 5E28A33B0B84F577

View file

@ -124,15 +124,15 @@ C/C++ part.")
(if (target-riscv64?) (if (target-riscv64?)
(substitute-keyword-arguments (package-arguments icu4c) (substitute-keyword-arguments (package-arguments icu4c)
((#:phases phases) ((#:phases phases)
`(modify-phases ,phases #~(modify-phases #$phases
(replace 'disable-failing-test (replace 'disable-failing-test
;; It is unknown why these tests are failing. ;; It is unknown why these tests are failing.
(lambda _ (lambda _
(substitute* "source/test/cintltst/ucptrietest.c" (substitute* "source/test/cintltst/ucptrietest.c"
((".*addTest.*") "")) ((".*addTest.*") ""))
(substitute* "source/test/intltest/numbertest_api.cpp" (substitute* "source/test/intltest/numbertest_api.cpp"
(("(TESTCASE_AUTO\\(unitUsage\\));" all) (("(TESTCASE_AUTO\\(unitUsage\\));" all)
(string-append "//" all)))))))) (string-append "//" all))))))))
(package-arguments icu4c))))) (package-arguments icu4c)))))
(define-public icu4c-69 (define-public icu4c-69