This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
ext/B/Makefile.PL: spot hex defines
[perl5.git] / ext / B / Makefile.PL
index 8708c0d..e34b867 100644 (file)
@@ -44,6 +44,7 @@ foreach my $tuple (['cop.h'],
             ( [()|\dx]+ [UuLl]{0,2}            # Parens, '|', digits, 'x',
                                                # followed by optional long,
                                                # unsigned qualifiers
+            | 0x[0-9a-fA-F]+                   # hex values
             | \(? \d+ [UuLl]{0,2} \s* << .*?   # digits left shifted by anything
                                                # followed by optional
                                                # long, unsigned qualifiers