diff options
author | Todd C. Miller <millert@cvs.openbsd.org> | 2002-11-02 18:10:41 +0000 |
---|---|---|
committer | Todd C. Miller <millert@cvs.openbsd.org> | 2002-11-02 18:10:41 +0000 |
commit | aff8810cf40fd7bd9c1592eab7a87b715a579b7b (patch) | |
tree | c130220956eb1aa003ef416490aac12e1e6cc726 /gnu | |
parent | b27335ba82f1fbffe783b28f693344221277085f (diff) |
Don't try to process inline functions; fixes a problem parsing
macros.h on vax (noticed by hugh).
Diffstat (limited to 'gnu')
-rw-r--r-- | gnu/usr.bin/perl/utils/h2ph.PL | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gnu/usr.bin/perl/utils/h2ph.PL b/gnu/usr.bin/perl/utils/h2ph.PL index 2868414685b..d1772c6fe9f 100644 --- a/gnu/usr.bin/perl/utils/h2ph.PL +++ b/gnu/usr.bin/perl/utils/h2ph.PL @@ -442,15 +442,15 @@ sub next_line $in =~ s/\?\?</{/g; # | ??<| {| $in =~ s/\?\?>/}/g; # | ??>| }| } - if ($in =~ /^\#ifdef __LANGUAGE_PASCAL__/) { + if ($in =~ s/^\#ifdef __LANGUAGE_PASCAL__//) { # Tru64 disassembler.h evilness: mixed C and Pascal. while (<IN>) { last if /^\#endif/; } next READ; } - if ($in =~ /^extern inline / && # Inlined assembler. - $^O eq 'linux' && $file =~ m!(?:^|/)asm/[^/]+\.h$!) { + # Skip inlined functions in headers + if ($in =~ s/^(extern|static) (__inline__|inline) .*[^;]\s*$//) { while (<IN>) { last if /^}/; } |