Fix GB18030 to UTF-8 mapping table

tatsuo-ishii · tatsuo-ishii · commit 0c9f978c0cc2 · 2003-08-25T01:46:16.000Z
diff --git a/src/backend/utils/mb/Unicode/UCS_to_GB18030.pl b/src/backend/utils/mb/Unicode/UCS_to_GB18030.pl
@@ -2,7 +2,7 @@
 #
 # Copyright 2002 by Bill Huang
 #
-# $Id: UCS_to_GB18030.pl,v 1.2 2002/11/12 11:33:40 ishii Exp $
+# $Id: UCS_to_GB18030.pl,v 1.3 2003/08/25 01:46:16 ishii Exp $
 #
 # Generate UTF-8 <--> GB18030 code conversion tables from
 # map files provided by Unicode organization.
@@ -78,7 +78,7 @@
 	if( /^#/ ){
 		next;
 	}
-	( $c, $u, $rest ) = split;
+	( $u, $c, $rest ) = split;
 	$ucs = hex($u);
 	$code = hex($c);
 	if( $code >= 0x80 && $ucs >= 0x0080 ){

Original file line number	Diff line number	Diff line change
`@@ -2,7 +2,7 @@`
`2`	`2`	`#`
`3`	`3`	`# Copyright 2002 by Bill Huang`
`4`	`4`	`#`
`5`		`-# $Id: UCS_to_GB18030.pl,v 1.2 2002/11/12 11:33:40 ishii Exp $`
	`5`	`+# $Id: UCS_to_GB18030.pl,v 1.3 2003/08/25 01:46:16 ishii Exp $`
`6`	`6`	`#`
`7`	`7`	`# Generate UTF-8 <--> GB18030 code conversion tables from`
`8`	`8`	`# map files provided by Unicode organization.`
`@@ -78,7 +78,7 @@`
`78`	`78`	`if( /^#/ ){`
`79`	`79`	`next;`
`80`	`80`	`}`
`81`		`- ( $c, $u, $rest ) = split;`
	`81`	`+ ( $u, $c, $rest ) = split;`
`82`	`82`	`$ucs = hex($u);`
`83`	`83`	`$code = hex($c);`
`84`	`84`	`if( $code >= 0x80 && $ucs >= 0x0080 ){`