diff options
-rw-r--r-- | ChangeLog | 5 | ||||
-rw-r--r-- | tool/transcode-tblgen.rb | 4 |
2 files changed, 7 insertions, 2 deletions
@@ -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 |