From 1bd27a78827109f85357f80827a9975fae9bb2a5 Mon Sep 17 00:00:00 2001
From: "NARUSE, Yui" <naruse@airemix.jp>
Date: Sun, 24 Jan 2021 15:55:22 +0900
Subject: [PATCH] Add test for String#casecmp?

String#casecmp? also normalize upper case characters in legacy encodings.
---
 test/ruby/test_m17n_comb.rb | 15 +++++++++++++++
 1 file changed, 15 insertions(+)

diff --git a/test/ruby/test_m17n_comb.rb b/test/ruby/test_m17n_comb.rb
index 49141790f0..e48a1948be 100644
--- a/test/ruby/test_m17n_comb.rb
+++ b/test/ruby/test_m17n_comb.rb
@@ -593,6 +593,21 @@ class TestM17NComb < Test::Unit::TestCase
     }
   end
 
+  def test_str_casecmp?
+    strings = STRINGS.dup
+    strings.push(
+      # prevent wrong single byte optimization
+      "\xC0".force_encoding("ISO-8859-1"),
+      "\xE0".force_encoding("ISO-8859-1"),
+    )
+    combination(strings, strings) {|s1, s2|
+      #puts "#{encdump(s1)}.casecmp(#{encdump(s2)})"
+      next unless s1.valid_encoding? && s2.valid_encoding? && Encoding.compatible?(s1, s2)
+      r = s1.casecmp?(s2)
+      assert_equal(s1.downcase(:fold) == s2.downcase(:fold), r)
+    }
+  end
+
   def test_str_center
     combination(STRINGS, [0,1,2,3,10]) {|s1, width|
       t = s1.center(width)