diff --git a/ChangeLog b/ChangeLog
index e6df24d572..e6549cb4ad 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+Sun Jun  3 03:15:46 2012  NARUSE, Yui  <naruse@ruby-lang.org>
+
+	* regparse.c (onig_number_of_names): suppress a warning.
+
 Sun Jun  3 01:36:52 2012  Koichi Sasada  <ko1@atdot.net>
 
 	* vm_backtrace.c: change names.
diff --git a/regparse.c b/regparse.c
index 39de2359f8..a207de39b0 100644
--- a/regparse.c
+++ b/regparse.c
@@ -589,7 +589,7 @@ onig_number_of_names(regex_t* reg)
   NameTable* t = (NameTable* )reg->name_table;
 
   if (IS_NOT_NULL(t))
-    return t->num_entries;
+    return (int)t->num_entries;
   else
     return 0;
 }