[inseparable changes from match from perl-5.003_93 to perl-5.003_94]

[perl5.git] / utils / h2ph.PL

diff --git a/utils/h2ph.PL b/utils/h2ph.PL
index 2aa57ad..70f9e01 100644 (file)
--- a/utils/h2ph.PL
+++ b/utils/h2ph.PL
@@ -228,7 +228,7 @@ sub expr {
                $id .= ' ' . $1;
                $isatype{$id} = 1;
            }
-           elsif ($id eq 'unsigned') {
+           elsif ($id eq 'unsigned' || $id eq 'long') {
                s/^\s+(\w+)//;
                $id .= ' ' . $1;
                $isatype{$id} = 1;