summaryrefslogtreecommitdiff
path: root/win32
diff options
context:
space:
mode:
Diffstat (limited to 'win32')
-rw-r--r--win32/win32sck.c2
1 files changed, 2 insertions, 0 deletions
diff --git a/win32/win32sck.c b/win32/win32sck.c
index 594a2e3099..3b81d8bcae 100644
--- a/win32/win32sck.c
+++ b/win32/win32sck.c
@@ -431,7 +431,9 @@ my_fclose (FILE *pf)
win32_fflush(pf);
err = closesocket(osf);
if (err == 0) {
+#if defined(USE_FIXED_OSFHANDLE) || defined(PERL_MSVCRT_READFIX)
_set_osfhnd(fileno(pf), INVALID_HANDLE_VALUE);
+#endif
(void)fclose(pf); /* handle already closed, ignore error */
return 0;
}