diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 1998-10-30 13:27:39 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 1998-10-30 13:27:39 +0000 |
| commit | 2a8ee23279873759693fa83eca279355db2b665c (patch) | |
| tree | 36f301b5896ed58235db7832e89d95853eb32b10 /t/pragma/warning.t | |
| parent | 93fb2ac393172fc3e2c14edb20b718309198abbc (diff) | |
| download | perl-2a8ee23279873759693fa83eca279355db2b665c.tar.gz | |
There can be multiple yacc/bison errors.
p4raw-id: //depot/cfgperl@2143
Diffstat (limited to 't/pragma/warning.t')
| -rwxr-xr-x | t/pragma/warning.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/pragma/warning.t b/t/pragma/warning.t index cc4c2dd975..653e2be3a5 100755 --- a/t/pragma/warning.t +++ b/t/pragma/warning.t @@ -87,7 +87,7 @@ for (@prgs){ $results =~ s/\n%[A-Z]+-[SIWEF]-.*$// if $Is_VMS; # clip off DCL status msg # bison says 'parse error' instead of 'syntax error', # various yaccs may or may not capitalize 'syntax'. - $results =~ s/^(syntax|parse) error/syntax error/mi; + $results =~ s/^(syntax|parse) error/syntax error/mig; $expected =~ s/\n+$//; my $prefix = ($results =~ s/^PREFIX\n//) ; # any special options? (OPTIONS foo bar zap) |