diff --git a/ChangeLog b/ChangeLog
index 63fa38a3fe..c6712b0a31 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+Wed Dec 18 17:03:00 2013  Koichi Sasada  <ko1@atdot.net>
+
+	* gc.c (gc_profile_record_get): should return an empty array
+	  when profiling is active.
+
 Wed Dec 18 16:49:40 2013  Koichi Sasada  <ko1@atdot.net>
 
 	* gc.c (gc_profile_clear, gc_profile_enable): remove rest_sweep().
diff --git a/gc.c b/gc.c
index 8a1acf2738..5330f35d3d 100644
--- a/gc.c
+++ b/gc.c
@@ -7000,7 +7000,7 @@ gc_profile_record_get(void)
     size_t i;
     rb_objspace_t *objspace = (&rb_objspace);
 
-    if (!gc_prof_enabled(objspace)) {
+    if (!objspace->profile.run) {
 	return Qnil;
     }