X-Git-Url: https://git.saurik.com/bison.git/blobdiff_plain/7172e23e8ffb95b8cafee24c4f36c46ca709507f..a3d760ef5d7d9bcab78268f5117c39566aa0345c:/etc/bench.pl.in diff --git a/etc/bench.pl.in b/etc/bench.pl.in index 39443d0b..8579ca59 100755 --- a/etc/bench.pl.in +++ b/etc/bench.pl.in @@ -1,24 +1,22 @@ #! /usr/bin/perl -w -# Copyright (C) 2006 Free Software Foundation, Inc. -# +# Copyright (C) 2006, 2008-2010 Free Software Foundation, Inc. +# # This file is part of Bison, the GNU Compiler Compiler. -# -# Bison is free software; you can redistribute it and/or modify +# +# This program is free software: you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by -# the Free Software Foundation; either version 2, or (at your option) -# any later version. -# -# Bison is distributed in the hope that it will be useful, +# the Free Software Foundation, either version 3 of the License, or +# (at your option) any later version. +# +# This program is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. -# +# # You should have received a copy of the GNU General Public License -# along with autoconf; see the file COPYING. If not, write to -# the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, -# Boston, MA 02110-1301, USA. - +# along with this program. If not, see . + use IO::File; use Benchmark qw (:all); @@ -272,9 +270,7 @@ yylex (void) /* Skip white space. */ while ((c = get_char ()) == ' ' || c == '\t') - { - - } + continue; /* process numbers */ if (c == '.' || isdigit (c)) @@ -345,14 +341,12 @@ sub bench_grammar ($) my ($gram) = @_; my %test = ( - "yacc.c-pull-impure" => '', - "yacc.c-pull-pure" => '%pure-parser', - "push.c-pull-impure" => '%skeleton "push.c"', - "push.c-pull-pure" => '%skeleton "push.c" %pure-parser', - "push.c-push-impure" => '%skeleton "push.c" %push-pull-parser', - "push.c-push-pure" => '%skeleton "push.c" %push-pull-parser %pure-parser', + "pull-impure" => '', + "pull-pure" => '%define api.pure', + "push-impure" => '%define api.push_pull "both"', + "push-pure" => '%define api.push_pull "both" %define api.pure', ); - + my %bench; while (my ($name, $directives) = each %test) {