Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
Fudge tests returning Int instead of Bool for JVM
  • Loading branch information
usev6 committed Dec 8, 2015
1 parent 2ef9aad commit e23a58d
Show file tree
Hide file tree
Showing 4 changed files with 4 additions and 0 deletions.
1 change: 1 addition & 0 deletions S03-junctions/autothreading.t
Expand Up @@ -290,6 +290,7 @@ plan 104;
# L<S03/Junctive operators/Use of negative operators with junctions>
{
my Mu $x = 'a' ne ('a'|'b'|'c');
#?rakudo.jvm todo 'got (Int) instead of (Bool)'
ok $x ~~ Bool, 'infix:<ne> collapses the junction (1)';
ok $x !~~ Junction, 'infix:<ne> collapses the junction (2)';
nok $x, '... and the result is False';
Expand Down
1 change: 1 addition & 0 deletions S03-operators/basic-types.t
Expand Up @@ -70,6 +70,7 @@ my $string = "Hello World";
isa-ok($string, Str, 'it is a Str type');

my $bool = (0 == 0);
#?rakudo.jvm todo 'got (Int) instead of (Bool)'
isa-ok($bool, Bool, 'it is a Bool type');

my $pair = ("foo" => "bar");
Expand Down
1 change: 1 addition & 0 deletions S03-operators/boolean-bitwise.t
Expand Up @@ -87,5 +87,6 @@ plan 45;
isa-ok infix:<?^>(), Bool, '?^ with no arguments yields a Bool';
}

#?rakudo.jvm 2 todo 'got (Int) instead of (Bool)'
ok (?^5) === False, 'prefix ?^ (+)';
ok (?^0) === True, 'prefix ?^ (-)';
1 change: 1 addition & 0 deletions S32-scalar/defined.t
Expand Up @@ -134,6 +134,7 @@ ok defined(%a{"a"}), "defined on a hash with parens (1)";
ok !defined(%a{"b"}), "defined on a hash with parens (2)";

# RT #76448
#?rakudo.jvm todo 'got (Int) instead of (Bool)'
ok defined('a' => 5) ~~ Bool, 'defined is a listop, not a prefix op';
ok &defined, '&defined is available';

Expand Down

0 comments on commit e23a58d

Please sign in to comment.