diff --git a/ChangeLog b/ChangeLog
index a07bb1de5f..6f17c54077 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+Fri Dec 21 15:15:44 2007  Tanaka Akira  <akr@fsij.org>
+
+	* gc.c (rb_garbage_collect): new function for debugging.
+
 Fri Dec 21 15:16:00 2007  Nobuyoshi Nakada  <nobu@ruby-lang.org>
 
 	* encoding.c (rb_to_encoding_index): should return error instead of
diff --git a/gc.c b/gc.c
index c539b59ec0..3a71af2926 100644
--- a/gc.c
+++ b/gc.c
@@ -1525,6 +1525,12 @@ garbage_collect(void)
     return Qtrue;
 }
 
+int
+rb_garbage_collect(void)
+{
+    return garbage_collect();
+}
+
 void
 rb_gc_mark_machine_stack(rb_thread_t *th)
 {