diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 1998-10-17 14:59:15 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 1998-10-17 14:59:15 +0000 |
commit | d91e2bdb4bc210a23427760819d26aa7951da955 (patch) | |
tree | 594f535487f28b45619e586477266c771dee959b /t/op/misc.t | |
parent | 33e3389819aa99d8aa0fbaa625ec3ae648f95a4f (diff) | |
download | perl-d91e2bdb4bc210a23427760819d26aa7951da955.tar.gz |
More robust yacc/bison failure output handling.
p4raw-id: //depot/cfgperl@2011
Diffstat (limited to 't/op/misc.t')
-rwxr-xr-x | t/op/misc.t | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/t/op/misc.t b/t/op/misc.t index 667db989bf..b924f89847 100755 --- a/t/op/misc.t +++ b/t/op/misc.t @@ -36,7 +36,9 @@ for (@prgs){ $status = $?; $results = `$CAT $tmpfile`; $results =~ s/\n+$//; - $results =~ s/syntax error/syntax error/i; +# bison says 'parser error' instead of 'syntax error', +# various yaccs may or may not capitalize 'syntax'. + $results =~ s/^(syntax|parser) error/\L$1 error/i; $expected =~ s/\n+$//; if ( $results ne $expected){ print STDERR "PROG: $switch\n$prog\n"; |