summaryrefslogtreecommitdiff
path: root/dist/Unicode-Normalize/t/tie.t
diff options
context:
space:
mode:
Diffstat (limited to 'dist/Unicode-Normalize/t/tie.t')
-rw-r--r--dist/Unicode-Normalize/t/tie.t11
1 files changed, 0 insertions, 11 deletions
diff --git a/dist/Unicode-Normalize/t/tie.t b/dist/Unicode-Normalize/t/tie.t
index ea050e89a5..1282405001 100644
--- a/dist/Unicode-Normalize/t/tie.t
+++ b/dist/Unicode-Normalize/t/tie.t
@@ -1,16 +1,5 @@
BEGIN {
- unless ('A' eq pack('U', 0x41)) {
- print "1..0 # Unicode::Normalize cannot pack a Unicode code point\n";
- exit 0;
- }
- unless (0x41 == unpack('U', 'A')) {
- print "1..0 # Unicode::Normalize cannot get a Unicode code point\n";
- exit 0;
- }
-}
-
-BEGIN {
if ($ENV{PERL_CORE}) {
chdir('t') if -d 't';
@INC = $^O eq 'MacOS' ? qw(::lib) : qw(../lib);