diff --git a/ChangeLog b/ChangeLog
index a2f8d4285a..fc314051ca 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+Tue Jan 13 12:10:42 2009  NAKAMURA Usaku  <usa@ruby-lang.org>
+
+	* ext/socket/{getaddrinfo,getnameinfo}.c: need to include ws2tcpip.h
+	  on Windows.
+
 Tue Jan 13 03:07:28 2009  NAKAMURA Usaku  <usa@ruby-lang.org>
 
 	* instruby.rb: require "tool/mdoc2man.rb" before chdir if needed.
diff --git a/ext/socket/getaddrinfo.c b/ext/socket/getaddrinfo.c
index 837a506a72..de16b9fb12 100644
--- a/ext/socket/getaddrinfo.c
+++ b/ext/socket/getaddrinfo.c
@@ -64,6 +64,7 @@
 #include <unistd.h>
 #else
 #include <winsock2.h>
+#include <ws2tcpip.h>
 #include <io.h>
 #endif
 #include <string.h>
diff --git a/ext/socket/getnameinfo.c b/ext/socket/getnameinfo.c
index aee81b5356..3ea2f7251f 100644
--- a/ext/socket/getnameinfo.c
+++ b/ext/socket/getnameinfo.c
@@ -57,6 +57,7 @@
 #endif
 #ifdef _WIN32
 #include <winsock2.h>
+#include <ws2tcpip.h>
 #define snprintf _snprintf
 #endif