Change 11375 by gsar@latte-gsar on 2001/07/16 02:46:11
integrate change#11374 from maint-5.6
make h2ph grok ccsymbols fo the form 1234L, 1234ULL etc.
Affected files ...
... //depot/perl/utils/h2ph.PL#26 integrate
Differences ...
==== //depot/perl/utils/h2ph.PL#26 (text) ====
Index: perl/utils/h2ph.PL
--- perl/utils/h2ph.PL.~1~ Sun Jul 15 21:00:05 2001
+++ perl/utils/h2ph.PL Sun Jul 15 21:00:05 2001
@@ -610,9 +610,9 @@
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";
End of Patch.
