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

• Show log

  Commit

• Hash : 8322f7e2
  Author :
  Date : 2011-03-01T10:38:53
  

  tests: extend checks on then 'unindent' shell function
  
  * tests/self-check-unindent.test: Also check that multiple
  instances of 'unindent'	can run in parallel (this was not
  the case when that function used temporary files).
  

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
  
  unindent input | unindent > 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
  
  unindent input | unindent > 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
  
  unindent input | unindent > 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
  
  unindent input | unindent > 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
  
  unindent input | unindent > got
  diff exp got
  
  #------------------------------------------------------------------
  
  : More elaborated parallel use
  
  cat > input <<END
    x
    ${tab}y
    z
    ${tab}a
    ${tab} b
  ${tab}c
     ${tab}d
   ${tab}e
    ${tab}${tab}f
  END
  
  cat > exp <<END
  y
  z
  a
   b
  c
   ${tab}d
   ${tab}e
  ${tab}f
  END
  
  unindent input | sed 1d | unindent > got
  diff exp got
  
  :
  

Download