diff options
| -rw-r--r-- | charclass_invlists.h | 2 | ||||
| -rw-r--r-- | lib/unicore/mktables | 12 | ||||
| -rw-r--r-- | lib/unicore/uni_keywords.pl | 2 | ||||
| -rw-r--r-- | regcharclass.h | 2 | ||||
| -rw-r--r-- | uni_keywords.h | 2 |
5 files changed, 9 insertions, 11 deletions
diff --git a/charclass_invlists.h b/charclass_invlists.h index 64a6226659..2f6a79fdfb 100644 --- a/charclass_invlists.h +++ b/charclass_invlists.h @@ -430752,7 +430752,7 @@ static const U8 WB_table[23][23] = { * 43f6df50e4878f501b417e366b0ee097ae5ccb2d4ce942026bed3d62d78e7887 lib/unicore/extracted/DLineBreak.txt * a04502ebb36a45d83cbe48a7d8132ea8143edb7b3d34d0aa6afe4a9685049741 lib/unicore/extracted/DNumType.txt * 11075771b112e8e7ccf6ffa637c4c91eadc3ef3db0517b24e605df8fd3624239 lib/unicore/extracted/DNumValues.txt - * da311266ec741173c392e9f95697d93305916833325c5c85847afadc577a869a lib/unicore/mktables + * a31ce67488e0e767884a7bbac251bd16e86ca742ca8c83bd2fb0e06e1f0ecb25 lib/unicore/mktables * c72bbdeda99714db1c8024d3311da4aef3c0db3b9b9f11455a7cfe10d5e9aba3 lib/unicore/version * 0a6b5ab33bb1026531f816efe81aea1a8ffcd34a27cbea37dd6a70a63d73c844 regen/charset_translations.pl * c7ff8e0d207d3538c7feb4a1a152b159e5e902d20293b303569ea8323e84633e regen/mk_PL_charclass.pl diff --git a/lib/unicore/mktables b/lib/unicore/mktables index 03cb9acd48..564ea59378 100644 --- a/lib/unicore/mktables +++ b/lib/unicore/mktables @@ -1854,8 +1854,7 @@ package main; no strict "refs"; # Use typeglob to give the anonymous subroutine the name we want - *$destroy_name = sub { - my $self = shift; + *$destroy_name = sub ($self) { my $addr = pack 'J', refaddr $self; $self->$destroy_callback if $destroy_callback; @@ -1870,9 +1869,8 @@ package main; unless ($package->can('dump')) { my $dump_name = "${package}::dump"; no strict "refs"; - *$dump_name = sub { - my $self = shift; - return dump_inside_out($self, $package_fields{$package}, @_); + *$dump_name = sub ($self, @_args) { + return dump_inside_out($self, $package_fields{$package}, @_args); } } return; @@ -9829,7 +9827,7 @@ sub UCD_name ($table, $alias) { } } -sub dump_inside_out( $object, $fields_ref ) { +sub dump_inside_out( $object, $fields_ref, @args ) { # Dump inside-out hashes in an object's state by converting them to a # regular hash and then calling simple_dumper on that. @@ -9840,7 +9838,7 @@ sub dump_inside_out( $object, $fields_ref ) { $hash{$key} = $fields_ref->{$key}{$addr}; } - return simple_dumper(\%hash, $object, $fields_ref); + return simple_dumper(\%hash, @args); } sub _operator_dot($self, $other="", $reversed=0) { diff --git a/lib/unicore/uni_keywords.pl b/lib/unicore/uni_keywords.pl index 3fd3f95091..51601e52d0 100644 --- a/lib/unicore/uni_keywords.pl +++ b/lib/unicore/uni_keywords.pl @@ -1320,7 +1320,7 @@ # 43f6df50e4878f501b417e366b0ee097ae5ccb2d4ce942026bed3d62d78e7887 lib/unicore/extracted/DLineBreak.txt # a04502ebb36a45d83cbe48a7d8132ea8143edb7b3d34d0aa6afe4a9685049741 lib/unicore/extracted/DNumType.txt # 11075771b112e8e7ccf6ffa637c4c91eadc3ef3db0517b24e605df8fd3624239 lib/unicore/extracted/DNumValues.txt -# da311266ec741173c392e9f95697d93305916833325c5c85847afadc577a869a lib/unicore/mktables +# a31ce67488e0e767884a7bbac251bd16e86ca742ca8c83bd2fb0e06e1f0ecb25 lib/unicore/mktables # c72bbdeda99714db1c8024d3311da4aef3c0db3b9b9f11455a7cfe10d5e9aba3 lib/unicore/version # 0a6b5ab33bb1026531f816efe81aea1a8ffcd34a27cbea37dd6a70a63d73c844 regen/charset_translations.pl # c7ff8e0d207d3538c7feb4a1a152b159e5e902d20293b303569ea8323e84633e regen/mk_PL_charclass.pl diff --git a/regcharclass.h b/regcharclass.h index c1811ccbf1..9ff198175d 100644 --- a/regcharclass.h +++ b/regcharclass.h @@ -3850,7 +3850,7 @@ * 43f6df50e4878f501b417e366b0ee097ae5ccb2d4ce942026bed3d62d78e7887 lib/unicore/extracted/DLineBreak.txt * a04502ebb36a45d83cbe48a7d8132ea8143edb7b3d34d0aa6afe4a9685049741 lib/unicore/extracted/DNumType.txt * 11075771b112e8e7ccf6ffa637c4c91eadc3ef3db0517b24e605df8fd3624239 lib/unicore/extracted/DNumValues.txt - * da311266ec741173c392e9f95697d93305916833325c5c85847afadc577a869a lib/unicore/mktables + * a31ce67488e0e767884a7bbac251bd16e86ca742ca8c83bd2fb0e06e1f0ecb25 lib/unicore/mktables * c72bbdeda99714db1c8024d3311da4aef3c0db3b9b9f11455a7cfe10d5e9aba3 lib/unicore/version * 0a6b5ab33bb1026531f816efe81aea1a8ffcd34a27cbea37dd6a70a63d73c844 regen/charset_translations.pl * acc94e4afc339fe2cf2ae74d6e1cbcf2c396328d78e56236ad314eadbfc84125 regen/regcharclass.pl diff --git a/uni_keywords.h b/uni_keywords.h index 807ff65443..c54902904b 100644 --- a/uni_keywords.h +++ b/uni_keywords.h @@ -7677,7 +7677,7 @@ match_uniprop( const unsigned char * const key, const U16 key_len ) { * 43f6df50e4878f501b417e366b0ee097ae5ccb2d4ce942026bed3d62d78e7887 lib/unicore/extracted/DLineBreak.txt * a04502ebb36a45d83cbe48a7d8132ea8143edb7b3d34d0aa6afe4a9685049741 lib/unicore/extracted/DNumType.txt * 11075771b112e8e7ccf6ffa637c4c91eadc3ef3db0517b24e605df8fd3624239 lib/unicore/extracted/DNumValues.txt - * da311266ec741173c392e9f95697d93305916833325c5c85847afadc577a869a lib/unicore/mktables + * a31ce67488e0e767884a7bbac251bd16e86ca742ca8c83bd2fb0e06e1f0ecb25 lib/unicore/mktables * c72bbdeda99714db1c8024d3311da4aef3c0db3b9b9f11455a7cfe10d5e9aba3 lib/unicore/version * 0a6b5ab33bb1026531f816efe81aea1a8ffcd34a27cbea37dd6a70a63d73c844 regen/charset_translations.pl * c7ff8e0d207d3538c7feb4a1a152b159e5e902d20293b303569ea8323e84633e regen/mk_PL_charclass.pl |