wanabe	2009-11-01 13:24:47 +0900 (Sun, 01 Nov 2009)

  New Revision: 25610

  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi?view=rev&revision=25610

  Log:
    * ext/socket/socket.c (socket_s_ip_address_list): use FreeLibrary() to
      free HMODULE.

  Modified files:
    trunk/ChangeLog
    trunk/ext/socket/socket.c

Index: ChangeLog
===================================================================
--- ChangeLog	(revision 25609)
+++ ChangeLog	(revision 25610)
@@ -1,3 +1,8 @@
+Sun Nov  1 13:11:27 2009  wanabe  <s.wanabe@g...>
+
+	* ext/socket/socket.c (socket_s_ip_address_list): use FreeLibrary() to
+	  free HMODULE.
+
 Sun Nov  1 08:17:48 2009  Nobuyoshi Nakada  <nobu@r...>
 
 	* gc.c (GET_STACK_BOUNDS): refactored common code.  based on a
Index: ext/socket/socket.c
===================================================================
--- ext/socket/socket.c	(revision 25609)
+++ ext/socket/socket.c	(revision 25610)
@@ -1711,21 +1711,21 @@
 	rb_notimplement();
     pGetAdaptersAddresses = (GetAdaptersAddresses_t)GetProcAddress(h, "GetAdaptersAddresses");
     if (!pGetAdaptersAddresses) {
-	CloseHandle(h);
+	FreeLibrary(h);
 	rb_notimplement();
     }
 
     ret = pGetAdaptersAddresses(AF_UNSPEC, 0, NULL, NULL, &len);
     if (ret != ERROR_SUCCESS && ret != ERROR_BUFFER_OVERFLOW) {
 	errno = rb_w32_map_errno(ret);
-	CloseHandle(h);
+	FreeLibrary(h);
 	rb_sys_fail("GetAdaptersAddresses");
     }
     adapters = (ip_adapter_addresses_t *)ALLOCA_N(BYTE, len);
     ret = pGetAdaptersAddresses(AF_UNSPEC, 0, NULL, adapters, &len);
     if (ret != ERROR_SUCCESS) {
 	errno = rb_w32_map_errno(ret);
-	CloseHandle(h);
+	FreeLibrary(h);
 	rb_sys_fail("GetAdaptersAddresses");
     }
 
@@ -1753,7 +1753,7 @@
 	}
     }
 
-    CloseHandle(h);
+    FreeLibrary(h);
     return list;
 #endif
 }

--
ML: ruby-changes@q...
Info: http://www.atdot.net/~ko1/quickml/