Re: [FWP] Stumper

[Michael G Schwern <schwern@pobox.com>]

On Fri, Mar 16, 2001 at 08:50:46PM +0100, abigail@foad.org wrote:
> >         foo {
> >             bar();
> >             bar();
> >             bar();
> >         };
>
> Is it that you don't want to run the block at all, or just not bar()?

I don't want to run the block at all.  Think of it this way:

        skip {
            my $pig = Pigs->new;
            $pig->takeoff;
            ok( $pig->altitude > 0 );
            ok( $pig->mach >= 2 );
        } Pigs->can('fly');

That is, "don't run this block of tests unless Pigs can fly."  I still
need to know how many tests were inside the block without running them
(so I can report the proper number of "ok 3 # skip"s).  Were I to run
the block it would probably blow up at the first method call (as it
would be unimplemented)

It gets worse if you think about this:

        skip {
            ok( @pigs == 3 );
            foreach my $pig (@pigs) {
                ok( $pig->is_little );
                $pig->takeoff;
                ok( $pig->altitude > 0 );
                ok( $pig->mach >= 2 );
            }
        } Pigs->can('fly');

Halting problem. :(


-- 

Michael G. Schwern   <schwern@pobox.com>    http://www.pobox.com/~schwern/
Perl6 Quality Assurance     <perl-qa@perl.org>	     Kwalitee Is Job One
<Skrewtape> I've heard that semen tastes different depending on diet.  Is that
	    true?
<Skrewtape> Hello?
<Schwern> Skrewtape:  Hang on, I'm conducting research.

==== Want to unsubscribe from Fun With Perl?  Well, if you insist...
==== Send email to <fwp-request@technofile.org> with message _body_
====   unsubscribe