diff --git a/ChangeLog b/ChangeLog
index 83abab20b6..72bcf799ed 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,10 @@
+Mon Apr  1 16:52:00 2002  Nobuyoshi Nakada  <nobu.nakada@nifty.ne.jp>
+
+	* ext/sdbm/init.c (each_pair): moved prototype before the
+	  definition.
+
+	* ext/racc/cparse/cparse.c (call_scaniter): ditto.
+
 Mon Apr  1 15:11:40 2002  NAKAMURA Usaku <usa@ruby-lang.org>
 
 	* ext/racc/cparse/cparse.c: prototype; call_scaniter().
@@ -36,7 +43,6 @@ Fri Mar 29 16:36:52 2002  Nobuyoshi Nakada  <nobu.nakada@nifty.ne.jp>
 
 	* lib/mkmf.rb: add directory options.
 
-
 Fri Mar 29 15:49:29 2002  Usaku Nakamura <usa@ruby-lang.org>
 
 	* win32/README.win32: follow recent changes.
diff --git a/ext/racc/cparse/cparse.c b/ext/racc/cparse/cparse.c
index 7ec12b9a98..314e6a39c8 100644
--- a/ext/racc/cparse/cparse.c
+++ b/ext/racc/cparse/cparse.c
@@ -167,6 +167,7 @@ static void parser_core _((struct cparse_params*, VALUE, VALUE, int));
 static void extract_utok _((struct cparse_params*, VALUE, VALUE*, VALUE*));
 static VALUE catch_iter _((VALUE));
 static VALUE do_reduce _((VALUE, VALUE, VALUE));
+static VALUE call_scaniter _((VALUE));
 
 
 #define REDUCE(v, act) \
@@ -282,8 +283,6 @@ catch_scaniter(arr, data, self)
     return Qnil;
 }
 
-static VALUE call_scaniter _((VALUE));
-
 static void
 wrap_yyparse(v)
     struct cparse_params *v;
diff --git a/ext/sdbm/init.c b/ext/sdbm/init.c
index c5d20bf983..280637aa23 100644
--- a/ext/sdbm/init.c
+++ b/ext/sdbm/init.c
@@ -399,6 +399,8 @@ fsdbm_invert(obj)
     return hash;
 }
 
+static VALUE each_pair _((VALUE));
+
 static VALUE
 each_pair(obj)
     VALUE obj;
@@ -420,8 +422,6 @@ update_i(pair, dbm)
     return Qnil;
 }
 
-static VALUE each_pair _((VALUE));
-
 static VALUE
 fsdbm_update(obj, other)
     VALUE obj, other;