From 0dc342de848a642ecce8db697b8fecd83a63e117 Mon Sep 17 00:00:00 2001
From: yugui <yugui@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Mon, 25 Aug 2008 15:02:05 +0000
Subject: added tag v1_9_0_4

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/tags/v1_9_0_4@18845 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 trunk/test/ruby/enc/test_cp949.rb | 28 ++++++++++++++++++++++++++++
 1 file changed, 28 insertions(+)
 create mode 100644 trunk/test/ruby/enc/test_cp949.rb

(limited to 'trunk/test/ruby/enc/test_cp949.rb')

diff --git a/trunk/test/ruby/enc/test_cp949.rb b/trunk/test/ruby/enc/test_cp949.rb
new file mode 100644
index 0000000000..e675c7b80c
--- /dev/null
+++ b/trunk/test/ruby/enc/test_cp949.rb
@@ -0,0 +1,28 @@
+require "test/unit"
+
+class TestCP949 < Test::Unit::TestCase
+  def s(s)
+    s.force_encoding("cp949")
+  end
+
+  def test_mbc_enc_len
+    assert_equal(1, s("\xa1\xa1").size)
+  end
+
+  def test_mbc_to_code
+    assert_equal(0xa1a1, s("\xa1\xa1").ord)
+  end
+
+  def test_code_to_mbc
+    assert_equal(s("\xa1\xa1"), 0xa1a1.chr("cp949"))
+  end
+
+  def test_mbc_case_fold
+    r = Regexp.new(s("(\xa1\xa1)\\1"), "i")
+    assert_match(r, s("\xa1\xa1\xa1\xa1"))
+  end
+
+  def test_left_adjust_char_head
+    assert_equal(s("\xa1\xa1"), s("\xa1\xa1\xa1\xa1").chop)
+  end
+end
-- 
cgit v1.2.3