From fb9c53dea50fbbf7d789f0cac004a00c6d125022 Mon Sep 17 00:00:00 2001
From: akr <akr@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Fri, 5 Sep 2008 21:24:42 +0000
Subject: [PATCH] * tool/transcode-tblgen.rb (StrSet.parse): accept upper case 
  hexadecimal digits.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@19164 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 ChangeLog                | 5 +++++
 tool/transcode-tblgen.rb | 4 ++--
 2 files changed, 7 insertions(+), 2 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index db356deb1c..27c1f9878b 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+Sat Sep  6 06:23:27 2008  Tanaka Akira  <akr@fsij.org>
+
+	* tool/transcode-tblgen.rb (StrSet.parse): accept upper case
+	  hexadecimal digits.
+
 Sat Sep  6 05:37:08 2008  Tanaka Akira  <akr@fsij.org>
 
 	* transcode.c (output_hex_charref): upcase hexadecimal digits.
diff --git a/tool/transcode-tblgen.rb b/tool/transcode-tblgen.rb
index 3032b115ac..2ed9f13618 100644
--- a/tool/transcode-tblgen.rb
+++ b/tool/transcode-tblgen.rb
@@ -36,11 +36,11 @@ class StrSet
           seq = $'
           set_result = []
           set.scan(/[^,]+/) {|range|
-            if /\A([0-9a-f][0-9a-f])-([0-9a-f][0-9a-f])\z/ =~ range
+            if /\A([0-9a-f][0-9a-f])-([0-9a-f][0-9a-f])\z/i =~ range
               b = $1.to_i(16)
               e = $2.to_i(16)
               set_result << (b..e)
-            elsif /\A([0-9a-f][0-9a-f])\z/ =~ range
+            elsif /\A([0-9a-f][0-9a-f])\z/i =~ range
               byte = $1.to_i(16)
               set_result << (byte..byte)
             else