|
|
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
|
