gnu: bluez: Skip non-deterministic test on all architectures.

* gnu/packages/linux.scm (bluez): [arguments]: Skip unit/test-gatt regardless
of architecture.
This commit is contained in:
Thomas Danckaert 2017-10-16 08:36:28 +02:00 committed by Thomas Danckaert
parent 8cff2e7aed
commit fbea821a2a
No known key found for this signature in database
GPG Key ID: 5C3B064C724A5726
1 changed files with 8 additions and 10 deletions

View File

@ -3071,16 +3071,14 @@ Bluetooth audio output devices like headphones or loudspeakers.")
(string-append "--with-udevdir=" out "/lib/udev"))) (string-append "--with-udevdir=" out "/lib/udev")))
#:phases #:phases
(modify-phases %standard-phases (modify-phases %standard-phases
,@(if (string=? (%current-system) "armhf-linux") ;; Test unit/test-gatt fails unpredictably. Seems to be a timing
;; This test fails unpredictably. ;; issue (discussion on upstream mailing list:
;; TODO: skip it for all architectures. ;; https://marc.info/?t=149578476300002&r=1&w=2)
`((add-before 'check 'skip-wonky-test (add-before 'check 'skip-wonky-test
(lambda _ (lambda _
(substitute* "unit/test-gatt.c" (substitute* "unit/test-gatt.c"
(("tester_init\\(&argc, &argv\\);") "return 77;")) (("tester_init\\(&argc, &argv\\);") "return 77;"))
#t))) #t))
`())
(add-after 'install 'post-install (add-after 'install 'post-install
(lambda* (#:key inputs outputs #:allow-other-keys) (lambda* (#:key inputs outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out")) (let* ((out (assoc-ref outputs "out"))