diff --git a/ChangeLog b/ChangeLog
index c03bc94969..931a1b2ec6 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+Thu Aug 16 09:53:28 2001  Usaku Nakamura  <usa@ruby-lang.org>
+
+	* ext/socket/socket.c (s_recvform): avoid VC++6 warning.
+
 Thu Aug 16 03:50:33 2001  Usaku Nakamura  <usa@ruby-lang.org>
 
 	* win32/win32.c (NtCmdGlob): avoid VC++ warning.
diff --git a/ext/socket/socket.c b/ext/socket/socket.c
index da30898e0d..9e91d1fcbe 100644
--- a/ext/socket/socket.c
+++ b/ext/socket/socket.c
@@ -476,6 +476,8 @@ s_recvfrom(sock, argc, argv, from)
 #endif
       case RECV_SOCKET:
 	return rb_assoc_new(str, rb_tainted_str_new(buf, alen));
+      default:
+	rb_bug("s_recvform called with bad value");
     }
 }