diff options
| author | Steve Hay <SteveHay@planit.com> | 2005-06-17 11:36:45 +0000 |
|---|---|---|
| committer | Steve Hay <SteveHay@planit.com> | 2005-06-17 11:36:45 +0000 |
| commit | 3a00b83ed94a188580921b4677320b4295bee93d (patch) | |
| tree | 607ba76c867985a19441c8cde816c392581f2993 /win32/win32.c | |
| parent | f6342b4b53f678226f6ef9a63cf476fbf96744f4 (diff) | |
| download | perl-3a00b83ed94a188580921b4677320b4295bee93d.tar.gz | |
Silence STDERR grumblings from Borland's math library.
This fixes failures in ext/B/t/deparse.t and lib/warnings.t (and
renders change 24870 obsolete, hence it is reverted here).
p4raw-id: //depot/perl@24883
Diffstat (limited to 'win32/win32.c')
| -rw-r--r-- | win32/win32.c | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/win32/win32.c b/win32/win32.c index 8f1a8ac67a..21e04244b2 100644 --- a/win32/win32.c +++ b/win32/win32.c @@ -117,6 +117,16 @@ static DWORD w32_platform = (DWORD)-1; #define ONE_K_BUFSIZE 1024 +#ifdef __BORLANDC__ +/* Silence STDERR grumblings from Borland's math library. */ +DllExport int +_matherr(struct _exception *a) +{ + PERL_UNUSED_VAR(a); + return 1; +} +#endif + int IsWin95(void) { |