Future/bison
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/bison.git synced 2026-03-09 04:13:03 +00:00
Code Issues Packages Projects Releases Wiki Activity

examples: fix the leading empty line

Browse Source 
* examples/extexi: Really avoid the first empty line.
Remove useless `next`.
This commit is contained in:
Akim Demaille
2018-08-23 18:49:46 +02:00
parent 3fda8335bf
commit e504c843c1
1 changed files with 1 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
examples/extexi
View File

@@ -116,17 +116,16 @@ sub process ($)
{ {
if (/^\@(small)?example$/) if (/^\@(small)?example$/)
{ {
$input .= "\n" unless defined $input;
# Bison supports synclines, but not Flex. # Bison supports synclines, but not Flex.
$input .= sprintf ("#line %s \"$in\"\n", $. + 1) $input .= sprintf ("#line %s \"$in\"\n", $. + 1)
if $synclines && $file =~ /\.[chy]*$/; if $synclines && $file =~ /\.[chy]*$/;
next;
} }
elsif (/^\@end (small)?example$/) elsif (/^\@end (small)?example$/)
{ {
die "no contents: $file" die "no contents: $file"
if $input eq ""; if $input eq "";
$file{$file}{$block} .= "\n" if defined $file{$file}{$block};
$file{$file}{$block} .= normalize($input); $file{$file}{$block} .= normalize($input);
$file = $input = undef; $file = $input = undef;
++$block; ++$block;