diff options
author | Karl Williamson <public@khwilliamson.com> | 2012-09-02 14:26:20 -0600 |
---|---|---|
committer | Karl Williamson <public@khwilliamson.com> | 2012-09-13 21:14:02 -0600 |
commit | 2e39f0c2939879925d2d13a10d4494ef3487a454 (patch) | |
tree | 8dffdffa2624f76bf9829081e8fe12701da6b691 /regen | |
parent | 895e25a51f0637b8e9bc8962fe7947a1e7e3b66f (diff) | |
download | perl-2e39f0c2939879925d2d13a10d4494ef3487a454.tar.gz |
regen/regcharclass.pl: Change to work on an empty class
Future commits will add Unicode properties for this to generate macros,
and some of them may be empty in some Unicode releases. This just
causes such a generated macro to evaluate to 0.
Diffstat (limited to 'regen')
-rwxr-xr-x | regen/regcharclass.pl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/regen/regcharclass.pl b/regen/regcharclass.pl index ca223f98d8..f67b0f9d32 100755 --- a/regen/regcharclass.pl +++ b/regen/regcharclass.pl @@ -579,6 +579,7 @@ sub _combine { # recursively convert an optree to text with reasonably neat formatting sub _render { my ( $self, $op, $combine, $brace )= @_; + return 0 if ! defined $op; # The set is empty if ( !ref $op ) { return $op; } |