projects
/
p5sagit/p5-mst-13.2.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
Update Changes.
[p5sagit/p5-mst-13.2.git]
/
t
/
pragma
/
utf8.t
diff --git
a/t/pragma/utf8.t
b/t/pragma/utf8.t
index
8db3d1a
..
d1546fe
100755
(executable)
--- a/
t/pragma/utf8.t
+++ b/
t/pragma/utf8.t
@@
-10,7
+10,7
@@
BEGIN {
}
}
-print "1..65\n";
+print "1..66\n";
my $test = 1;
@@
-289,3
+289,9
@@
sub ok_bytes {
ok "\x{ab}" =~ /^\x{ab}$/, 1;
$test++; # 65
}
+
+{
+ use utf8;
+ ok_bytes chr(0xe2), pack("C*", 0xc3, 0xa2);
+ $test++; # 66
+}