Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
niecza fudge
  • Loading branch information
coke committed Sep 7, 2013
1 parent ac4e4e3 commit 203f3c7
Show file tree
Hide file tree
Showing 5 changed files with 5 additions and 5 deletions.
1 change: 0 additions & 1 deletion S02-magicals/env.t
Expand Up @@ -100,7 +100,6 @@ eval_dies_ok("%ENV", '%ENV not visible by default');
}

# RT #77458
#?niecza 2 todo 'Use of Nil as a string'
#?pugs 2 todo 'Cant modify constant item: VUndef'
{
%*ENV<abc> = 'def';
Expand Down
1 change: 1 addition & 0 deletions S02-types/keybag.t
Expand Up @@ -63,6 +63,7 @@ sub showkv($x) {
is $b<a>, 42, "... and the decrement happens";
lives_ok { $b<carter>-- }, "Can -- an element with value 1";
nok $b.exists("carter"), "... and it goes away";
#?niecza todo
dies_ok { $b<farve>-- }, "Cannot -- an element that doesn't exist";
nok $b.exists("farve"), "... and everything is still okay";
}
Expand Down
3 changes: 2 additions & 1 deletion S03-junctions/boolean-context.t
Expand Up @@ -72,14 +72,15 @@ ok do if 1 | 2 | 3 == 2 { 1 } else { 0 }, "3x very simple invocation of | and &
ok do if 2 & 2 & 2 == 2 { 1 } else { 0 };
ok do if 2 & 2 & 2 == 3 { 0 } else { 1 };

#?niecza todo "Difficulties overloading | and &"
{
my $foo = 0;
sub infix:<|>(*@a) { $foo++; any(|@a) };
sub infix:<&>(*@a) { $foo++; all(|@a) };
ok do if 1 | 2 | 3 | 4 == 3 { 1 } else { 0 }, "4x local sub shadows | and &";
#?niecza todo "Difficulties overloading | and &"
is $foo, 1;
ok do if 1 & 2 & 3 & 4 == 3 { 0 } else { 1 };
#?niecza todo "Difficulties overloading | and &"
is $foo, 2;
}

Expand Down
1 change: 0 additions & 1 deletion S04-statements/terminator.t
Expand Up @@ -54,7 +54,6 @@ eval_dies_ok "42 if 23\nis 50; 1",
eval_dies_ok '(1) { $foo = 2 }', 'parens do not eat spaces after them';

# RT #79964
#?niecza todo
#?pugs todo
eval_lives_ok q:b"my &f;\nsub g() { }\n&f;", 'implicit terminator before & sigil';

Expand Down
4 changes: 2 additions & 2 deletions S29-conversions/ord_and_chr.t
Expand Up @@ -164,11 +164,11 @@ ok !defined(ord("")), 'ord("") returns an undefined value';
is "\c[DROMEDARY CAMEL]".ord, 0x1F42A, "ord of named high character";
is chr(0x1F42A).ord, 0x1F42A, "chr > ord round trip of high character";

#?niecza todo
{
is "\c[LATIN CAPITAL LETTER A WITH DOT ABOVE]".ord, 550, '.ord defaults to graphemes (2)';

#?rakudo todo 'RT #65172 - combining graphemes'
#?rakudo todo 'RT #65172 - combining graphemes'
#?niecza todo
is "\c[LATIN CAPITAL LETTER A, COMBINING DOT ABOVE]".ord, 550, '.ord defaults to graphemes (1)';

}
Expand Down

0 comments on commit 203f3c7

Please sign in to comment.