Upgrade to Encode 2.00.

[p5sagit/p5-mst-13.2.git] / ext / Encode / t / at-tw.t

diff --git a/ext/Encode/t/at-tw.t b/ext/Encode/t/at-tw.t
index 21e77db..11abbf3 100644 (file)
--- a/ext/Encode/t/at-tw.t
+++ b/ext/Encode/t/at-tw.t
@@ -36,10 +36,10 @@ use_ok('Encode::TW');
 
 run_tests('Basic Big5 range', {
     'utf'      => (
-pack('U*',24093,39640,38525,20043,33495,35028,20846,65292).
-pack('U*',26389,30343,32771,26352,20271,24248,65108).
-pack('U*',25885,25552,35998,20110,23391,38508,20846,65292).
-pack('U*',24799,24218,23493,21566,20197,38477,65108)
+24093.39640.38525.20043.33495.35028.20846.65292.
+26389.30343.32771.26352.20271.24248.65108.
+25885.25552.35998.20110.23391.38508.20846.65292.
+24799.24218.23493.21566.20197.38477.65108
     ),
 
     'big5'     => (join('',
@@ -60,11 +60,11 @@ pack('U*',24799,24218,23493,21566,20197,38477,65108)
 
 run_tests('Hong Kong Extensions', {
     'utf'      => (
-pack('U*',24863,35613,25152,26377,20351,29992,32,80,101,114,108,32).
-pack('U*',22021,26379,21451,65292,32102,25105,21707,22021).
-pack('U*',25903,25345,12289,24847,35211,21644,40723,21237).
-pack('U*',22914,26524,32232,30908,26377,20219,20309,37679,28431).
-pack('U*',65292,35531,21578,35380,25105,21707,12290)
+24863.35613.25152.26377.20351.29992.32.80.101.114.108.32.
+22021.26379.21451.65292.32102.25105.21707.22021.
+25903.25345.12289.24847.35211.21644.40723.21237.
+22914.26524.32232.30908.26377.20219.20309.37679.28431.
+65292.35531.21578.35380.25105.21707.12290
     ),
 
     'big5-hkscs'       => join('',