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

fix eof condition

Browse Source
This commit is contained in:
Akim Demaille
2008-08-07 20:53:08 +02:00
parent 9b0efa5bc2
commit db65ca1f12
2 changed files with 9 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
ChangeLog
View File

@@ -1,3 +1,7 @@
2008-11-09 Akim Demaille <demaille@gostai.com>
fix eof condition
2008-11-09 Akim Demaille <demaille@gostai.com> 2008-11-09 Akim Demaille <demaille@gostai.com>
Fix --help. Fix --help.

8
etc/bench.pl.in
View File

@@ -575,8 +575,7 @@ sub generate_grammar_list ($$@)
{ {
my ($base, $max, @directive) = @_; my ($base, $max, @directive) = @_;
my $directives = directives ($base, @directive); my $directives = directives ($base, @directive);
my $variant = grep { $_ eq '%define variant' } @directive; my $variant = grep { /%define variant/ } @directive;
my $out = new IO::File ">$base.y" my $out = new IO::File ">$base.y"
or die; or die;
print $out <<EOF; print $out <<EOF;
@@ -917,7 +916,10 @@ sub parse (@)
{ {
@token = @_; @token = @_;
verbose 2, "Parsing: @token\n"; verbose 2, "Parsing: @token\n";
return parse_expr (); my @res = parse_expr ();
die "expected end of directives, unexpected: @token"
if defined $token[0];
return @res;
} }
sub parse_expr () sub parse_expr ()