testsuite/unexpand.tests

   1 #!/bin/sh
   2 # Copyright 2008 by Denys Vlasenko
   3 # Licensed under GPL v2, see file LICENSE for details.
   4
   5 . ./testing.sh
   6
   7 # testing "test name" "options" "expected result" "file input" "stdin"
   8
   9 testing "unexpand case 1" "unexpand" \
  10         "\t12345678\n" "" "        12345678\n" \
  11
  12 testing "unexpand case 2" "unexpand" \
  13         "\t 12345678\n" "" "         12345678\n" \
  14
  15 testing "unexpand case 3" "unexpand" \
  16         "\t  12345678\n" "" "          12345678\n" \
  17
  18 testing "unexpand case 4" "unexpand" \
  19         "\t12345678\n" "" "       \t12345678\n" \
  20
  21 testing "unexpand case 5" "unexpand" \
  22         "\t12345678\n" "" "      \t12345678\n" \
  23
  24 testing "unexpand case 6" "unexpand" \
  25         "\t12345678\n" "" "     \t12345678\n" \
  26
  27 testing "unexpand case 7" "unexpand" \
  28         "123\t 45678\n" "" "123 \t 45678\n" \
  29
  30 testing "unexpand case 8" "unexpand" \
  31         "a b\n" "" "a b\n" \
  32
  33 optional UNICODE_SUPPORT
  34 testing "unexpand with unicode characher 0x394" "unexpand" \
  35         "1ΔΔΔ5\t99999\n" "" "1ΔΔΔ5   99999\n"
  36 SKIP=
  37
  38 exit $FAILCOUNT