|
|
sybperl-l Archive
Up Prev Next
From: Michael Peppler <mpeppler at MBAY dot NET>
Subject: Re: On NT 4.0/MS SQL Server, CTlib::ct_sql appends an extra \0 to
char and varchar columns
Date: Dec 12 1997 3:43PM
Victor Cheng wrote:
>
> Michael Peppler wrote:
> >
> > This is a bug in sybperl. I believe it was fixed in teh 2.08_52 release.
> > If that's what you're running then it's not fixed yet, and I'll need
> > to look into it again...
> >
> Michael,
>
> I'm still using the 2.08_51 release because of its NT support. Is there
> a way to install your bug fixes on top of the 2.08_51 release to keep
> the NT support until there is a real port?
Actually, 2.08_52 has the same NT code as 2.08_51...
However, here's a patch:
*** /tmp/geta3524 Fri Dec 12 07:42:54 1997
--- CTlib.xs Fri Nov 28 14:35:39 1997
***************
*** 5726,5735 ****
} else {
switch(info->datafmt[i].datatype) {
case CS_TEXT_TYPE:
- case CS_CHAR_TYPE:
len = info->coldata[i].valuelen;
sv_setpvn(sv, info->coldata[i].value.c, len);
break;
case CS_FLOAT_TYPE:
sv_setnv(sv, info->coldata[i].value.f);
break;
--- 5776,5787 ----
} else {
switch(info->datafmt[i].datatype) {
case CS_TEXT_TYPE:
len = info->coldata[i].valuelen;
sv_setpvn(sv, info->coldata[i].value.c, len);
break;
+ case CS_CHAR_TYPE:
+ sv_setpv(sv, info->coldata[i].value.c);
+ break;
case CS_FLOAT_TYPE:
sv_setnv(sv, info->coldata[i].value.f);
break;
Michael
--
Michael Peppler -||- Data Migrations Inc.
mpeppler@datamig.com -||- http://www.mbay.net/~mpeppler
|
