On 02/07/06, chromatic <[EMAIL PROTECTED]> wrote:
On Saturday 01 July 2006 16:46, Fergal Daly wrote:

> It looks like it's only one level of nesting. Any reason not to go the
> whole hog with something like
>
> ..1
> OK 1
> ..2
> ...1
> OK 2
> OK 3
> ...2
> OK 4
> ..3
> OK5

No one has provided an actual use case for it yet.  YAGNI.

I think I've misinterpreted the numbers. Each one is a plan, not a group number.

Here's the use case I was thinking of

use Test::More tests => 1;

my $l = Leopard->new();
IsALeopard($l);

sub IsALeopard {
 my $thing = shift;
 my $g = Group(tests => 4);
 IsACat($thing);
 HasSpots($thing);
 Colour("yellow");
 Colour("black");
 # $g gets destroyed, we leave the block
}

sub IsACat {
 my $thing = shift;

 my $g = Group(test => 3);
 IsAMammal($thing);
 HasWhiskers($thing);
 Likes("milk");
 # $g gets destroyed, we leave the block
}

which isn't supported supported by the above,

F

Reply via email to