On Wed, May 03, 2000 at 08:47:31AM -0700, Gurusamy Sarathy wrote:
> On Wed, 03 May 2000 10:19:47 +0200, "Stefan Eissing" wrote:
> >Background: I have patched DBD::Oracle to recognize utf8 locale
> >and return utf8 scalars for Perl 5.6.0. It works. In one of the
> >standard tests however, a string with utf8 chars is inserted
> >into a BLOB, correctly read back again, but not eq to the original
> >string.
>
> Perl 5.6.0 has known bugs in Unicode support (which is why it is
> marked "experimental"). eq not knowing about SvUTF8 is one of them.
>
> The attached patch should help.
>
>
> Sarathy
> [EMAIL PROTECTED]
> -----------------------------------8<-----------------------------------
> Change 5921 by gsar@auger on 2000/04/24 06:58:26
>
> make eq unicode-aware (from Gisle Aas); fix bogus tests revealed
> - ok $&, pack("C*", ord(">"), 0342, 0230, 0272);
> - $test++;
> + my $tmp = $&;
> + ok $tmp, pack("C*", ord(">"), 0342, 0230, 0272);
> + $test++; # 23
Not doing a copy there was deliberate. IIRC there was also a test that did a copy.
This was so that the SV with the magic went into the compare operator
Graham.
