diff --git a/ChangeLog b/ChangeLog
index dd51b18227..4a5d5ae60e 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+Wed Aug 13 15:58:31 2003  WATANABE Hirofumi  <eban@ruby-lang.org>
+
+	* object.c (rb_class_s_alloc): add function prototype to avoid VC++
+	  warning.
+
 Wed Aug 13 13:50:59 2003  NAKAMURA Usaku <usa@ruby-lang.org>
 
 	* ext/Win32API/Win32API.c (Win32API_initialize): should pass some
diff --git a/object.c b/object.c
index 67528fb925..f95c79be7a 100644
--- a/object.c
+++ b/object.c
@@ -686,10 +686,10 @@ rb_module_s_alloc(klass)
     return mod;
 }
 
+static VALUE rb_class_s_alloc _((VALUE));
 static VALUE
-rb_class_s_alloc(argc, argv)
-    int argc;
-    VALUE *argv;
+rb_class_s_alloc(klass)
+    VALUE klass;
 {
     return rb_class_boot(0);
 }