This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
927f8a7ce12cc24c96efca7b052ee4bc81d0c664
[perl5.git] / t / re / uniprops.t
1 use strict;
2 use warnings;
3 no warnings 'once';
4
5 # This is a wrapper for a generated file.  Assumes being run from 't'
6 # directory.
7
8 # It is skipped by default under PERL_DEBUG_READONLY_COW, but you can run
9 # it directly via:  cd t; ./perl ../lib/unicore/TestProp.pl
10
11 require Config;
12 if ($Config::Config{ccflags} =~ /(?:^|\s)-DPERL_DEBUG_READONLY_COW\b/) {
13     print "1..0 # Skip PERL_DEBUG_READONLY_COW\n";
14     exit;
15 }
16
17 do '../lib/unicore/TestProp.pl';
18
19 0