naruse	2009-07-25 01:15:53 +0900 (Sat, 25 Jul 2009)

  New Revision: 24267

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

  Log:
    * enc/big5.c: Fix EncLen_BIG5 for Big5-HKSCS. see [ruby-core:24390]

  Modified files:
    trunk/ChangeLog
    trunk/enc/big5.c

Index: ChangeLog
===================================================================
--- ChangeLog	(revision 24266)
+++ ChangeLog	(revision 24267)
@@ -1,3 +1,7 @@
+Sat Jul 25 01:05:59 2009  NARUSE, Yui  <naruse@r...>
+
+	* enc/big5.c: Fix EncLen_BIG5 for Big5-HKSCS. see [ruby-core:24390]
+
 Fri Jul 24 19:19:19 2009  Martin Duerst  <duerst@i...>
 
 	* enc/trans/big5.trans, big5-hkscs-tbl.rb:
@@ -2,2 +6,3 @@
 	  new Chinese BIG5-HKSCS transcoding (with Tatsuya Mizuno)
+	  see [ruby-core:24390]
 
Index: enc/big5.c
===================================================================
--- enc/big5.c	(revision 24266)
+++ enc/big5.c	(revision 24267)
@@ -30,22 +30,23 @@
 #include "regenc.h"
 
 static const int EncLen_BIG5[] = {
-  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
-  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
-  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
-  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
-  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
-  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
-  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
-  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
-  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
-  1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
-  1, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
-  2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
-  2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
-  2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
-  2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
-  2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 1
+ /* LEN  0  1  2  3  4  5  6  7  8  9  A  B  C  D  E  F */
+ /* 0 */ 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
+ /* 1 */ 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
+ /* 2 */ 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
+ /* 3 */ 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
+ /* 4 */ 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
+ /* 5 */ 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
+ /* 6 */ 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
+ /* 7 */ 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
+ /* 8 */ 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 2, 2, 2,
+ /* 9 */ 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
+ /* A */ 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
+ /* B */ 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
+ /* C */ 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
+ /* D */ 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
+ /* E */ 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
+ /* F */ 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 1,
 };
 
 typedef enum { FAILURE = -2, ACCEPT = -1, S0 = 0, S1 } state_t;
@@ -195,6 +196,13 @@
   return (BIG5_ISMB_TRAIL(c) ? FALSE : TRUE);
 }
 
+/*
+ * Name: Big5  (preferred MIME name)
+ * MIBenum: 2026
+ * Source: Chinese for Taiwan Multi-byte set.
+ *         PCL Symbol Set Id: 18T
+ * Alias: csBig5
+ */
 OnigEncodingDefine(big5, BIG5) = {
   big5_mbc_enc_len,
   "Big5",     /* name */
@@ -213,5 +221,13 @@
   big5_left_adjust_char_head,
   big5_is_allowed_reverse_match
 };
-ENC_ALIAS("CP950", "BIG5")
-ENC_REPLICATE("BIG5-HKSCS", "BIG5")
+ENC_ALIAS("CP950", "Big5")
+
+/*
+ * Name: Big5-HKSCS
+ * MIBenum: 2101
+ * Source:   See (http://www.iana.org/assignments/charset-reg/Big5-HKSCS)
+ * Alias: None
+ */
+ENC_REPLICATE("Big5-HKSCS", "Big5")
+ENC_ALIAS("CP951", "Big5-HKSCS")

Property changes on: enc/big5.c
___________________________________________________________________
Name: svn:executable
   + *


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