committable6

query

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 - 
not ok 2 - 

# Failed test at /tmp/TCby7YoXUO line 1
# expected: $["?"]
#      got: $["⚅"]
ok 3 - 
ok 4 - 
# Looks like you failed 1 test of 4 «exit code = 1»
¦«f590863»:
1..4
ok 1 - 
not ok 2 - 

# Failed test at /tmp/TCby7YoXUO line 1
# expected: $["?"]
#      got: $["⚅"]
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/TCby7YoXUO line 1

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