* Add tests for Next line convertion.

[nkf/nkf.git] / nkf_test.pl

diff --git a/nkf_test.pl b/nkf_test.pl
index 9e60d15..6435880 100644 (file)
--- a/nkf_test.pl
+++ b/nkf_test.pl
@@ -2,7 +2,7 @@
 #
 # nkf test program for nkf-2
 #
-# $Id: nkf_test.pl,v 1.19 2007/09/12 04:56:53 naruse Exp $
+# $Id: nkf_test.pl,v 1.21 2007/10/01 21:39:39 naruse Exp $
 #
 #    Shinji KONO <kono@ie.u-ryukyu.ac.jp>
 # Sun Aug 18 12:25:40 JST 1996
@@ -1049,5 +1049,100 @@ eofeof
 
 printf "%-40s", "test_data/bugs10904";
     &test("$nkf -Mj",$example{'test_data/bugs10904'},$example{'test_data/bugs10904.ans'});
-# end
 
+printf "%-40s", "Guess NL";
+&command_tests(
+       "$nkf --guess","none",      "ASCII\n",
+       "$nkf --guess","\n",        "ASCII (LF)\n",
+       "$nkf --guess","\n\n",      "ASCII (LF)\n",
+       "$nkf --guess","\n\r",      "ASCII (MIXED NL)\n",
+       "$nkf --guess","\n\r\n",    "ASCII (MIXED NL)\n",
+       "$nkf --guess","\n.\n",     "ASCII (LF)\n",
+       "$nkf --guess","\n.\r",     "ASCII (MIXED NL)\n",
+       "$nkf --guess","\n.\r\n",   "ASCII (MIXED NL)\n",
+       "$nkf --guess","\r",        "ASCII (CR)\n",
+       "$nkf --guess","\r\r",      "ASCII (CR)\n",
+       "$nkf --guess","\r\r\n",    "ASCII (MIXED NL)\n",
+       "$nkf --guess","\r.\n",     "ASCII (MIXED NL)\n",
+       "$nkf --guess","\r.\r",     "ASCII (CR)\n",
+       "$nkf --guess","\r.\r\n",   "ASCII (MIXED NL)\n",
+       "$nkf --guess","\r\n",      "ASCII (CRLF)\n",
+       "$nkf --guess","\r\n\n",    "ASCII (MIXED NL)\n",
+       "$nkf --guess","\r\n\r",    "ASCII (MIXED NL)\n",
+       "$nkf --guess","\r\n\r\n",  "ASCII (CRLF)\n",
+       "$nkf --guess","\r\n.\n",   "ASCII (MIXED NL)\n",
+       "$nkf --guess","\r\n.\r",   "ASCII (MIXED NL)\n",
+       "$nkf --guess","\r\n.\r\n", "ASCII (CRLF)\n");
+
+printf "%-40s", "Convert NL to LF";
+&command_tests(
+       "$nkf -Lu","none",      "none",
+       "$nkf -Lu","\n",        "\n",
+       "$nkf -Lu","\n\n",      "\n\n",
+       "$nkf -Lu","\n\r",      "\n\n",
+       "$nkf -Lu","\n\r\n",    "\n\n",
+       "$nkf -Lu","\n.\n",     "\n.\n",
+       "$nkf -Lu","\n.\r",     "\n.\n",
+       "$nkf -Lu","\n.\r\n",   "\n.\n",
+       "$nkf -Lu","\r",        "\n",
+       "$nkf -Lu","\r\r",      "\n\n",
+       "$nkf -Lu","\r\r\n",    "\n\n",
+       "$nkf -Lu","\r.\n",     "\n.\n",
+       "$nkf -Lu","\r.\r",     "\n.\n",
+       "$nkf -Lu","\r.\r\n",   "\n.\n",
+       "$nkf -Lu","\r\n",      "\n",
+       "$nkf -Lu","\r\n\n",    "\n\n",
+       "$nkf -Lu","\r\n\r",    "\n\n",
+       "$nkf -Lu","\r\n\r\n",  "\n\n",
+       "$nkf -Lu","\r\n.\n",   "\n.\n",
+       "$nkf -Lu","\r\n.\r",   "\n.\n",
+       "$nkf -Lu","\r\n.\r\n", "\n.\n");
+
+printf "%-40s", "Convert NL to LF";
+&command_tests(
+       "$nkf -Lm","none",      "none",
+       "$nkf -Lm","\n",        "\r",
+       "$nkf -Lm","\n\n",      "\r\r",
+       "$nkf -Lm","\n\r",      "\r\r",
+       "$nkf -Lm","\n\r\n",    "\r\r",
+       "$nkf -Lm","\n.\n",     "\r.\r",
+       "$nkf -Lm","\n.\r",     "\r.\r",
+       "$nkf -Lm","\n.\r\n",   "\r.\r",
+       "$nkf -Lm","\r",        "\r",
+       "$nkf -Lm","\r\r",      "\r\r",
+       "$nkf -Lm","\r\r\n",    "\r\r",
+       "$nkf -Lm","\r.\n",     "\r.\r",
+       "$nkf -Lm","\r.\r",     "\r.\r",
+       "$nkf -Lm","\r.\r\n",   "\r.\r",
+       "$nkf -Lm","\r\n",      "\r",
+       "$nkf -Lm","\r\n\n",    "\r\r",
+       "$nkf -Lm","\r\n\r",    "\r\r",
+       "$nkf -Lm","\r\n\r\n",  "\r\r",
+       "$nkf -Lm","\r\n.\n",   "\r.\r",
+       "$nkf -Lm","\r\n.\r",   "\r.\r",
+       "$nkf -Lm","\r\n.\r\n", "\r.\r");
+
+printf "%-40s", "Convert NL to CRLF";
+&command_tests(
+       "$nkf -Lw","none",      "none",
+       "$nkf -Lw","\n",        "\r\n",
+       "$nkf -Lw","\n\n",      "\r\n\r\n",
+       "$nkf -Lw","\n\r",      "\r\n\r\n",
+       "$nkf -Lw","\n\r\n",    "\r\n\r\n",
+       "$nkf -Lw","\n.\n",     "\r\n.\r\n",
+       "$nkf -Lw","\n.\r",     "\r\n.\r\n",
+       "$nkf -Lw","\n.\r\n",   "\r\n.\r\n",
+       "$nkf -Lw","\r",        "\r\n",
+       "$nkf -Lw","\r\r",      "\r\n\r\n",
+       "$nkf -Lw","\r\r\n",    "\r\n\r\n",
+       "$nkf -Lw","\r.\n",     "\r\n.\r\n",
+       "$nkf -Lw","\r.\r",     "\r\n.\r\n",
+       "$nkf -Lw","\r.\r\n",   "\r\n.\r\n",
+       "$nkf -Lw","\r\n",      "\r\n",
+       "$nkf -Lw","\r\n\n",    "\r\n\r\n",
+       "$nkf -Lw","\r\n\r",    "\r\n\r\n",
+       "$nkf -Lw","\r\n\r\r\n",  "\r\n\r\n\r\n",
+       "$nkf -Lw","\r\n.\n",   "\r\n.\r\n",
+       "$nkf -Lw","\r\n.\r",   "\r\n.\r\n",
+       "$nkf -Lw","\r\n.\r\n", "\r\n.\r\n");
+# end