diff options
| -rw-r--r-- | lib/warnings.t | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/lib/warnings.t b/lib/warnings.t index f23d9e67f8..2143b4ded1 100644 --- a/lib/warnings.t +++ b/lib/warnings.t @@ -137,6 +137,11 @@ for (@prgs){ $results =~ s|:abc(d)?\b|./abc$1|g; } + # Borland compiler whines about DOMAIN errors for some "uninit" tests + if ($^O eq 'MSWin32' and $Config{ccname} =~ /bcc32/) { + $results =~ s|\n\n\w+: DOMAIN error||g; + } + $expected =~ s/\n+$//; my $prefix = ($results =~ s#^PREFIX(\n|$)##) ; # any special options? (OPTIONS foo bar zap) |