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

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

Rats.   It'd be better if it was a correct patch.    Honest, I did test
it.     But I ran "make test" on the wrong instance of Perl.    :-(

Try to get it rihgt this time.


Mike Guy

--- ./t/op/universal.t.orig	Tue Mar 14 13:47:48 2000
+++ ./t/op/universal.t	Tue Mar 14 13:48:24 2000
@@ -8,7 +8,7 @@
     unshift @INC, '../lib' if -d '../lib';
 }
 
-print "1..72\n";
+print "1..73\n";
 
 $a = {};
 bless $a, "Bob";
@@ -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

• [ID 20000308.007] utf8 interfering where it didn't ought to by M.J.T. Guy
• Re: [ID 20000308.007] utf8 interfering where it didn't ought to by M.J.T. Guy
• Re: [ID 20000308.007] utf8 interfering where it didn't ought to by M.J.T. Guy
• Re: [ID 20000308.007] utf8 interfering where it didn't ought to by Gurusamy Sarathy
• Re: [ID 20000308.007] utf8 interfering where it didn't ought to by M.J.T. Guy