mirror of
https://github.com/isc-projects/bind9.git
synced 2026-06-09 10:52:05 -04:00
m4 support
This commit is contained in:
parent
63469b434a
commit
19ba7857f6
1 changed files with 16 additions and 0 deletions
|
|
@ -39,6 +39,7 @@ while (<>) {
|
|||
$before_copyright = "";
|
||||
$c_comment = 0;
|
||||
$shell_comment = 0;
|
||||
$m4_comment = 0;
|
||||
$first = "";
|
||||
if ($type eq "C") {
|
||||
$c_comment = 1;
|
||||
|
|
@ -46,6 +47,9 @@ while (<>) {
|
|||
} elsif ($type eq "SH" || $type eq "PERL" || $type eq "MAKE") {
|
||||
$shell_comment = 1;
|
||||
$prefix = "# ";
|
||||
} elsif ($type eq "M4") {
|
||||
$m4_comment = 1;
|
||||
$prefix = "dnl ";
|
||||
} else {
|
||||
print "$file: type '$type' not supported yet; skipping\n";
|
||||
next;
|
||||
|
|
@ -89,6 +93,18 @@ while (<>) {
|
|||
} else {
|
||||
$first = $_;
|
||||
}
|
||||
} elsif ($m4_comment && /^dnl /) {
|
||||
if ($_ !~ /[Cc]opyright/) {
|
||||
print "$file: non-copyright comment\n";
|
||||
close(SOURCE);
|
||||
next;
|
||||
}
|
||||
while (<SOURCE>) {
|
||||
if ($_ !~ /^dnl /) {
|
||||
$first = $_;
|
||||
last;
|
||||
}
|
||||
}
|
||||
} else {
|
||||
$first = $_;
|
||||
}
|
||||
|
|
|
|||
Loading…
Reference in a new issue