~ruther/guix-local

fbea821a2ad15bbe8bf70cd86cff42ae8efc90fa — Thomas Danckaert 8 years ago 8cff2e7
gnu: bluez: Skip non-deterministic test on all architectures.

* gnu/packages/linux.scm (bluez): [arguments]: Skip unit/test-gatt regardless
of architecture.
1 files changed, 8 insertions(+), 10 deletions(-)

M gnu/packages/linux.scm
M gnu/packages/linux.scm => gnu/packages/linux.scm +8 -10
@@ 3071,16 3071,14 @@ Bluetooth audio output devices like headphones or loudspeakers.")
               (string-append "--with-udevdir=" out "/lib/udev")))
       #:phases
       (modify-phases %standard-phases
         ,@(if (string=? (%current-system) "armhf-linux")
               ;; This test fails unpredictably.
               ;; TODO: skip it for all architectures.
               `((add-before 'check 'skip-wonky-test
                  (lambda _
                    (substitute* "unit/test-gatt.c"
                      (("tester_init\\(&argc, &argv\\);") "return 77;"))
                    #t)))
               `())

         ;; Test unit/test-gatt fails unpredictably. Seems to be a timing
         ;; issue (discussion on upstream mailing list:
         ;; https://marc.info/?t=149578476300002&r=1&w=2)
         (add-before 'check 'skip-wonky-test
            (lambda _
              (substitute* "unit/test-gatt.c"
                (("tester_init\\(&argc, &argv\\);") "return 77;"))
              #t))
         (add-after 'install 'post-install
           (lambda* (#:key inputs outputs #:allow-other-keys)
             (let* ((out        (assoc-ref outputs "out"))