kc3-lang/automake/tests/self-check-unindent.test

• Show log

  Commit

• Hash : 082028c1
  Author :
  Date : 2011-02-21T14:57:24
  

  tests: add testcases sanity-checking the testsuite
  
  Helper subroutines, variables and other pieces of code defined
  in the `tests/defs' and used by many testcases are non-obvious,
  and tricky to get to work portably; but until now, they weren't
  tested at all in a clear and self-contained way.
  This change should remedy to the situation.
  
  * tests/self-check-cleanup.test: New test, check removal of
  temporary test working directory by `./defs'.
  * tests/self-check-dir.test: New test, check that tests using
  `./defs' create a proper temporary directory, and run in it.
  * tests/self-check-exit.test: New test, check that, in case of
  failing commands, the correct exit status is passed to the exit
  trap installed by the `./defs' script.
  * tests/self-check-is_newest.test: New test, checking the
  `is_newest' subroutine.
  * tests/self-check-me.test: New test, checking that $me gets
  defined automatically by `tests/defs' if not set, and that it
  can be overridden from either the shell or the environment.
  * tests/self-check-sanity.test: New test, check that the sanity
  checks performed by the `tests/defs' script works correctly.
  * tests/self-check-unindent.test: New test, checking the
  `unindent' subroutine.
  * tests/Makefile.am (TESTS): Update.
  

Download

• tests/self-check-unindent.test

• #! /bin/sh
  # Copyright (C) 2011 Free Software Foundation, Inc.
  #
  # This program is free software; you can redistribute it and/or modify
  # it under the terms of the GNU General Public License as published by
  # the Free Software Foundation; either version 2, or (at your option)
  # any later version.
  #
  # This program is distributed in the hope that it will be useful,
  # but WITHOUT ANY WARRANTY; without even the implied warranty of
  # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  # GNU General Public License for more details.
  #
  # You should have received a copy of the GNU General Public License
  # along with this program.  If not, see <http://www.gnu.org/licenses/>.
  
  # Sanity check for the automake testsuite.
  # Check the `unindent' subroutine.
  
  . ./defs || Exit 1
  
  #------------------------------------------------------------------
  
  : Leading spaces
  
  cat > input <<END
    1
     2
  3
   4
  ${tab}5
  ${tab}  6
    6${sp}
  7${sp}
    8${sp}${sp}
  9${sp}${sp}
    10${tab}
  11${tab}
    12${sp}${tab}
  13${sp}${tab}
    14 this${tab}with${tab}multiple fields${sp}
  15 and   ${tab}${tab}this too${tab}
   16 and also this
  ${sp}${sp}
  ${sp}
  ${tab}
  
  last line
  END
  
  cat > exp <<END
  1
   2
  3
   4
  ${tab}5
  ${tab}  6
  6${sp}
  7${sp}
  8${sp}${sp}
  9${sp}${sp}
  10${tab}
  11${tab}
  12${sp}${tab}
  13${sp}${tab}
  14 this${tab}with${tab}multiple fields${sp}
  15 and   ${tab}${tab}this too${tab}
   16 and also this
  
  ${sp}
  ${tab}
  
  last line
  END
  
  unindent input > got
  
  diff exp got
  
  #------------------------------------------------------------------
  
  : Leading tab
  
  cat > input <<END
  ${tab}1
  ${tab} 2
  3
   4
    5
      6
          7
   ${tab}8
  ${tab}${tab}9
  ${tab}10${tab}
  ${tab}11${sp}
  12${tab}
  13${sp}
  ${tab}14 this  with${tab}multiple fields${sp}
  15 and   ${tab}${tab}this too${tab}
   16 and also this
  ${tab}
  ${sp}
  ${sp}${tab}
  
  last line
  END
  
  cat > exp <<END
  1
   2
  3
   4
    5
      6
          7
   ${tab}8
  ${tab}9
  10${tab}
  11${sp}
  12${tab}
  13${sp}
  14 this  with${tab}multiple fields${sp}
  15 and   ${tab}${tab}this too${tab}
   16 and also this
  
  ${sp}
  ${sp}${tab}
  
  last line
  END
  
  unindent input > got
  
  diff exp got
  
  #------------------------------------------------------------------
  
  : No leading whitespace
  
  cat > input <<END
  1
   2
    3
          4
  ${tab}5
  ${tab} 6
   ${tab}7
  ${tab}${tab}8
  9${sp}
   10${tab}
  ${tab}10${sp}${sp}
  14 this with${tab}multiple  fields${sp}
   15 and this too${tab}
  ${tab}16 and also this
  ${tab}
  ${sp}
  
  last line
  END
  
  cp input exp
  
  unindent input > got
  
  diff exp got
  
  #------------------------------------------------------------------
  
  : Leading empty lines are ignored [1]
  
  cat > input <<END
  
  
   foo
   bar
     quux
  END
  
  cat > exp <<END
  
  
  foo
  bar
    quux
  END
  
  unindent input > got
  
  diff exp got
  
  #------------------------------------------------------------------
  
  : Leading empty lines are ignored [2]
  
  cat > input <<END
  
  
  foo
  bar
     quux
  END
  
  cat > exp <<END
  
  
  foo
  bar
     quux
  END
  
  unindent input > got
  
  diff exp got
  
  #------------------------------------------------------------------
  
  :
  

Download