diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2002-06-08 01:38:50 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-06-08 01:38:50 +0000 |
| commit | 889e303a85277d50bb359b67c492b4d943e9e9db (patch) | |
| tree | 0902b970c223ae872affad3907b93ac4ef6b222a /utils | |
| parent | dccff43d435d574843d33f7c32cc7d8d1a628596 (diff) | |
| download | perl-889e303a85277d50bb359b67c492b4d943e9e9db.tar.gz | |
h2ph: evil linux/byteorder/pdp_endian.h
p4raw-id: //depot/perl@17079
Diffstat (limited to 'utils')
| -rw-r--r-- | utils/h2ph.PL | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/utils/h2ph.PL b/utils/h2ph.PL index e99df44684..783dfc6688 100644 --- a/utils/h2ph.PL +++ b/utils/h2ph.PL @@ -466,6 +466,10 @@ sub next_line $out .= $1; } elsif ($in =~ s/^([^\'\"\\\/]+)//) { $out .= $1; + } elsif ($^O eq 'linux' && + $file =~ m!(?:^|/)linux/byteorder/pdp_endian\.h$! && + $in =~ s!\'T KNOW!!) { + $out =~ s!I DON$!I_DO_NOT_KNOW!; } else { die "Cannot parse:\n$in\n"; } |