Re: Please Test: AutoInactiveDestroy

David E. Wheeler 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.
>>     
>
> Verbose?
>
> Best,
>
> David
>
>