akr	2008-09-07 17:30:32 +0900 (Sun, 07 Sep 2008)

  New Revision: 19212

  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi?view=rev&revision=19212

  Log:
    * tool/transcode-tblgen.rb: o4 is usable only if the first byte is
      f0-f7.

  Modified files:
    trunk/ChangeLog
    trunk/tool/transcode-tblgen.rb

Index: ChangeLog
===================================================================
--- ChangeLog	(revision 19211)
+++ ChangeLog	(revision 19212)
@@ -1,3 +1,8 @@
+Sun Sep  7 17:29:49 2008  Tanaka Akira  <akr@f...>
+
+	* tool/transcode-tblgen.rb: o4 is usable only if the first byte is
+	  f0-f7.
+
 Sun Sep  7 12:44:26 2008  Tanaka Akira  <akr@f...>
 
 	* io.c (make_writeconv): choose ASCII compatible encoding as
Index: tool/transcode-tblgen.rb
===================================================================
--- tool/transcode-tblgen.rb	(revision 19211)
+++ tool/transcode-tblgen.rb	(revision 19212)
@@ -299,7 +299,7 @@
       "o2(0x#$1,0x#$2)"
     when /\A([0-9a-f][0-9a-f])([0-9a-f][0-9a-f])([0-9a-f][0-9a-f])\z/i
       "o3(0x#$1,0x#$2,0x#$3)"
-    when /\A([0-9a-f][0-9a-f])([0-9a-f][0-9a-f])([0-9a-f][0-9a-f])([0-9a-f][0-9a-f])\z/i
+    when /\A(f[0-7])([0-9a-f][0-9a-f])([0-9a-f][0-9a-f])([0-9a-f][0-9a-f])\z/i
       "o4(0x#$1,0x#$2,0x#$3,0x#$4)"
     when /\A\/\*BYTE_LOOKUP\*\// # pointer to BYTE_LOOKUP structure
       $'.to_s

--
ML: ruby-changes@q...
Info: http://www.atdot.net/~ko1/quickml/