2 files changed, 6 insertions, 0 deletions
diff --git a/ChangeLog b/ChangeLog
index 8b1dacb595..f672aff473 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+Mon Mar 25 02:01:03 2013  Narihiro Nakamura  <authornari@gmail.com>
+
+        * proc.c (bm_free): need to clean up the mark flag of a free and
+	  unlinked method entry. [Bug #8100] [ruby-core:53439]
+
 Sun Mar 24 22:13:51 2013  NARUSE, Yui  <naruse@ruby-lang.org>
 
 	* string.c (rb_str_rpartition): revert r39903, and convert byte offset
diff --git a/proc.c b/proc.c
index fe2280f84d..fe1bbff00d 100644
--- a/proc.c
+++ b/proc.c
@@ -905,6 +905,7 @@ bm_free(void *ptr)
 {
     struct METHOD *data = ptr;
     struct unlinked_method_entry_list_entry *ume = data->ume;
+    data->me->mark = 0;
     ume->me = data->me;
     ume->next = GET_VM()->unlinked_method_entry_list;
     GET_VM()->unlinked_method_entry_list = ume;