From 074491afb3e7d161b1ee234a4aea155f8bd699d3 Mon Sep 17 00:00:00 2001
From: Elizabeth Mattijsen <liz@raku.rocks>
Date: Sun, 4 Aug 2024 15:16:07 +0200
Subject: [PATCH] Up dependency on JSON::Fast::Hyper

and the test runner
---
 META6.json          |  2 +-
 doc/App-Rak.rakudoc |  1 -
 lib/App/Rak.rakumod |  2 +-
 run-tests           | 10 +++++-----
 4 files changed, 7 insertions(+), 8 deletions(-)

diff --git a/META6.json b/META6.json
index 99f6748..f18e26f 100644
--- a/META6.json
+++ b/META6.json
@@ -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>"
diff --git a/doc/App-Rak.rakudoc b/doc/App-Rak.rakudoc
index fe44be9..3257578 100644
--- a/doc/App-Rak.rakudoc
+++ b/doc/App-Rak.rakudoc
@@ -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
diff --git a/lib/App/Rak.rakumod b/lib/App/Rak.rakumod
index 1118382..5be3496 100644
--- a/lib/App/Rak.rakumod
+++ b/lib/App/Rak.rakumod
@@ -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
 
diff --git a/run-tests b/run-tests
index 7ac0c9c..a833103 100644
--- a/run-tests
+++ b/run-tests
@@ -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(
@@ -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++;
     }
 }
@@ -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;
 }