3 files changed, 14 insertions, 0 deletions
diff --git a/ChangeLog b/ChangeLog
index 9f5c8de2e5..9e8b616002 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,10 @@
+Thu Jul  3 02:47:53 2008  Masaki Suketa  <masaki.suketa@nifty.ne.jp>
+
+	* gc.c: add rb_during_gc(). based on a patch from arton <artonx AT
+	  yahoo.co.jp> at [ruby-dev:35313].   
+
+	* intern.h: ditto.
+
 Wed Jul  2 17:48:51 2008  URABE Shyouhei  <shyouhei@ruby-lang.org>
 
 	* lib/mkmf.rb (create_tmpsrc): we need to include COMMON_HEADERS,
diff --git a/gc.c b/gc.c
index f19602ee05..761caeb07e 100644
--- a/gc.c
+++ b/gc.c
@@ -423,6 +423,12 @@ add_heap()
 }
 #define RANY(o) ((RVALUE*)(o))
 
+int 
+rb_during_gc()
+{
+    return during_gc;
+}
+
 VALUE
 rb_newobj()
 {
diff --git a/intern.h b/intern.h
index b670c9c484..7e72dd5537 100644
--- a/intern.h
+++ b/intern.h
@@ -252,6 +252,7 @@ VALUE rb_file_directory_p _((VALUE,VALUE));
 NORETURN(void rb_memerror __((void)));
 int ruby_stack_check _((void));
 int ruby_stack_length _((VALUE**));
+int rb_during_gc _((void));
 char *rb_source_filename _((const char*));
 void rb_gc_mark_locations _((VALUE*, VALUE*));
 void rb_mark_tbl _((struct st_table*));