Unicode::UCD: Allow prop_invmap() to work on non-compact binary properties

It may be that the tables input to prop_invmap() are not in the most
compact form.  There was a problem coping with these on binary
properties; which this commit fixes by realizing that a binary property
omits its 'Y' property value.

The .t does not pass these tests when the input is not compact, though.

diff --git a/lib/Unicode/UCD.pm b/lib/Unicode/UCD.pm
index b5d57e5..db95111 100644 (file)
--- a/lib/Unicode/UCD.pm
+++ b/lib/Unicode/UCD.pm
@@ -2818,7 +2818,10 @@ RETRY:
             # We now see that it should be
             # 12 => XYZ
             # 18 => $missing
-            if (@invlist > 1 && $invmap[-2] eq $map) {
+            if (@invlist > 1 && ( (defined $map)
+                                  ? $invmap[-2] eq $map
+                                  : $invmap[-2] eq 'Y'))
+            {
                 $invlist[-1] = $end + 1;
                 next;
             }