diff options
Diffstat (limited to 'gnu/packages/base.scm')
| -rw-r--r-- | gnu/packages/base.scm | 24 |
1 files changed, 20 insertions, 4 deletions
diff --git a/gnu/packages/base.scm b/gnu/packages/base.scm index 320081d818..2b3367d5b2 100644 --- a/gnu/packages/base.scm +++ b/gnu/packages/base.scm @@ -19,7 +19,7 @@ ;;; Copyright © 2021 Leo Le Bouter <lle-bout@zaclys.net> ;;; Copyright © 2021 Maxime Devos <maximedevos@telenet.be> ;;; Copyright © 2021 Guillaume Le Vaillant <glv@posteo.net> -;;; Copyright © 2021, 2024 Maxim Cournoyer <maxim.cournoyer@gmail.com> +;;; Copyright © 2021, 2024 Maxim Cournoyer <maxim@guixotic.coop> ;;; Copyright © 2022 zamfofex <zamfofex@twdb.moe> ;;; Copyright © 2022 John Kehayias <john.kehayias@protonmail.com> ;;; Copyright © 2023 Josselin Poiret <dev@jpoiret.xyz> @@ -374,7 +374,7 @@ differences.") #~'("XFAIL_TESTS=test-year2038")) ;; TODO: Figure out why these gnulib tests are failing. ((and (not (%current-target-system)) - (target-ppc64le?)) + (target-powerpc?)) #~'("XFAIL_TESTS=test-float-h large-subopt")) (else #~'())) @@ -526,8 +526,6 @@ used to apply commands with arbitrarily long arguments.") "tests/split/fail.sh" ;; These tests error "tests/dd/nocache.sh" - ;; These tests can intermitently fail on btrfs - "tests/cp/reflink-auto.sh" ;; These tests fail "tests/cp/sparse.sh" "tests/cp/special-f.sh" @@ -573,6 +571,10 @@ used to apply commands with arbitrarily long arguments.") (("(^| )main *\\(.*" all) (string-append all "{\n exit (77);//")))) '()) + ;; These tests can fail on btrfs. + (substitute* "tests/cp/reflink-auto.sh" + (("^#!.*" all) + (string-append all "exit 77;\n"))) (substitute* "Makefile.in" ;; fails on filesystems where inotify cannot be used, ;; more info in #47935 @@ -1883,6 +1885,20 @@ and daylight-saving rules.") ;;; package. (define-public tzdata-for-tests tzdata) +;;; TODO: Move the 'install-leap-seconds' phase into the main package's +;;; 'post-install' phase on the next rebuild cycle. +(define-public tzdata/leap-seconds + (hidden-package + (package/inherit tzdata + (arguments + (substitute-keyword-arguments (package-arguments tzdata) + ((#:phases phases) + #~(modify-phases #$phases + (add-after 'post-install 'install-leap-seconds + (lambda _ + (install-file "leap-seconds.list" + (string-append #$output "/share/zoneinfo"))))))))))) + (define-public libiconv (package (name "libiconv") |