develooper Front page | perl.perl5.porters | Postings from March 2000

Re: [ID 20000308.007] utf8 interfering where it didn't ought to

Thread Previous | Thread Next
From:
M.J.T. Guy
Date:
March 14, 2000 04:58
Subject:
Re: [ID 20000308.007] utf8 interfering where it didn't ought to
Message ID:
E12Uqu2-0003sG-00@ursa.cus.cam.ac.uk
Gurusamy Sarathy <gsar@ActiveState.com> wrote
> This shows up because the debugger goes and does:
>
>     UNIVERSAL::isa("\xff\xff\xff\0", "HASH")
>
> which boils down to calling:
>
>     gv_fetchpv("\xff\xff\xff\0", FALSE)
>
> But gv_fetchpv() and friends now expect a well-formed utf8 string--hence
> the warning.
>
> This ought to fix it.

Thanks.   That's OK now.

And in return, here's a patch to the regression tests.


Mike Guy

--- ./t/op/universal.t.orig	Fri Mar  3 15:36:55 2000
+++ ./t/op/universal.t	Mon Mar 13 10:43:26 2000
@@ -102,3 +102,5 @@
 test ! UNIVERSAL::can($b, "can");
 
 test ! $a->can("export_tags");	# a method in Exporter
+
+test ! UNIVERSAL::isa("\xff\xff\xff\0", 'HASH');

End of patch

Thread Previous | Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About