Re: Please Test: AutoInactiveDestroy

Okay, something funky with threads on Win32 I guess. Any ideas, Tim? 'Cause I'm fresh out.

Best,

David

On Jul 27, 2010, at 11:52 AM, John Scoles wrote:

> Ah what do you want that for It will just mess up your email ;)
> 
> 
> t/zvp_16destroy.t .......... 1/20     -> DBI->install_driver(Test) for MSWin32 perl=5.0100
> 01 pid=2200 ruid=0 euid=0
>      install_driver: DBD::Test version undef loaded from dummy
>   New DBI::dr (for DBD::Test::dr, parent=, id=77)
>     _setup_handle(DBI::dr=HASH(0x18df61c) DBD::Test::dr  77)
>   <- install_driver= DBI::dr=HASH(0x18df61c)
>   > connect in DBD::Test::dr ('DBI::dr=HASH(0x1a459b4)') []
>   New DBI::db (for DBD::Test::db, parent=DBI::dr=HASH(0x1a459b4), id=)
>     _setup_handle(DBI::db=HASH(0x19428b4) DBD::Test::db DBI::dr=HASH(0x1a459b4) )
>   > STORE in DBD::Test::db ('DBI::db=HASH(0x1938f7c)' 'Active' 1) []
>   < STORE= 1 at ./t/16destroy.t line 44
>   > STORE in DBD::Test::db ('DBI::db=HASH(0x1938f7c)' 'AutoCommit' 1) []
>   < STORE= 1 at ./t/16destroy.t line 45
>   < connect= 'DBI::db=HASH(0x19428b4)' at ./t/16destroy.t line 93
>   > FETCH in DBD::Test::db ('DBI::db=HASH(0x1938f7c)' 'Active') []
>   < FETCH= 1 at C:/Perl/lib/Test/More.pm line 292
>   > DESTROY in DBD::Test::db ('DBI::db=HASH(0x1938f7c)') []
>   > FETCH in DBD::Test::db ('DBI::db=HASH(0x1938f7c)' 'Active') []
>   < FETCH= 1 at ./t/16destroy.t line 82
>   < DESTROY= 1 at ./t/16destroy.t line 95
>   > connect in DBD::Test::dr ('DBI::dr=HASH(0x1a459b4)' 'dbi:ExampleP:dummy' '' '' 'HASH
> (0x19428b4)') []
>   New DBI::db (for DBD::Test::db, parent=DBI::dr=HASH(0x1a459b4), id=)
>     _setup_handle(DBI::db=HASH(0x1fbaab4) DBD::Test::db DBI::dr=HASH(0x1a459b4) )
>   > STORE in DBD::Test::db ('DBI::db=HASH(0x1b009a4)' 'Active' 1) []
>   < STORE= 1 at ./t/16destroy.t line 44
>   > STORE in DBD::Test::db ('DBI::db=HASH(0x1b009a4)' 'AutoCommit' 1) []
>   < STORE= 1 at ./t/16destroy.t line 45
>   > STORE in DBD::Test::db ('DBI::db=HASH(0x1b009a4)' 'InactiveDestroy' 1) []
>   < STORE= 1 at ./t/16destroy.t line 46
>   < connect= 'DBI::db=HASH(0x1fbaab4)' at ./t/16destroy.t line 102
>   > FETCH in DBD::Test::db ('DBI::db=HASH(0x1b009a4)' 'InactiveDestroy') []
>   < FETCH= 1 at C:/Perl/lib/Test/More.pm line 292
>   > FETCH in DBD::Test::db ('DBI::db=HASH(0x1b009a4)' 'Active') []
>   < FETCH= 1 at C:/Perl/lib/Test/More.pm line 292
>   > DESTROY in DBD::Test::db ('DBI::db=HASH(0x1b009a4)') []
>   > FETCH in DBD::Test::db ('DBI::db=HASH(0x1b009a4)' 'Active') []
>   < FETCH= 0 at ./t/16destroy.t line 82
>   < DESTROY= 1 at ./t/16destroy.t line 102
>   > connect in DBD::Test::dr ('DBI::dr=HASH(0x1a459b4)' 'dbi:ExampleP:dummy' '' '' 'HASH
> (0x1fbaab4)') []
>   New DBI::db (for DBD::Test::db, parent=DBI::dr=HASH(0x1a459b4), id=)
>     _setup_handle(DBI::db=HASH(0x1fe004c) DBD::Test::db DBI::dr=HASH(0x1a459b4) )
>   > STORE in DBD::Test::db ('DBI::db=HASH(0x1fbaaf4)' 'Active' 1) []
>   < STORE= 1 at ./t/16destroy.t line 44
>   > STORE in DBD::Test::db ('DBI::db=HASH(0x1fbaaf4)' 'AutoCommit' 1) []
>   < STORE= 1 at ./t/16destroy.t line 45
>   > STORE in DBD::Test::db ('DBI::db=HASH(0x1fbaaf4)' 'AutoInactiveDestroy' 1) []
>   < STORE= 1 at ./t/16destroy.t line 46
>   < connect= 'DBI::db=HASH(0x1fe004c)' at ./t/16destroy.t line 111
>   > FETCH in DBD::Test::db ('DBI::db=HASH(0x1fbaaf4)' 'AutoInactiveDestroy') []
>   < FETCH= 1 at C:/Perl/lib/Test/More.pm line 292
>   > FETCH in DBD::Test::db ('DBI::db=HASH(0x1fbaaf4)' 'Active') []
>   < FETCH= 1 at C:/Perl/lib/Test/More.pm line 292
>   > DESTROY in DBD::Test::db ('DBI::db=HASH(0x1fbaaf4)') []
>   > FETCH in DBD::Test::db ('DBI::db=HASH(0x1fbaaf4)' 'Active') []
>   < FETCH= 1 at ./t/16destroy.t line 82
>   < DESTROY= 1 at ./t/16destroy.t line 111
>   > connect in DBD::Test::dr ('DBI::dr=HASH(0x1a459b4)' 'dbi:ExampleP:dummy' '' '' 'HASH
> (0x1fe004c)') []
>   New DBI::db (for DBD::Test::db, parent=DBI::dr=HASH(0x1a459b4), id=)
>     _setup_handle(DBI::db=HASH(0x1a45934) DBD::Test::db DBI::dr=HASH(0x1a459b4) )
>   > STORE in DBD::Test::db ('DBI::db=HASH(0x1fe033c)' 'Active' 1) []
>   < STORE= 1 at ./t/16destroy.t line 44
>   > STORE in DBD::Test::db ('DBI::db=HASH(0x1fe033c)' 'AutoCommit' 1) []
>   < STORE= 1 at ./t/16destroy.t line 45
>   > STORE in DBD::Test::db ('DBI::db=HASH(0x1fe033c)' 'AutoInactiveDestroy' 1) []
>   < STORE= 1 at ./t/16destroy.t line 46
>   < connect= 'DBI::db=HASH(0x1a45934)' at ./t/16destroy.t line 120
>   > FETCH in DBD::Test::db ('DBI::db=HASH(0x1fe033c)' 'AutoInactiveDestroy') []
>   < FETCH= 1 at C:/Perl/lib/Test/More.pm line 292
>   > FETCH in DBD::Test::db ('DBI::db=HASH(0x1fe033c)' 'Active') []
>   < FETCH= 1 at C:/Perl/lib/Test/More.pm line 292
> CLONE DBI for new thread
>   > DESTROY in DBD::Test::db ('DBI::db=HASH(0x202058c)') []
>   > FETCH in DBD::Test::db ('DBI::db=HASH(0x202058c)' 'Active') []
>   < FETCH= 0 at ./t/16destroy.t line 79
>   -- DBI::END ($@: , $!: )
>   > DESTROY in DBD::Test::db ('DBI::db=HASH(0x202058c)') []
>   > FETCH in DBD::Test::db ('DBI::db=HASH(0x202058c)' 'Active') []
>   < FETCH= 0 at ./t/16destroy.t line 79
>> On Jul 27, 2010, at 11:17 AM, John Scoles wrote:
>> 
>>  
>>> David E. Wheeler wrote:
>>> 
>>> now we are getting
>>> 
>>> t/zvp_16destroy.t        (Wstat: 0 Tests: 18 Failed: 0)
>>> Parse errors: Bad plan.  You planned 20 tests but ran 18.
>>> t/zvxgp_16destroy.t      (Wstat: 0 Tests: 18 Failed: 0)
>>> Parse errors: Bad plan.  You planned 20 tests but ran 18.
>>> Files=171, Tests=6280, 223 wallclock secs ( 3.73 usr +  0.70 sys =  4.44 CPU)
>>> Result: FAIL
>>> Failed 2/171 test programs. 0/6280 subtests failed.
>>> NMAKE :  U1077:
>>> Stop.