On Mon, Jan 28, 2002 at 09:36:19PM -0500, Dan Sugalski wrote:
> At 7:47 PM -0500 1/28/02, Michael G Schwern wrote:
> >On Mon, Jan 28, 2002 at 04:07:06PM -0500, Dan Sugalski wrote:
> >> At 1:55 AM -0500 1/28/02, Michael G Schwern wrote:
> >> >This patch seems to have slipped by in the post New Year's haze.  It
> >> >updates Parrot's version of Test::More to 0.41 and makes Parrot::Test
> >> >use Test::Builder instead of doing Evil things to Test::More.
> >>
> >> Where's Test/Builder.pm, though?
> >
> >Hells bells.  Here it is.
> 
> And the patch is in. Thanks.

*kaboom*

>From the commit log:

    Parrot::Test no longer exports Test::More's functions.  Instead they
    can simply be used together.  The few tests which used Test::More
    features (ie. skip) have 'use Test::More' added.

No they can't (be used together):

  % perl t/op/stacks.t     
  1..15
  ok 1 - pushi & popi
  ok 2 - pushs & pops
  ok 3 - pushn & popn
  ok 4 - pushp & popp
  ok 5 - save_i & restore_i
  ok 6 - ENO I frames
  ok 7 - ENO N frames
  ok 8 - ENO S frames
  ok 9 - rotate 0
  ok 10 - rotate 1
  ok 11 - rotate 2
  ok 12 - rotate 3
  ok 13 - save, restore
  ok 14 - entrytype
  You tried to use ok() without a plan!  Gotta have a plan.
    use Test::Simple tests => 23;   for example.
  # Looks like you planned 15 tests but only ran 14.

If I do

  use Parrot::Test tests => 15;
- use Test::More;
+ use Test::More tests => 15;

then they fight over the tests.

  1..15
  1..15
  ok 1 - pushi & popi
  ok 2 - pushs & pops
  ok 3 - pushn & popn
  ok 4 - pushp & popp
  ok 5 - save_i & restore_i
  ok 6 - ENO I frames
  ok 7 - ENO N frames
  ok 8 - ENO S frames
  ok 9 - rotate 0
  ok 10 - rotate 1
  ok 11 - rotate 2
  ok 12 - rotate 3
  ok 13 - save, restore
  ok 14 - entrytype
  ok 1 # skip Await exceptions
  # Looks like you planned 15 tests but only ran 1.
  # Looks like you planned 15 tests but only ran 14.

Reply via email to