diff options
Diffstat (limited to 'utils')
| -rw-r--r-- | utils/h2ph.PL | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/utils/h2ph.PL b/utils/h2ph.PL index 7cc3055ecd..9082e14361 100644 --- a/utils/h2ph.PL +++ b/utils/h2ph.PL @@ -610,9 +610,9 @@ sub build_preamble_if_necessary print PREAMBLE "# $_=$define{$_}\n"; } - if ($define{$_} =~ /^\d+$/) { + if ($define{$_} =~ /^(\d+)U?L{0,2}$/i) { print PREAMBLE - "unless (defined &$_) { sub $_() { $define{$_} } }\n\n"; + "unless (defined &$_) { sub $_() { $1 } }\n\n"; } elsif ($define{$_} =~ /^\w+$/) { print PREAMBLE "unless (defined &$_) { sub $_() { &$define{$_} } }\n\n"; |