From f0ec1f9abfb9cd61b0c90f06c7dc6e2bb4182791 Mon Sep 17 00:00:00 2001 From: Jarkko Hietaniemi Date: Wed, 28 Oct 1998 08:44:49 +0000 Subject: [PATCH] Bison says 'parse error', not 'parser error'. p4raw-id: //depot/cfgperl@2106 --- t/comp/require.t | 4 ++-- t/op/misc.t | 4 ++-- t/pragma/subs.t | 4 ++-- t/pragma/warning.t | 4 ++-- 4 files changed, 8 insertions(+), 8 deletions(-) diff --git a/t/comp/require.t b/t/comp/require.t index 0f3b97f..5c41f5c 100755 --- a/t/comp/require.t +++ b/t/comp/require.t @@ -35,9 +35,9 @@ print "ok ",$i++,"\n"; # compile-time failure in require do_require "1)\n"; -# bison says 'parser error' instead of 'syntax error', +# bison says 'parse error' instead of 'syntax error', # various yaccs may or may not capitalize 'syntax'. -print "# $@\nnot " unless $@ =~ /(syntax|parser) error/mi; +print "# $@\nnot " unless $@ =~ /(syntax|parse) error/mi; print "ok ",$i++,"\n"; # successful require diff --git a/t/op/misc.t b/t/op/misc.t index f8bc215..6815f82 100755 --- a/t/op/misc.t +++ b/t/op/misc.t @@ -36,9 +36,9 @@ for (@prgs){ $status = $?; $results = `$CAT $tmpfile`; $results =~ s/\n+$//; -# bison says 'parser error' instead of 'syntax error', +# bison says 'parse error' instead of 'syntax error', # various yaccs may or may not capitalize 'syntax'. - $results =~ s/^(syntax|parser) error/\L$1 error/mi; + $results =~ s/^(syntax|parse) error/\L$1 error/mi; $expected =~ s/\n+$//; if ( $results ne $expected){ print STDERR "PROG: $switch\n$prog\n"; diff --git a/t/pragma/subs.t b/t/pragma/subs.t index dc272f6..ae20857 100755 --- a/t/pragma/subs.t +++ b/t/pragma/subs.t @@ -55,9 +55,9 @@ for (@prgs){ # allow expected output to be written as if $prog is on STDIN $results =~ s/tmp\d+/-/g; $results =~ s/\n%[A-Z]+-[SIWEF]-.*$// if $Is_VMS; # clip off DCL status msg -# bison says 'parser error' instead of 'syntax error', +# bison says 'parse error' instead of 'syntax error', # various yaccs may or may not capitalize 'syntax'. - $results =~ s/^(syntax|parser) error/\L$1 error/mi; + $results =~ s/^(syntax|parse) error/\L$1 error/mi; $expected =~ s/\n+$//; my $prefix = ($results =~ s/^PREFIX\n//) ; if ( $results =~ s/^SKIPPED\n//) { diff --git a/t/pragma/warning.t b/t/pragma/warning.t index 598079e..e6c37fd 100755 --- a/t/pragma/warning.t +++ b/t/pragma/warning.t @@ -85,9 +85,9 @@ for (@prgs){ # allow expected output to be written as if $prog is on STDIN $results =~ s/tmp\d+/-/g; $results =~ s/\n%[A-Z]+-[SIWEF]-.*$// if $Is_VMS; # clip off DCL status msg -# bison says 'parser error' instead of 'syntax error', +# bison says 'parse error' instead of 'syntax error', # various yaccs may or may not capitalize 'syntax'. - $results =~ s/^(syntax|parser) error/\L$1 error/mi; + $results =~ s/^(syntax|parse) error/\L$1 error/mi; $expected =~ s/\n+$//; my $prefix = ($results =~ s/^PREFIX\n//) ; # any special options? (OPTIONS foo bar zap) -- 2.7.4