gnu/usr.bin/perl/ext/XS-APItest/t/labelconst_utf8.aux


1
2
3
4
5
6
7
8
9
10
11
12
13

use utf8;
use open qw( :utf8 :std );

use XS::APItest qw(labelconst);
my $z = "";
$z .= labelconst ＦǑǑ:;
$z .= labelconst BÀR:
	;
$z .= labelconst ᛒÀZ
	:;
$z .= labelconst
	QÙÙX:;
$z;