Skip to content

Commit

Permalink
Up dependency on JSON::Fast::Hyper
Browse files Browse the repository at this point in the history
and the test runner
  • Loading branch information
lizmat committed Aug 4, 2024
1 parent 552d06a commit 074491a
Show file tree
Hide file tree
Showing 4 changed files with 7 additions and 8 deletions.
2 changes: 1 addition & 1 deletion META6.json
Original file line number Diff line number Diff line change
Expand Up @@ -12,7 +12,7 @@
"has-word:ver<0.0.4>:auth<zef:lizmat>",
"highlighter:ver<0.0.19>:auth<zef:lizmat>",
"IO::Path::AutoDecompress:ver<0.0.3>:auth<zef:lizmat>",
"JSON::Fast::Hyper:ver<0.0.6>:auth<zef:lizmat>",
"JSON::Fast::Hyper:ver<0.0.7>:auth<zef:lizmat>",
"META::constants:ver<0.0.4>:auth<zef:lizmat>",
"rak:ver<0.0.59>:auth<zef:lizmat>",
"String::Utils:ver<0.0.24+>:auth<zef:lizmat>"
Expand Down
1 change: 0 additions & 1 deletion doc/App-Rak.rakudoc
Original file line number Diff line number Diff line change
Expand Up @@ -94,7 +94,6 @@ C<--json-per-line> or C<--json-per-elem>. Requires that the
L<C<JSON::Path>|https://raku.land/cpan:JNTHN/JSON::Path> module is installed.
Basically a shortcut to specifying C<path --type=json-path>.


=begin table :caption<Supported JSON path syntax>

expression meaning
Expand Down
2 changes: 1 addition & 1 deletion lib/App/Rak.rakumod
Original file line number Diff line number Diff line change
Expand Up @@ -3,7 +3,7 @@ use as-cli-arguments:ver<0.0.8>:auth<zef:lizmat>; # as-cli-arguments
use has-word:ver<0.0.4>:auth<zef:lizmat>; # has-word
use highlighter:ver<0.0.19>:auth<zef:lizmat>; # columns highlighter matches Type
use IO::Path::AutoDecompress:ver<0.0.3>:auth<zef:lizmat>; # IOAD
use JSON::Fast::Hyper:ver<0.0.6>:auth<zef:lizmat>; # from-json to-json
use JSON::Fast::Hyper:ver<0.0.7>:auth<zef:lizmat>; # from-json to-json
use META::constants:ver<0.0.4>:auth<zef:lizmat> $?DISTRIBUTION;
use rak:ver<0.0.59>:auth<zef:lizmat>; # rak Rak

Expand Down
10 changes: 5 additions & 5 deletions run-tests
Original file line number Diff line number Diff line change
Expand Up @@ -12,12 +12,12 @@ say "Testing {
my @failed;
my $done = 0;

sub process($proc) {
sub process($proc, $filename) {
if $proc {
$proc.out.slurp;
}
else {
@failed.push($_);
@failed.push($filename);
if $proc.out.slurp -> $stdout {
my @lines = $stdout.lines;
with @lines.first(
Expand All @@ -38,14 +38,14 @@ sub process($proc) {
sub install() {
my $zef := $*DISTRO.is-win ?? 'zef.bat' !! 'zef';
my $proc := run $zef, "install", ".", "--verbose", "--/test", :out,:err,:merge;
process($proc);
process($proc, "*installation*");
}

sub test-dir($dir) {
for $dir.IO.dir(:test(*.ends-with: '.t' | '.rakutest')).map(*.Str).sort {
say "=== $_";
my $proc := run "raku", "--ll-exception", "-I.", $_, :out,:err,:merge;
process($proc);
process($proc, $_);
$done++;
}
}
Expand All @@ -55,7 +55,7 @@ test-dir("xt") if $author && "xt".IO.e;
install if $install;

if @failed {
say "FAILED: {+@failed} of $done:";
say "\nFAILED: {+@failed} of $done:";
say " $_" for @failed;
exit +@failed;
}
Expand Down

0 comments on commit 074491a

Please sign in to comment.