diff options
| author | Karl Williamson <khw@khw-desktop.(none)> | 2009-11-24 13:47:37 -0700 |
|---|---|---|
| committer | Steve Hay <SteveHay@planit.com> | 2009-11-25 18:19:21 +0000 |
| commit | 3df51b85ce4a56647cf991297e3b51b9dffe4414 (patch) | |
| tree | 0f390baed34059c08f5df180af31ba9962ec8faf /t/uni/class.t | |
| parent | 7c76c2a0d87e7bfac7012fb2b38100addc903e9d (diff) | |
| download | perl-3df51b85ce4a56647cf991297e3b51b9dffe4414.tar.gz | |
wrap uniprops.t; makefile changes for mktables
Message-ID: <4B0C4744.7080401@khwilliamson.com>
Diffstat (limited to 't/uni/class.t')
| -rw-r--r-- | t/uni/class.t | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/t/uni/class.t b/t/uni/class.t index 6dd6ee60c5..3dde5082cb 100644 --- a/t/uni/class.t +++ b/t/uni/class.t @@ -71,7 +71,7 @@ is(($str =~ /(\p{Other::Class}+)/)[0], '@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_'); # make sure it finds class in other OTHER package is(($str =~ /(\p{A::B::Intersection}+)/)[0], '@ABCDEFGHIJKLMNO'); -# lib/unicore/bc/AL.pl +# lib/unicore/Bc/AL.pl $str = "\x{070D}\x{070E}\x{070F}\x{0710}\x{0711}"; is(($str =~ /(\P{BidiClass: ArabicLetter}+)/)[0], "\x{070F}"); is(($str =~ /(\P{BidiClass: AL}+)/)[0], "\x{070F}"); @@ -84,5 +84,4 @@ $str = "[\x{038B}\x{038C}\x{038D}]"; is(($str =~ /(\p{InGreek}+)/)[0], "\x{038B}\x{038C}\x{038D}"); # The other tests that are based on looking at the generated files are now -# generated by mktables. The location of that .t file is given by the main -# Makefile that calls mktables. +# in t/re/uniprops.t |