PEPPLER.ORG
Michael Peppler
Sybase Consulting
Menu
Home
Sybase on Linux
Install Guide for Sybase on Linux
General Sybase Resources
General Perl Resources
Freeware
Sybperl
Sybase::Simple
DBD::Sybase
BCP Tool
Bug Tracker
Mailing List Archive
Downloads Directory
FAQs
Sybase on Linux FAQ
Sybperl FAQ
Personal
Michael Peppler's resume

sybperl-l Archive

Up    Prev    Next    

From: Michael Peppler <mpeppler at MBAY dot NET>
Subject: Re: minor problem on Sybperl 2.09 for NT
Date: Feb 12 1998 11:07PM

Jamie Thingelstad wrote:
> 
> Another minor issue with Sybperl 2.09 for NT. When used with "use
> strict" and -w on (as we all do right? :) ), I get the following
> message:
> 
>   Name "Sybase::DBlib::VERSION" used only once: possible type at
>   C:\perl\lib/DynaLoader.pm line 172
> 
> Not nearly as problematic as the memory leak but annoying none the
> less.. :)

Damn - I thought I'd corrected that.

Here's a patch (apply to DBlib.xs):

*** /tmp/geta8174	Thu Feb 12 15:06:36 1998
--- DBlib.xs	Thu Feb 12 15:06:32 1998
***************
*** 926,932 ****
  	    sv_setpv(sv, buff);
  	    SvNOK_on(sv);
  	}
! 	if((sv = perl_get_sv("Sybase::DBlib::VERSION", TRUE)))
  	    sv_setnv(sv, atof(SYBPLVER));
      }
  }
--- 923,929 ----
  	    sv_setpv(sv, buff);
  	    SvNOK_on(sv);
  	}
! 	if((sv = perl_get_sv("Sybase::DBlib::VERSION", TRUE|GV_ADDMULTI)))
  	    sv_setnv(sv, atof(SYBPLVER));
      }
  }



Michael
-- 
Michael Peppler       -||-  Data Migrations Inc.
mpeppler@datamig.com  -||-  http://www.mbay.net/~mpeppler