* parse.y (parser_prepare): set parser encode too when BOM exists.

git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@13292 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

1 files changed, 9 insertions, 3 deletions

diff --git a/parse.y b/parse.y
index b68f5e6cf..14d7b27f5 100644
--- a/parse.y
+++ b/parse.y
@@ -5490,6 +5490,13 @@ lvar_defined_gen(struct parser_params *parser, ID id)
 }
 
 /* emacsen -*- hack */
+static void
+parser_set_encode(struct parser_params *parser, const char *name)
+{
+    rb_set_kcode(name);
+    parser->enc = rb_enc_find(name);
+}
+
 #ifndef RIPPER
 typedef void (*rb_pragma_setter_t)(struct parser_params *parser, const char *name, const char *val);
 
@@ -5498,8 +5505,7 @@ pragma_encoding(struct parser_params *parser, const char *name, const char *val)
 {
     if (parser && parser->line_count != (parser->has_shebang ? 2 : 1))
 	return;
-    rb_set_kcode(val);
-    parser->enc = rb_enc_find(val);
+    parser_set_encode(parser, val);
 }
 
 struct pragma {
@@ -5641,7 +5647,7 @@ parser_prepare(struct parser_params *parser)
 	if (lex_pend - lex_p >= 2 &&
 	    (unsigned char)lex_p[0] == 0xbb &&
 	    (unsigned char)lex_p[1] == 0xbf) {
-	    rb_set_kcode("UTF-8");
+	    parser_set_encode(parser, "UTF-8");
 	    lex_p += 2;
 	    return;
 	}