diff --git a/ChangeLog b/ChangeLog
index 58c25c461e..02e3cc6ca6 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+Sat Sep 26 08:35:12 2009  Koichi Sasada  <ko1@atdot.net>
+
+	* iseq.c (compile_string): rename to parse_string(), because
+	  this function only parse String to NODE.
+
 Fri Sep 25 16:01:45 2009  NAKAMURA Usaku  <usa@ruby-lang.org>
 
 	* win32/win32.c, include/ruby/win32.h (rb_w32_access): new function to
diff --git a/iseq.c b/iseq.c
index 360f283a76..a14f374687 100644
--- a/iseq.c
+++ b/iseq.c
@@ -517,7 +517,7 @@ rb_iseq_load(VALUE data, VALUE parent, VALUE opt)
 }
 
 static NODE *
-compile_string(VALUE str, const char *file, int line)
+parse_string(VALUE str, const char *file, int line)
 {
     VALUE parser = rb_parser_new();
     NODE *node = rb_parser_compile_string(parser, file, str, line);
@@ -534,7 +534,7 @@ rb_iseq_compile_with_option(VALUE src, VALUE file, VALUE line, VALUE opt)
     rb_compile_option_t option;
     const char *fn = StringValueCStr(file);
     int ln = NUM2INT(line);
-    NODE *node = compile_string(StringValue(src), fn, ln);
+    NODE *node = parse_string(StringValue(src), fn, ln);
     rb_thread_t *th = GET_THREAD();
     make_compile_option(&option, opt);