- Timestamp:
- 10/01/08 09:21:40 (2 months ago)
- Files:
-
- 1 modified
-
t/spec/S12-methods/indirect_notation.t (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
t/spec/S12-methods/indirect_notation.t
r21722 r22470 30 30 31 31 is( $o.a(), 'test', "The indirect object notation call without argument 1" ); 32 #?rakudo skip 'unimpl parse error near $o:' 32 33 is( (a $o:), 'test', "The indirect object notation call without arguments 2" ); 33 34 } … … 47 48 my $seed = 1000.rand; 48 49 is( $o.a( $seed ), $seed, "The indirect object notation call with argument 1" ); 50 #?rakudo skip 'unimpl parse error near $o:' 49 51 is( (a $o: $seed), $seed, "The indirect object notation call with arguments 2" ); 50 52 my $name = 'a';
