From a69b9bce318b3d4717b92a8747ecdb4e71585c5d Mon Sep 17 00:00:00 2001
From: matz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Sat, 8 Jan 2000 05:00:25 +0000
Subject: 2000-01-08

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@601 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 ext/socket/socket.c | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

(limited to 'ext/socket')

diff --git a/ext/socket/socket.c b/ext/socket/socket.c
index e8ceacf621..3605e991f0 100644
--- a/ext/socket/socket.c
+++ b/ext/socket/socket.c
@@ -92,10 +92,13 @@ static void
 sock_finalize(fptr)
     OpenFile *fptr;
 {
-    if (!fptr->f) return;
+    SOCKET s;
 
+    if (!fptr->f) return;
+    s = get_osfhandle(fileno(fptr->f));
     myfdclose(fptr->f);
-    if(fptr->f2) myfdclose(fptr->f2);
+    if (fptr->f2) myfdclose(fptr->f2);
+    closesocket(s);
 }
 #endif
 
-- 
cgit v1.2.3