This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Unicode::UCD: Handle old Unicode files
authorKarl Williamson <khw@cpan.org>
Sat, 27 Jun 2015 21:32:49 +0000 (15:32 -0600)
committerKarl Williamson <khw@cpan.org>
Wed, 29 Jul 2015 04:15:55 +0000 (22:15 -0600)
The formats of some older Unicode releases can be different than
previously expected.

charclass_invlists.h
lib/Unicode/UCD.pm
regcharclass.h

index 4d6358b..d774c4c 100644 (file)
@@ -99479,7 +99479,7 @@ static const UV XPosixXDigit_invlist[] = { /* for EBCDIC POSIX-BC */
 #endif /* EBCDIC POSIX-BC */
 
 /* Generated from:
- * 66700a18908cbab24510556f945f0ccdc071f0ad31506ac309adaf12bfb1ba99 lib/Unicode/UCD.pm
+ * 5661be4aa654ae43035d4bc0770c30c98efa6096743767b7181d9a9db24ff1c6 lib/Unicode/UCD.pm
  * ae98bec7e4f0564758eed81eca5015481ba32581f8a735a825b71b3bba714450 lib/unicore/ArabicShaping.txt
  * 1687fe5994eb7e5c0dab8503fc2a1b3b479d91af9d3b8055941c9bd791f7d0b5 lib/unicore/BidiBrackets.txt
  * 350d1302116194b0b21def287434b55c5088098fbc726e879f7420a391965643 lib/unicore/BidiMirroring.txt
index b66ff9e..d04643e 100644 (file)
@@ -3891,7 +3891,14 @@ RETRY:
         # to indicate that need to add code point to it.
         $format = 'ar';
     }
-    elsif ($format ne 'n' && $format ne 'a') {
+    elsif ($format eq 'ax') {
+
+        # Normally 'ax' properties have overrides, and will have been handled
+        # above, but if not, they still need adjustment, and the hex values
+        # have already been converted to decimal
+        $format = 'a';
+    }
+    elsif ($format ne 'n' && $format !~ / ^ a /x) {
 
         # All others are simple scalars
         $format = 's';
index dd24d39..18be83c 100644 (file)
 #endif /* H_REGCHARCLASS */
 
 /* Generated from:
- * 66700a18908cbab24510556f945f0ccdc071f0ad31506ac309adaf12bfb1ba99 lib/Unicode/UCD.pm
+ * 5661be4aa654ae43035d4bc0770c30c98efa6096743767b7181d9a9db24ff1c6 lib/Unicode/UCD.pm
  * ae98bec7e4f0564758eed81eca5015481ba32581f8a735a825b71b3bba714450 lib/unicore/ArabicShaping.txt
  * 1687fe5994eb7e5c0dab8503fc2a1b3b479d91af9d3b8055941c9bd791f7d0b5 lib/unicore/BidiBrackets.txt
  * 350d1302116194b0b21def287434b55c5088098fbc726e879f7420a391965643 lib/unicore/BidiMirroring.txt