Skip to content

Commit 0a66a58

Browse files
committed
rakudo unfudges
1 parent 37f29cd commit 0a66a58

File tree

5 files changed

+0
-8
lines changed

5 files changed

+0
-8
lines changed

‎S02-literals/radix.t

Lines changed: 0 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -2,7 +2,6 @@ use v6;
22
use Test;
33

44
# L<S02/Literals/":10<42>">
5-
#?rakudo skip 'nom regression'
65
is( :10<0>, 0, 'got the correct int value from decimal 0' );
76
is( :10<1>, 1, 'got the correct int value from decimal 1' );
87
is( :10<2>, 0d2, 'got the correct int value from decimal 2' );

‎S03-metaops/hyper.t

Lines changed: 0 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -531,7 +531,6 @@ my @e;
531531
is %r<c>, 8, 'hash - correct result from <<**>>';
532532
}
533533

534-
#?rakudo skip '>>. NYI on hashes'
535534
{
536535
my %a = a => 1, b => -2, c => 3;
537536
my %r = %a>>.abs;

‎S32-list/map.t

Lines changed: 0 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -59,7 +59,6 @@ my @list = (1 .. 5);
5959
'got the values we expect';
6060
}
6161

62-
#?rakudo skip '{; $_ => 1} should be block'
6362
{
6463
my @list = 1 .. 5;
6564
is +(map {;$_ => 1 }, @list), 5,

‎S32-str/substr.t

Lines changed: 0 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -121,7 +121,6 @@ plan 117;
121121
is(substr("hello foo bar", 6, 3), "foo", "substr on literal string");
122122
is("hello foo bar".substr(6, 3), "foo", ".substr on literal string");
123123
is("hello foo bar".substr(6, 3).uc, "FOO", ".substr.uc on literal string");
124-
#?rakudo skip '.capitalize'
125124
is("hello foo bar and baz".substr(6, 10).capitalize, "Foo Bar An", ".substr.capitalize on literal string");
126125
is("hello »« foo".substr(6, 2), "»«", ".substr on unicode string");
127126
is("שיעבוד כבר".substr(4, 4), "וד כ", ".substr on Hebrew text");
@@ -156,7 +155,6 @@ sub l (Int $a) { my $l = $a; return $l }
156155
substr($str, 2, l(1), "i");
157156
is($str, "foibar", "fourth arg to substr replaced part (substr(Int, StrLen)).");
158157

159-
#?rakudo skip 'whatever closure'
160158
substr($str, *-1, l(1), "blah");
161159
is($str, "foibablah", "longer replacement expands string (substr(Int, StrLen)).");
162160

@@ -239,7 +237,6 @@ sub l (Int $a) { my $l = $a; return $l }
239237
is(substr("hello foo bar", 6, l(3)), "foo", "substr on literal string (substr(Int, StrLen)).");
240238
is("hello foo bar".substr(6, l(3)), "foo", ".substr on literal string (substr(Int, StrLen)).");
241239
is("hello foo bar".substr(6, l(3)).uc, "FOO", ".substr.uc on literal string (substr(Int, StrLen)).");
242-
#?rakudo skip '.capitalize'
243240
is("hello foo bar and baz".substr(6, l(10)).capitalize, "Foo Bar An", ".substr.capitalize on literal string (substr(Int, StrLen)).");
244241
is("hello »« foo".substr(6, l(2)), "»«", ".substr on unicode string (substr(Int, StrLen)).");
245242
is("שיעבוד כבר".substr(4, l(4)), "וד כ", ".substr on Hebrew text (substr(Int, StrLen)).");
@@ -355,7 +352,6 @@ sub p (Int $a) { my $p = $a; return $p }
355352
is(substr("hello foo bar", 6, p(3)), "foo", "substr on literal string (substr(Int, StrPos)).");
356353
is("hello foo bar".substr(6, p(3)), "foo", ".substr on literal string (substr(Int, StrPos)).");
357354
is("hello foo bar".substr(6, p(3)).uc, "FOO", ".substr.uc on literal string (substr(Int, StrPos)).");
358-
#?rakudo skip '.capitalize'
359355
is("hello foo bar and baz".substr(6, p(10)).capitalize, "Foo Bar An", ".substr.capitalize on literal string (substr(Int, StrPos)).");
360356
is("hello »« foo".substr(6, p(2)), "»«", ".substr on unicode string (substr(Int, StrPos)).");
361357
is("שיעבוד כבר".substr(4, p(4)), "וד כ", ".substr on Hebrew text (substr(Int, StrPos)).");

‎integration/99problems-31-to-40.t

Lines changed: 0 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -220,7 +220,6 @@ plan 67;
220220
skip 'No Benchmark module yet', 1
221221
}
222222

223-
#?rakudo skip 'nom regression - need ceiling'
224223
#?DOES 2
225224
{
226225
# P39 (*) A list of prime numbers.

0 commit comments

Comments
 (0)