diff --git a/ChangeLog b/ChangeLog
index 92b3fcafc2..30df76968b 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+Thu Jul 15 21:38:31 2010  Yusuke Endoh  <mame@tsg.ne.jp>
+
+	* proc.c (bm_free): fix memory leak.  [ruby-core:30869] [Bug #3466]
+
 Thu Jul 15 15:47:32 2010  NARUSE, Yui  <naruse@ruby-lang.org>
 
 	* regexec.c (onig_search): don't skip non-ANYCHARs when
diff --git a/proc.c b/proc.c
index 01d06bf076..7df2ec890b 100644
--- a/proc.c
+++ b/proc.c
@@ -871,6 +871,7 @@ bm_free(void *ptr)
 	xfree(def);
     else if (def->alias_count > 0)
 	def->alias_count--;
+    xfree(ptr);
 }
 
 static size_t