diff options
author | Karl Williamson <public@khwilliamson.com> | 2012-07-02 22:18:47 -0600 |
---|---|---|
committer | Karl Williamson <public@khwilliamson.com> | 2012-07-24 21:13:46 -0600 |
commit | 265c1f46fbc1a513740bf4addc379f967f2b2214 (patch) | |
tree | d19ca65051df503dfee95e407a3fc718be6c9ae6 /regen | |
parent | 0ac55e23f1fba7b1f36cf989f7a4b6e3179a9530 (diff) | |
download | perl-265c1f46fbc1a513740bf4addc379f967f2b2214.tar.gz |
handy.h: Move bit shifting into base macro
This changes the #defines to be just the shift number, while doing
the shifting in the macro that the number is passed to. This will prove
useful in future commits
Diffstat (limited to 'regen')
-rw-r--r-- | regen/mk_PL_charclass.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/regen/mk_PL_charclass.pl b/regen/mk_PL_charclass.pl index d92d458393..eccb0e85a4 100644 --- a/regen/mk_PL_charclass.pl +++ b/regen/mk_PL_charclass.pl @@ -134,7 +134,7 @@ foreach my $folded (keys %folded_closure) { my @bits; # Bit map for each code point foreach my $folded (keys %folded_closure) { - $bits[$folded] = "_CC_NONLATIN1_FOLD" if grep { $_ > 255 } + $bits[$folded] = "(1U<<_CC_NONLATIN1_FOLD)" if grep { $_ > 255 } @{$folded_closure{$folded}}; } @@ -189,7 +189,7 @@ for my $ord (0..255) { #print "$ord, $name $property, $re\n"; if ($char =~ $re) { # Add this property if matches $bits[$ord] .= '|' if $bits[$ord]; - $bits[$ord] .= "_CC_$property"; + $bits[$ord] .= "(1U<<_CC_$property)"; } } #print __LINE__, " $ord $char $bits[$ord]\n"; |