[perl #116775] Broken test t/op/groups.t

On Fri Jul 12 18:24:55 2013, jkeenan wrote:
> On Sun Feb 17 15:42:59 2013, jbenjore wrote:
> > It is possible that on Darwin perl's $( should call the libc function 
> > getgrouplist(3) *instead* of getgroups(2). The libc function consults 
> > Open Directory and is not limited by the kernel's NGROUPS_MAX 
> > allocation.
> > 
> > Further, it is just a rank stupid bug that this code can run and omit at 
> > least a "not ok 1". Apologies for 
> > http://perl5.git.perl.org/perl.git/blob/651d4685ebdde5512841551572b29e74
> > 605bfc38:/t/op/groups.t#l120 which clearly allows for a missing "not ok 
> > 1".

The suggestion to enhance the test in the first quoted paragraph aside, the present bug is that a failing test here looks like "tests out of sequence" and "bad plan" instead of "FAILED". The attached patch will correct that issue.

-- 
Respectfully,
Dan Collins

• [perl #116775] Broken test t/op/groups.t by James E Keenan via RT
• [perl #116775] Broken test t/op/groups.t by Dan Collins via RT