From: NARUSE, Yui Date: Wed, 19 Nov 2008 06:40:32 +0000 (+0000) Subject: Add test for guess UTF8_STR_OF_JIS_SECOND_LEVEL_KANJI. X-Git-Tag: v2_0_9~23 X-Git-Url: http://git.osdn.net/view?p=nkf%2Fnkf.git;a=commitdiff_plain;h=f8bbf06b11be7e78918646545b02cefb5cf89ff4 Add test for guess UTF8_STR_OF_JIS_SECOND_LEVEL_KANJI. patched by kyowa_t at kakaku.com [ruby-list:45633] --- diff --git a/nkf_test.pl b/nkf_test.pl index 4e79f6f..91a4742 100644 --- a/nkf_test.pl +++ b/nkf_test.pl @@ -2,7 +2,7 @@ # # nkf test program for nkf-2 # -# $Id: nkf_test.pl,v 1.29 2008/02/07 19:25:29 naruse Exp $ +# $Id: nkf_test.pl,v 1.30 2008/11/18 21:40:32 naruse Exp $ # # Shinji KONO # Sun Aug 18 12:25:40 JST 1996 @@ -260,6 +260,12 @@ printf "%-40s", "Ambiguous Case."; printf "%-40s", "SJIS Input assumption"; &test("$nkf -jSx",$example{'amb'},$example{'amb.sjis'}); +# UTF8_STR_OF_JIS_SECOND_LEVEL_KANJI +$example{'utf8_str_of_jis_second_level_kanji'} = "\xe9\xa4\x83\xe5\xad\x90"; + +printf "%-40s", "UTF8_STR_OF_JIS_SECOND_LEVEL_KANJI"; + &test("$nkf -g",$example{'utf8_str_of_jis_second_level_kanji'},"UTF-8\n"); + # Broken JIS printf "%-40s", "Broken JIS";