1 files changed, 11 insertions, 5 deletions
diff --git a/re.c b/re.c
index 4669aeaec5..f977face5c 100644
--- a/re.c
+++ b/re.c
@@ -969,19 +969,25 @@ reg_prepare_operation(re1, re2)
     return flag;
 }
 
-static VALUE
-kcode_getter()
+char*
+rb_get_kcode()
 {
     switch (reg_kcode) {
       case KCODE_SJIS:
-	return str_new2("SJIS");
+	return "SJIS";
       case KCODE_EUC:
-	return str_new2("EUC");
+	return "EUC";
       default:
-	return str_new2("NONE");
+	return "NONE";
     }
 }
 
+static VALUE
+kcode_getter()
+{
+    return str_new2(rb_get_kcode());
+}
+
 void
 rb_set_kcode(code)
     char *code;