Message ID | 20221007205352.1282-3-maximedevos@telenet.be |
---|---|
State | New |
Headers | show |
Series | Support #:tests? in guile-build-system | expand |
Context | Check | Description |
---|---|---|
cbaines/comparison | success | View comparision |
cbaines/git-branch | success | View Git branch |
cbaines/applying patch | success | |
cbaines/issue | success | View issue |
cbaines/comparison | success | View comparision |
cbaines/git-branch | success | View Git branch |
cbaines/applying patch | success | View Laminar job |
cbaines/issue | success | View issue |
diff --git a/gnu/packages/guile-xyz.scm b/gnu/packages/guile-xyz.scm index 56f0bb8acc..2ab5683d19 100644 --- a/gnu/packages/guile-xyz.scm +++ b/gnu/packages/guile-xyz.scm @@ -3682,6 +3682,7 @@ (define-public guile-ffi-fftw (build-system guile-build-system) (arguments `(#:source-directory "mod" + #:test-script "../test/test-ffi-fftw.scm" #:phases (modify-phases %standard-phases (add-after 'unpack 'prepare-build @@ -3689,11 +3690,8 @@ (define-public guile-ffi-fftw (substitute* "mod/ffi/fftw.scm" (("\\(getenv \"GUILE_FFI_FFTW_LIBFFTW3_PATH\"\\)") (format #f "\"~a/lib\"" (assoc-ref inputs "fftw")))) - #t)) - (add-after 'build 'check - (lambda _ - (invoke "guile" "-L" "mod" - "-s" "test/test-ffi-fftw.scm")))))) + #t))))) + (native-inputs (list guile-test-driver)) (inputs (list fftw guile-2.2)) (home-page "https://github.com/lloda/guile-ffi-fftw/")