DBD::ODBC: 02simple.t, core dump

[Steffen Goeldner]

I have a core dump at the end of 02simple.t (global
destruction???).
It occurs deterministic on on maschine, not reproduceable on
another one (don't ask why):

My env:

 WinNT 4.0
 perl 5.6.1
 DBI 1.21
 DBD-ODBC-0.38
 DBMS: ACCESS

The attached patch fixes that.


Steffen
*** DBD-ODBC-0.38-orig/t/02simple.t     Tue Feb 12 20:38:08 2002
--- DBD-ODBC-0.38/t/02simple.t  Fri Feb 15 17:37:25 2002
***************
*** 54,60 ****
  print "ok 8\n";
  
  print " Test 9: test ColAttributes\n";
! $sth = $dbh->prepare("SELECT * FROM $ODBCTEST::table_name ORDER BY COL_A");
  
  if ($sth) {
        $sth->execute();
--- 54,60 ----
  print "ok 8\n";
  
  print " Test 9: test ColAttributes\n";
! my $sth = $dbh->prepare("SELECT * FROM $ODBCTEST::table_name ORDER BY COL_A");
  
  if ($sth) {
        $sth->execute();