Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
Fix fudging (and number of tests)
  • Loading branch information
usev6 committed Apr 17, 2015
1 parent 874a8ba commit 51e1489
Showing 1 changed file with 8 additions and 8 deletions.
16 changes: 8 additions & 8 deletions S12-introspection/methods.t
Expand Up @@ -2,7 +2,7 @@ use v6;

use Test;

plan 58;
plan 57;

=begin pod
Expand Down Expand Up @@ -124,13 +124,13 @@ is @methods[1].name, 'foo', 'methods call found public method in superclass (
ok @methods[2].name ne '!pm1', 'methods call did not find private method in superclass';

#?rakudo skip 'nom regression'
@methods = PT2.^methods(:private);
#?rakudo todo 'nom regression'
ok @methods[0].name eq '!pm2' || @methods[1].name eq '!pm2',
'methods call with :private found private method in subclass';
#?rakudo todo 'nom regression'
ok @methods[2].name eq '!pm1' || @methods[3].name eq '!pm1',
'methods call with :private found private method in superclass';
{
@methods = PT2.^methods(:private);
ok @methods[0].name eq '!pm2' || @methods[1].name eq '!pm2',
'methods call with :private found private method in subclass';
ok @methods[2].name eq '!pm1' || @methods[3].name eq '!pm1',
'methods call with :private found private method in superclass';
}

@methods = PT2.^methods(:local);
is +@methods, 1, 'methods call without :private omits private methods (with :local)';
Expand Down

0 comments on commit 51e1489

Please sign in to comment.