diff options
| author | Gurusamy Sarathy <gsar@engin.umich.edu> | 1997-08-07 00:00:00 +0000 |
|---|---|---|
| committer | Tim Bunce <Tim.Bunce@ig.co.uk> | 1997-08-07 00:00:00 +1200 |
| commit | 0af56dfea04837510821e168d4a9191fc1d73b0e (patch) | |
| tree | 0af2c2a4eaa14bbcd767d9051bfa4ba1b25843b3 /win32/win32sck.c | |
| parent | d0e28714d06a28aece55f6d80cabd610184a6bd0 (diff) | |
| download | perl-0af56dfea04837510821e168d4a9191fc1d73b0e.tar.gz | |
getservby*() calls fail on Windows NT
This patch is needed to avoid GPFs on calls to getservby*()
on Windows NT, when compiling with the Borland compiler.
The same bug is present on Windows95 when using either
compiler.
The patch simply enables the Windows95 workaround.
p5p-msgid: 199706231654.MAA23276@aatma.engin.umich.edu
Diffstat (limited to 'win32/win32sck.c')
| -rw-r--r-- | win32/win32sck.c | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/win32/win32sck.c b/win32/win32sck.c index fe5b2e7153..d541a7e3ba 100644 --- a/win32/win32sck.c +++ b/win32/win32sck.c @@ -694,9 +694,12 @@ win32_savecopyservent(struct servent*d, struct servent*s, const char *proto) d->s_name = s->s_name; d->s_aliases = s->s_aliases; d->s_port = s->s_port; +#ifndef __BORLANDC__ /* Buggy on Win95 and WinNT-with-Borland-WSOCK */ if (!IsWin95() && s->s_proto && strlen(s->s_proto)) d->s_proto = s->s_proto; - else if (proto && strlen(proto)) + else +#endif + if (proto && strlen(proto)) d->s_proto = (char *)proto; else d->s_proto = "tcp"; |