Skip to content

Commit

Permalink
rakudo unfudges
Browse files Browse the repository at this point in the history
  • Loading branch information
moritz committed Jul 30, 2011
1 parent 3a7b996 commit f555c5c
Show file tree
Hide file tree
Showing 7 changed files with 0 additions and 7 deletions.
1 change: 0 additions & 1 deletion S02-names_and_variables/variables-and-packages.t
Expand Up @@ -5,7 +5,6 @@ use Test;
plan 37;

# L<S02/Names/"The following pseudo-package names are reserved">
#?rakudo 9 skip 'names of pseudo packages should be reserved'
ok !eval('module MY; 1'), 'MY is an out of scope name';
ok !eval('module OUR; 1'), 'OUR is an out of scope name';
ok !eval('module GLOBAL; 1'), 'GLOBAL is an out of scope name';
Expand Down
1 change: 0 additions & 1 deletion S03-operators/chained-declarators.t
Expand Up @@ -15,7 +15,6 @@ plan 5;
is((try { my $a1 = my $b1 = 42; $b1++; "$a1, $b1" }), '42, 43', "chained my");
is((try { my $a2 = our $b2 = 42; $b2++; "$a2, $b2" }), '42, 43', "chained my, our");
is((try { my $a4 = constant $b4 = 42; "$a4, $b4" }), '42, 42', "chained my, constant");
#?rakudo skip 'state'
is((try { my $a5 = state $b5 = 42; $b5++; "$a5, $b5" }), '42, 43', "chained my, state");

# scoping
Expand Down
1 change: 0 additions & 1 deletion S04-statements/gather.t
Expand Up @@ -137,7 +137,6 @@ plan 17;
is ~@list, "2 4 6 8 10", "gather with nested loop";
}

#?rakudo skip 'nom regression'
{
is (gather { take 1, 2, 3; take 4, 5, 6; }).elems, 2,
'take with multiple arguments produces one item each';
Expand Down
1 change: 0 additions & 1 deletion S04-statements/given.t
Expand Up @@ -209,7 +209,6 @@ Tests the given block, as defined in L<S04/"Switch statements">
my $t = TestIt.new;
given $t { when TestIt { $passed = 1;} };
is($passed, 1,'when Type {}');
#?rakudo skip ".isa(TestIt) goes kaboom"
{
$passed = 0;
given $t { when .isa(TestIt) { $passed = 1;}};
Expand Down
1 change: 0 additions & 1 deletion S06-advanced_subroutine_features/return.t
Expand Up @@ -324,7 +324,6 @@ is Foo::official(), 44,
# RT #63912
{
sub rt63912 { return 1, 2; }
#?rakudo todo 'RT 63912'
lives_ok { rt63912() }, 'can call sub that returns two things (no parens)';
}

Expand Down
1 change: 0 additions & 1 deletion S12-enums/basic.t
Expand Up @@ -98,7 +98,6 @@ dies_ok({ my Color $c3 = "for the fail" }, 'enum as a type enforces checks');
ok Color.pick(2) == 2, '.pick(2) on enums';
}

#?rakudo skip 'RT 71460: Null PMC access'
{
enum RT71460::Bug <rt71460 bug71460 ticket71460>;
ok bug71460 == 1, 'enum element of enum with double colons is in namespace';
Expand Down
1 change: 0 additions & 1 deletion integration/99problems-01-to-10.t
Expand Up @@ -115,7 +115,6 @@ plan 22;
'We should be able to flatten lists by func';
}

#?rakudo skip 'state variables'
{
# P08 (**) Eliminate consecutive duplicates of list elements.
#
Expand Down

0 comments on commit f555c5c

Please sign in to comment.