gnu: at-spi2-core: Skip tests on powerpc-linux.

* gnu/packages/gtk.scm (at-spi2-core)[arguments]: When building for
powerpc-linux skip the custom 'check phase.

Change-Id: I8c609c1cb6eb8b03746e294f7b8e3d0792c43443
This commit is contained in:
Efraim Flashner 2023-10-23 10:40:27 +03:00
parent dae956e796
commit 9210ca9b04
No known key found for this signature in database
GPG key ID: 41AAE7DCCA3D8351

View file

@ -803,22 +803,29 @@ (define-public at-spi2-core
#:phases
#~(modify-phases %standard-phases
(delete 'check)
(add-after 'install 'check
(lambda _
(setenv "HOME" (getenv "TMPDIR")) ;xfconfd requires a writable HOME
;; Run test-suite under a dbus session.
(setenv "XDG_DATA_DIRS" ;for finding org.xfce.Xfconf.service
(string-append #$output "/share:" (getenv "XDG_DATA_DIRS")))
;; Don't fail on missing '/etc/machine-id'.
(setenv "DBUS_FATAL_WARNINGS" "0")
(with-directory-excursion (string-append "../at-spi2-core-"
#$version "")
(invoke "dbus-run-session" "--" "ci/run-registryd-tests.sh")
(substitute* "ci/run-tests.sh"
(("ps auxwww") "") ;avoid a dependency on procps
(("meson test -C _build")
"meson test -C ../build")) ;adjust build directory
(invoke "dbus-run-session" "--" "ci/run-tests.sh")))))))
;; The CI test suite fails completely on powerpc-linux.
;; The name org.gnome.SessionManager was not provided by any .service
;; TODO: Wrap 'check phase with 'tests?'.
#$@(if (not (target-ppc32?))
#~((add-after 'install 'check
(lambda _
;; xfconfd requires a writable HOME
(setenv "HOME" (getenv "TMPDIR"))
;; Run test-suite under a dbus session.
(setenv "XDG_DATA_DIRS" ;for finding org.xfce.Xfconf.service
(string-append #$output "/share:"
(getenv "XDG_DATA_DIRS")))
;; Don't fail on missing '/etc/machine-id'.
(setenv "DBUS_FATAL_WARNINGS" "0")
(with-directory-excursion (string-append "../at-spi2-core-"
#$version "")
(invoke "dbus-run-session" "--" "ci/run-registryd-tests.sh")
(substitute* "ci/run-tests.sh"
(("ps auxwww") "") ;avoid a dependency on procps
(("meson test -C _build")
"meson test -C ../build")) ;adjust build directory
(invoke "dbus-run-session" "--" "ci/run-tests.sh")))))
#~()))))
(inputs
(list bash-minimal libxml2))
(propagated-inputs