Skip to content

Commit

Permalink
[t/spec] Unfudge some parallel dispatch tests in S03-operators/hyper.…
Browse files Browse the repository at this point in the history
…t and remove a stray :todo.

git-svn-id: http://svn.pugscode.org/pugs@26806 c213334d-75ef-0310-aa23-eaa082d1ae64
  • Loading branch information
jnthn committed May 12, 2009
1 parent 84e9d10 commit b7e4ed5
Showing 1 changed file with 1 addition and 4 deletions.
5 changes: 1 addition & 4 deletions S03-operators/hyper.t
Original file line number Diff line number Diff line change
Expand Up @@ -157,7 +157,6 @@ my @e;
is(~@r, ~@e, "list-level element extension on lhs");
};

#?rakudo todo '>>.'
{ # unary postfix with integers
my @r;
eval '@r = (1, 4, 9)».sqrt';
Expand All @@ -169,7 +168,6 @@ my @e;
is(~@r, ~@e, "method call on integer list elements (ASCII)");
};

#?rakudo todo '>>.'
{ # unary postfix again, but with a twist
my @r;
eval '@r = ("f", "oo", "bar")».chars';
Expand All @@ -181,7 +179,6 @@ my @e;
is(~@r, ~@e, "method call on list elements (ASCII)");
};

#?rakudo skip '>>.'
{ # unary postfix on a user-defined object
my $t;
class FooTest { method bar { 42 } }; $t = FooTest.new.bar;
Expand All @@ -190,7 +187,7 @@ my @e;
my @r;
class FooTest2 { method bar { 42 } }; @r = (FooTest2.new)>>.bar;
my @e = (42);
is(~@r, ~@e, "hyper-method-call on list of user-defined objects" :todo);
is(~@r, ~@e, "hyper-method-call on list of user-defined objects");
};

#?rakudo skip 'unicode'
Expand Down

0 comments on commit b7e4ed5

Please sign in to comment.