Re: Perl 6 and Test.pm's skip() function

2009-01-21 Thread Aristotle Pagaltzis
* Ovid [2009-01-21 23:15]: > Now that I think about it, the only reason we have this: > > multisub skip(Str $reason); > > ... is because we want a default value of 1 for the number of > tests to skip. Eliminate that default and the entire problem > goes away. You must *always* specify the number

Re: Perl 6 and Test.pm's skip() function

2009-01-21 Thread David E. Wheeler
On Jan 21, 2009, at 2:13 PM, Ovid wrote: ... is because we want a default value of 1 for the number of tests to skip. Eliminate that default and the entire problem goes away. You must *always* specify the number of tests to skip. $reason is optional. Sound good? Yes, but can the numbe

Re: Perl 6 and Test.pm's skip() function

2009-01-21 Thread Ovid
- Original Message > From: chromatic > *Every* time I use skip() in Perl 5, I have to remember the rule that the > *description* comes first, and the the test number. I only fail to make this > mistake if I've already made it within the past five minutes. Agreed. I'm bitten by this

Re: Perl 6 and Test.pm's skip() function

2009-01-21 Thread chromatic
On Wednesday 21 January 2009 13:47:24 Ovid wrote: > If a programmer listed '3' as their skip reason, that would be interpreted > as the number of tests to skip. Admittedly, it would be stupid for > programmers to do that (and unlikely that they would), but we shouldn't be > telling them "here's an

Re: Perl 6 and Test.pm's skip() function

2009-01-21 Thread Kineticode Billing
On Jan 21, 2009, at 1:47 PM, Ovid wrote: What do you mean? If a programmer listed '3' as their skip reason, that would be interpreted as the number of tests to skip. Admittedly, it would be stupid for programmers to do that (and unlikely that they would), but we shouldn't be telling them

Re: Perl 6 and Test.pm's skip() function

2009-01-21 Thread Ovid
- Original Message > From: David E. Wheeler > > # Won't get called unless the string has a non-digit in it > > multisub skip( Str $desc where { $desc ~~ /\D/ } ); > > > > Thus, you could call this and it will still DWIM: > > > > if $cond { > > skip "3"; > > else { > > #

Re: Perl 6 and Test.pm's skip() function

2009-01-21 Thread David E. Wheeler
On Jan 21, 2009, at 10:47 AM, Ovid wrote: However, that's going to break if $count is a string, right? Thought this might work as a heuristic for that third definition: # Won't get called unless the string has a non-digit in it multisub skip( Str $desc where { $desc ~~ /\D/ } ); Thus, you

Perl 6 and Test.pm's skip() function

2009-01-21 Thread Ovid
Background: I know many of you aren't working with Perl 6 and if you're not interested, feel free to ignore :) I'm working on Test.pm, the core Perl 6 testing module. I'm trying to get it up to speed, including diagnostics. What follows is a tiny problem with &skip. The skip multisub in Raku