Searched refs:casespec (Results 1 – 2 of 2) sorted by relevance
726 my $casespec;728 ok(!casespec(utf8::unicode_to_native(0x41)));730 $casespec = casespec(utf8::unicode_to_native(0xdf));732 ok($casespec->{code} eq $sharp_s_code &&733 $casespec->{lower} eq $sharp_s_code &&734 $casespec->{title} eq "$S_code $s_code" &&735 $casespec->{upper} eq "$S_code $S_code" &&736 !defined $casespec->{condition}, 'casespec native(0xDF)');738 $casespec = casespec(0x307);741 ok($casespec->{az}->{code} eq '0307'[all …]
2304 sub casespec { subroutine