use v6;
use lib <t/spec/packages>;
use Test;
use Test::Util;

plan 1;

# Some things don't stringify well, so cmp-ok should show something better
# for them, like .gist or .perl:
is_run ｢use Test; cmp-ok 'foo', '~~', class {
    method perl { 'meowbar' }
    method gist { 'meowbar' }
    method Str  { die 'test failed' }
}.new｣, {:err(/meowbar/)},
'cmp-ok makes $expected more presentable than just its .Str';


use v6;
use lib <t/spec/packages>;
use Test;
use Test::Util;

plan 2;

# Some things don't stringify well, so cmp-ok should show something better
# for them, like .gist or .perl:
is_run ｢use Test; cmp-ok 'foo', '~~', class {
    method perl { 'meowbar' }
    method gist { 'meowbar' }
    method Str  { die 'test failed' }
}.new｣, {:err(/meowbar/)},
'cmp-ok makes $expected more presentable than just its .Str';

cmp-ok Mu, '=:=', Mu, 'can use cmp-ok with `=:=` operator';

Test cmp-ok() can be used with =:= op
Test cmp-ok() can be used with =:= op

Rakudo impl: https://github.com/rakudo/rakudo/commit/3684384db1
