TakeV/guix
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

gnu: flightgear: Prepare to run test suite.

Browse source 
* gnu/packages/games.scm (flightgear)[arguments]: Add phase to build
test binary. Add phase to skip some failing tests. Move 'check phase to
after 'install-data.
This commit is contained in:
Efraim Flashner 2021-11-03 23:56:01 +02:00
parent b93e06a964
commit 19c38b2acc
No known key found for this signature in database
GPG key ID: 41AAE7DCCA3D8351
1 changed files with 16 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

18
gnu/packages/games.scm
View file

@ -9331,11 +9331,25 @@ (define-public flightgear
(string-append "-DFG_DATA_DIR="
(assoc-ref %outputs "out")
"/share/flightgear"))
;; TODO: test cannot be run because the "run_test_suite" executable
;; does not seem to be built.
;; TODO: test suite segfaults.
#:tests? #f
#:phases
(modify-phases %standard-phases
(add-after 'unpack 'skip-some-tests
(lambda _
(substitute* "test_suite/unit_tests/Instrumentation/test_gps.hxx"
(("CPPUNIT_TEST\\(testLongLegWestbound\\);" all)
(string-append "// " all))
(("CPPUNIT_TEST\\(testFinalLegCourse\\);" all)
(string-append "// " all)))))
(add-after 'build 'build-test-suite
(lambda* args
((assoc-ref %standard-phases 'build)
#:make-flags (list "fgfs_test_suite"))))
;; Test suite needs access to FGData so run it after 'install.
(delete 'check)
(add-after 'install-data 'check
(assoc-ref %standard-phases 'check))
(add-after 'install 'install-data
(lambda* (#:key inputs outputs #:allow-other-keys)
(let ((share (string-append (assoc-ref outputs "out") "/share/flightgear")))