add a test.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@15403 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

test/ruby/test_m17n.rb

@@ -864,7 +864,7 @@ class TestM17N < Test::Unit::TestCase
     assert_equal(["a"], e("\xa1\xa2a\xa3\xa4").scan(/a/))
   end
 
-  def test_scan_dup
+  def test_dup_scan
     s1 = e("\xa4\xa2")*100
     s2 = s1.dup.force_encoding("ascii-8bit")
     s2.scan(/\A./n) {|f|
@@ -872,6 +872,12 @@ class TestM17N < Test::Unit::TestCase
     }
   end
 
+  def test_dup_aref
+    s1 = e("\xa4\xa2")*100
+    s2 = s1.dup.force_encoding("ascii-8bit")
+    assert_equal(Encoding::ASCII_8BIT, s2[10..-1].encoding)
+  end
+
   def test_upto
     s1 = e("\xa1\xa2")
     s2 = s("\xa1\xa2")