committable6

query

MVM_SPESH_DISABLE=1 f590863e17^,f590863e17 use lib ‘data/all-modules/moritz/json/lib/’; use JSON::Tiny; use Test; my @t = '{ "a" : "b\u00E5" }' => { 'a' => 'bå' }, '[ "\u2685" ]' => [ '⚅' ], qq{"x\c[ZERO WIDTH JOINER]a"} => "x\c[ZERO WIDTH JOINER]a", qq{"\c[ZERO WIDTH JOINER]"} => "\c[ZERO WIDTH JOINER]"; plan (+@t); for @t -> $p { my $got = from-json($p.key); is-deeply $got, $p.value; }

result

¦«f590863e17^»:
1..4
ok 1 - 
ok 2 - 
ok 3 - 
ok 4 - 
¦«f590863»:
1..4
ok 1 - 
ok 2 - 
ok 3 - 
Input (2 characters) is not a valid JSON string
  in sub from-json at /home/bisectable/git/whateverable/data/all-modules/moritz/json/lib/JSON/Tiny.pm (JSON::Tiny) line 59
  in block <unit> at /tmp/SSGbXvwqAP line 1

# Looks like you planned 4 tests, but ran 3 «exit code = 255»