David E. Wheeler wrote:
ok here you go with Debug set to 15
t/zvp_16destroy.t .......... DBI 1.613 (PurePerl) dispatch trace
level set to 15
C:\dbi\trunk\blib\lib/DBI/PurePerl.pm version 2.014285
t/zvp_16destroy.t .......... 1/20 -> DBI->install_driver(Test) for
MSWin32 perl=5.0100
01 pid=5848 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(0x18df5d4) DBD::Test::dr 77)
<- install_driver= DBI::dr=HASH(0x18df5d4)
> connect in DBD::Test::dr ('DBI::dr=HASH(0x1a45834)') []
New DBI::db (for DBD::Test::db, parent=DBI::dr=HASH(0x1a45834), id=)
_setup_handle(DBI::db=HASH(0x1a2942c) DBD::Test::db
DBI::dr=HASH(0x1a45834) )
> STORE in DBD::Test::db ('DBI::db=HASH(0x1a2987c)' 'Active' 1) []
< STORE= 1 at ./t/16destroy.t line 42
> STORE in DBD::Test::db ('DBI::db=HASH(0x1a2987c)' 'AutoCommit' 1) []
< STORE= 1 at ./t/16destroy.t line 43
< connect= 'DBI::db=HASH(0x1a2942c)' at ./t/16destroy.t line 91
> FETCH in DBD::Test::db ('DBI::db=HASH(0x1a2987c)' 'Active') []
< FETCH= 1 at C:/Perl/lib/Test/More.pm line 292
> DESTROY in DBD::Test::db ('DBI::db=HASH(0x1a2987c)') []
> FETCH in DBD::Test::db ('DBI::db=HASH(0x1a2987c)' 'Active') []
< FETCH= 1 at ./t/16destroy.t line 80
< DESTROY= 1 at ./t/16destroy.t line 93
> connect in DBD::Test::dr ('DBI::dr=HASH(0x1a45834)'
'dbi:ExampleP:dummy' '' '' 'HASH
(0x1a2942c)') []
New DBI::db (for DBD::Test::db, parent=DBI::dr=HASH(0x1a45834), id=)
_setup_handle(DBI::db=HASH(0x1fba8b4) DBD::Test::db
DBI::dr=HASH(0x1a45834) )
> STORE in DBD::Test::db ('DBI::db=HASH(0x1b00984)' 'Active' 1) []
< STORE= 1 at ./t/16destroy.t line 42
> STORE in DBD::Test::db ('DBI::db=HASH(0x1b00984)' 'AutoCommit' 1) []
< STORE= 1 at ./t/16destroy.t line 43
> STORE in DBD::Test::db ('DBI::db=HASH(0x1b00984)'
'InactiveDestroy' 1) []
< STORE= 1 at ./t/16destroy.t line 44
< connect= 'DBI::db=HASH(0x1fba8b4)' at ./t/16destroy.t line 100
> FETCH in DBD::Test::db ('DBI::db=HASH(0x1b00984)'
'InactiveDestroy') []
< FETCH= 1 at C:/Perl/lib/Test/More.pm line 292
> FETCH in DBD::Test::db ('DBI::db=HASH(0x1b00984)' 'Active') []
< FETCH= 1 at C:/Perl/lib/Test/More.pm line 292
> DESTROY in DBD::Test::db ('DBI::db=HASH(0x1b00984)') []
> FETCH in DBD::Test::db ('DBI::db=HASH(0x1b00984)' 'Active') []
< FETCH= 0 at ./t/16destroy.t line 80
< DESTROY= 1 at ./t/16destroy.t line 100
> connect in DBD::Test::dr ('DBI::dr=HASH(0x1a45834)'
'dbi:ExampleP:dummy' '' '' 'HASH
(0x1fba8b4)') []
New DBI::db (for DBD::Test::db, parent=DBI::dr=HASH(0x1a45834), id=)
_setup_handle(DBI::db=HASH(0x1fdff44) DBD::Test::db
DBI::dr=HASH(0x1a45834) )
> STORE in DBD::Test::db ('DBI::db=HASH(0x1fba8f4)' 'Active' 1) []
< STORE= 1 at ./t/16destroy.t line 42
> STORE in DBD::Test::db ('DBI::db=HASH(0x1fba8f4)' 'AutoCommit' 1) []
< STORE= 1 at ./t/16destroy.t line 43
> STORE in DBD::Test::db ('DBI::db=HASH(0x1fba8f4)'
'AutoInactiveDestroy' 1) []
< STORE= 1 at ./t/16destroy.t line 44
< connect= 'DBI::db=HASH(0x1fdff44)' at ./t/16destroy.t line 109
> FETCH in DBD::Test::db ('DBI::db=HASH(0x1fba8f4)'
'AutoInactiveDestroy') []
< FETCH= 1 at C:/Perl/lib/Test/More.pm line 292
> FETCH in DBD::Test::db ('DBI::db=HASH(0x1fba8f4)' 'Active') []
< FETCH= 1 at C:/Perl/lib/Test/More.pm line 292
> DESTROY in DBD::Test::db ('DBI::db=HASH(0x1fba8f4)') []
> FETCH in DBD::Test::db ('DBI::db=HASH(0x1fba8f4)' 'Active') []
< FETCH= 1 at ./t/16destroy.t line 80
< DESTROY= 1 at ./t/16destroy.t line 109
> connect in DBD::Test::dr ('DBI::dr=HASH(0x1a45834)'
'dbi:ExampleP:dummy' '' '' 'HASH
(0x1fdff44)') []
New DBI::db (for DBD::Test::db, parent=DBI::dr=HASH(0x1a45834), id=)
_setup_handle(DBI::db=HASH(0x1a457c4) DBD::Test::db
DBI::dr=HASH(0x1a45834) )
> STORE in DBD::Test::db ('DBI::db=HASH(0x1fe0234)' 'Active' 1) []
< STORE= 1 at ./t/16destroy.t line 42
> STORE in DBD::Test::db ('DBI::db=HASH(0x1fe0234)' 'AutoCommit' 1) []
< STORE= 1 at ./t/16destroy.t line 43
> STORE in DBD::Test::db ('DBI::db=HASH(0x1fe0234)'
'AutoInactiveDestroy' 1) []
< STORE= 1 at ./t/16destroy.t line 44
< connect= 'DBI::db=HASH(0x1a457c4)' at ./t/16destroy.t line 118
> FETCH in DBD::Test::db ('DBI::db=HASH(0x1fe0234)'
'AutoInactiveDestroy') []
< FETCH= 1 at C:/Perl/lib/Test/More.pm line 292
> FETCH in DBD::Test::db ('DBI::db=HASH(0x1fe0234)' 'Active') []
< FETCH= 1 at C:/Perl/lib/Test/More.pm line 292
CLONE DBI for new thread
Test has no driver CLONE() function so is unsafe threaded
> DESTROY in DBD::Test::db ('DBI::db=HASH(0x202027c)') []
> FETCH in DBD::Test::db ('DBI::db=HASH(0x202027c)' 'Active') []
< FETCH= 0 at ./t/16destroy.t line 77
-- DBI::END ($@: , $!: )
> DESTROY in DBD::Test::db ('DBI::db=HASH(0x202027c)') []
> FETCH in DBD::Test::db ('DBI::db=HASH(0x202027c)' 'Active') []
< FETCH= 0 at ./t/16destroy.t line 77
t/zvp_16destroy.t .......... Failed 2/20 subtests
On Jul 27, 2010, at 5:01 AM, John Scoles wrote:
Which test is it exactly??
t/16destroy.t
Ok here you go
Windblows XP home SP3
Visual C++ 2003
here is the output from the nmake test
Thanks!
t/01basics.t ............... ok
t/02dbidrv.t ............... ok
t/03handle.t ............... ok
t/04mods.t ................. ok
t/05concathash.t ........... ok
t/06attrs.t ................ ok
t/07kids.t ................. ok
t/08keeperr.t .............. ok
t/09trace.t ................ ok
t/10examp.t ................ ok
t/11fetch.t ................ ok
t/12quote.t ................ ok
t/13taint.t ................ ok
t/14utf8.t ................. ok
t/15array.t ................ ok
t/16destroy.t .............. 1/20 Test has no driver CLONE() function so is
unsafe threade
d
Tim, is that something we should add to that test driver?
t/zvp_16destroy.t .......... 1/20 Test has no driver CLONE() function so is
unsafe threaded
t/zvp_16destroy.t .......... Failed 2/20 subtests
Hrm, can you run that one verbose, please?
Thanks,
David