Make h2ph recognize (and skip) const and __const__ in C function

prototypes. This makes it produce better files on linux-sparc64.

p4raw-id: //depot/perl@26812

diff --git a/utils/h2ph.PL b/utils/h2ph.PL
index e46ac20..78e10a4 100644 (file)
--- a/utils/h2ph.PL
+++ b/utils/h2ph.PL
@@ -354,6 +354,7 @@ while (defined (my $file = next_file())) {
                use re "eval";
                my $typelist = join '|', keys %isatype;
                $new =~ s['
+                 (?:(?:__)?const(?:__)?\s+)?
                  (?:(?:un)?signed\s+)?
                  (?:long\s+)?
                  (?:$typelist)\s+
@@ -362,6 +363,7 @@ while (defined (my $file = next_file())) {
                  ']
                 [my \$$1]gx;
                $new =~ s['
+                 (?:(?:__)?const(?:__)?\s+)?
                  (?:(?:un)?signed\s+)?
                  (?:long\s+)?
                  (?:$typelist)\s+