Front page | perl.perl5.porters |
Postings from September 2010
Re: fresh_perl failure
Thread Previous
|
Thread Next
From:
Tony Cook
Date:
September 20, 2010 03:01
Subject:
Re: fresh_perl failure
Message ID:
20100920100129.GA9045@mars.tony.develop-help.com
On Mon, Sep 20, 2010 at 10:48:15AM +0100, Dave Mitchell wrote:
> On Mon, Sep 20, 2010 at 10:18:20AM +0100, Nicholas Clark wrote:
> > On Mon, Sep 20, 2010 at 10:57:05AM +0200, Rafael Garcia-Suarez wrote:
> > > t/run/fresh_perl.t fails for me on linux and OSX :
> > >
> > > run/fresh_perl.t (Wstat: 0 Tests: 94 Failed: 5)
> > > Failed tests: 49-53
> > >
> > > Apparently since this commit :
> > >
> > >
> > > commit 57ef47cc7bcd1b57927d5010f363ccaa10f1d990
> > > Author: David Mitchell <davem@iabyn.com>
> > > Date: Sat Sep 18 23:01:54 2010 +0100
> >
> > That commit passes with -DDEBUGGING and PERL_DESTRUCT_LEVEL=2 in the
> > environment, and not otherwise.
> >
> > I'm not accepting bets on what Dave's usual build/test config is :-)
>
> I can't reproduce this at all. Anyone have a failing config and invocation
> to show me?
>
> --
> You never really learn to swear until you learn to drive.
On dromedary, fresh clone:
[tonyc@dromedary perl]$ ./Configure -des -Dusedevel
...
[tonyc@dromedary perl]$ make -j6 test_prep && ( cd t ; ./perl -I../lib run/fresh_perl.t )
...
ok 48 - fresh_perl - sub testme { my $a = "test"; { local $a = "new tes...
# PROG:
# package X;
# sub ascalar { my $r; bless \$r }
# sub DESTROY { print "destroyed\n" };
# package main;
# *s = ascalar X;
# EXPECTED:
# destroyed
# GOT:
# STATUS: 0
not ok 49 - fresh_perl - package X;
# Failed at run/fresh_perl.t line 55
# PROG:
# package X;
# sub anarray { bless [] }
# sub DESTROY { print "destroyed\n" };
# package main;
# *a = anarray X;
# EXPECTED:
# destroyed
# GOT:
# STATUS: 0
not ok 50 - fresh_perl - package X;
# Failed at run/fresh_perl.t line 55
# PROG:
# package X;
# sub ahash { bless {} }
# sub DESTROY { print "destroyed\n" };
# package main;
# *h = ahash X;
# EXPECTED:
# destroyed
# GOT:
# STATUS: 0
not ok 51 - fresh_perl - package X;
# Failed at run/fresh_perl.t line 55
# PROG:
# package X;
# sub aclosure { my $x; bless sub { ++$x } }
# sub DESTROY { print "destroyed\n" };
# package main;
# *c = aclosure X;
# EXPECTED:
# destroyed
# GOT:
# STATUS: 0
not ok 52 - fresh_perl - package X;
# Failed at run/fresh_perl.t line 55
ok 53 - fresh_perl - package X;
...
Tony
Thread Previous
|
Thread Next