aniani/elinks
1
0
Fork 0
mirror of https://github.com/rkd77/elinks.git synced 2025-01-03 14:57:44 -05:00
Code

Add ending punctuation for one-liners; fix missing ending ';'

Browse Source
This commit is contained in:
Jonas Fonseca 2006-01-13 12:14:05 +01:00 committed by Jonas Fonseca
parent bcdd3fafca
commit 63f4a15d91
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
doc/tools/code2doc
View File

@ -38,9 +38,9 @@ while (<>)
{ {
my $end = s/\s*\*+\//\n/ ? 'yes' : undef; my $end = s/\s*\*+\//\n/ ? 'yes' : undef;
if ($end and /[^=]*[\s*](\w+)[\s:,;].*\/\*:\s*(.*)/) { if ($end and /[^=]*[\s*](\w+)[\s:,;].*\/\*:\s*(.*)([.]\s*)?$/) {
# Implicit id for enum values and struct members. # Implicit id for enum values and struct members.
print "\nid:[$idpath$1]::\n\t$2\n"; print "\nid:[$idpath$1]::\n\t$2.\n";
} elsif ($inblock) { } elsif ($inblock) {
# Redo the indentation, preserve empty lines. # Redo the indentation, preserve empty lines.
@ -65,7 +65,7 @@ while (<>)
while (not /(struct|enum|typedef|[^=])*[\s*](\w+).*[\[:,;{]/) { while (not /(struct|enum|typedef|[^=])*[\s*](\w+).*[\[:,;{]/) {
my $line = $_; my $line = $_;
$_ .= <>; $_ .= <>;
last if $_ eq $line last if $_ eq $line;
} }
if (/struct\s+(\w+)\s*{/) { if (/struct\s+(\w+)\s*{/) {