ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-25 22:08:16 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: perl6-tap-harness: Update to 0.3.5.

Browse source 
* gnu/packages/perl6.scm (perl6-tap-harness): Update to 0.3.5.
[source]: Update URL. Reindent.
[arguments]: Replace obsolete prove6 script with manual Raku invocation
in 'check' phase.
[home-page]: Update.
[synopsis]: Replace mention of Perl with Raku.

* gnu/packages/rakudo-build-system.scm (check): Replace obsolete prove6
script with manual Raku invocation.

Signed-off-by: Efraim Flashner <efraim@flashner.co.il>
This commit is contained in:
Paul A. Patience 2022-04-29 05:17:52 +00:00 committed by Efraim Flashner
parent 6a80ac450c
commit 8dca56b4a1
No known key found for this signature in database
GPG key ID: 41AAE7DCCA3D8351
2 changed files with 17 additions and 14 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

25
gnu/packages/perl6.scm
View file

@ -680,17 +680,16 @@ (define-public perl6-svg-plot
(define-public perl6-tap-harness (define-public perl6-tap-harness
(package (package
(name "perl6-tap-harness") (name "perl6-tap-harness")
(version "0.0.7") (version "0.3.5")
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
(url "https://github.com/perl6/tap-harness6") (url "https://github.com/Raku/tap-harness6")
(commit (string-append "v" version)))) (commit version)))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 (base32 "162crdy8g6xhnry26pjma2panm0c79n26igmljg79al4bqj9lyc9"))))
"1lig8i0my3fgqvlay9532xslbf3iis2d7wz89gniwvwqffi2kh6r"))))
(build-system rakudo-build-system) (build-system rakudo-build-system)
(arguments (arguments
'(#:with-zef? #f '(#:with-zef? #f
@ -699,9 +698,9 @@ (define-public perl6-tap-harness
(modify-phases %standard-phases (modify-phases %standard-phases
(replace 'check (replace 'check
(lambda _ (lambda _
(invoke "perl6" "-Ilib" "bin/prove6" "-l" "t")))))) (apply invoke "raku" "-MTAP" "-Ilib" (find-files "t" "\\.t$")))))))
(home-page "https://github.com/perl6/tap-harness6/") (home-page "https://github.com/Raku/tap-harness6")
(synopsis "TAP harness for perl6") (synopsis "TAP harness for Raku")
(description "This module provides the @command{prove6} command which runs a (description "This module provides the @command{prove6} command which runs a
TAP based test suite and prints a report. The @command{prove6} command is a TAP based test suite and prints a report. The @command{prove6} command is a
minimal wrapper around an instance of this module.") minimal wrapper around an instance of this module.")

6
guix/build/rakudo-build-system.scm
View file

@ -36,7 +36,11 @@ (define-module (guix build rakudo-build-system)
(define* (check #:key tests? inputs with-prove6? #:allow-other-keys) (define* (check #:key tests? inputs with-prove6? #:allow-other-keys)
(if (and tests? (assoc-ref inputs "perl6-tap-harness")) (if (and tests? (assoc-ref inputs "perl6-tap-harness"))
;(if (and tests? with-prove6?) ;(if (and tests? with-prove6?)
(invoke "prove6" "-I=lib" "t/") (let ((test-files (find-files "t/" "\\.(rakutest|t|t6)$")))
(invoke "raku" "-MTAP" "-e"
(string-append
"my @tests = <" (string-join test-files " ") ">; "
"TAP::Harness.new().run(@tests);")))
(format #t "test suite not run~%")) (format #t "test suite not run~%"))
#t) #t)