kc3-lang/automake/t/self-check-seq.tap

• Show log

  Commit

• Hash : 84e12c32
  Author :
  Date : 2013-05-17T13:45:44
  

  tests: sanitize 'unset' usages
  
  In some shells (e.g., Solaris 10 /bin/ksh, or NetBSD 5.1 /bin/sh),
  "unset VAR" returns a non-zero exit status in case the VAR variable
  is already unset.  This doesn't interact well with our usage of
  "set -e" in the testsuite.  So far, we've avoided spurious failures
  by either explicitly ignoring the exit status from unset:
  
      unset VAR || :
  
  or explicitly ensuring that a variable is set, before trying to
  unset it:
  
      VAR=; unset VAR
  
  But we can do better, by aliasing the 'unset' command to a custom
  function that will take care of these details for us.  This will
  avoid us annoying spurious failures in the future, failures that
  have already bitten us too much times.  For an example, refer to
  commit 'v1.12.2-88-g5b1dae5' of 2012-08-05 (tests: avoid tons of
  spurious failures on NetBSD).
  
  * t/ax/test-lib.sh (_am_unset): New function.
  (unset): New alias to it.
  (_am_exit): Adjust comments.
  * t/ax/am-test-lib.sh: No need to temporary disable the 'errexit'
  shell flag when unsetting variables that are potentially already
  unset.
  (am_process_requirements): Adjust to remove a now-useless
  workaround related to unset.
  * t/aclocal-macrodir.tap: Likewise.
  * t/aclocal-macrodirs.tap: Likewise.
  * t/auxdir-autodetect.sh: Likewise.
  * t/ax/am-test-lib.sh: Likewise.
  * t/ax/test-lib.sh: Likewise.
  * t/check-tests-in-builddir.sh: Likewise.
  * t/dist-formats.tap: Likewise.
  * t/distcheck-configure-flags-am.sh: Likewise.
  * t/distcheck-configure-flags.sh: Likewise.
  * t/java-empty-classpath.sh: Likewise.
  * t/javaflags.sh: Likewise.
  * t/lflags.sh: Likewise.
  * t/lflags2.sh: Likewise.
  * t/lisp-flags.sh: Likewise.
  * t/lisp6.sh: Likewise.
  * t/missing-auxfile-stops-makefiles-creation.sh: Likewise.
  * t/parallel-am.sh: Likewise.
  * t/parallel-am2.sh: Likewise.
  * t/parallel-am3.sh: Likewise.
  * t/parallel-tests-log-override-recheck.sh: Likewise.
  * t/pkg-config-macros.sh: Likewise.
  * t/python-missing.sh: Likewise.
  * t/python-too-old.sh: Likewise.
  * t/python11.sh: Likewise.
  * t/self-check-dir.tap: Likewise.
  * t/self-check-report.sh: Likewise.
  * t/self-check-seq.tap: Likewise.
  * t/silent-configsite.sh: Likewise.
  * t/suffix6c.sh: Likewise.
  * t/tar-override.sh: Likewise.
  * t/tests-environment-and-log-compiler.sh: Likewise.
  * t/vala-configure.sh: Likewise.
  * t/werror3.sh: Likewise.
  * t/yflags-cmdline-override.sh: Likewise.
  * t/yflags.sh: Likewise.
  * t/yflags2.sh: Likewise.
  
  Signed-off-by: Stefano Lattarini <stefano.lattarini@gmail.com>
  

Download

• t/self-check-seq.tap

• #! /bin/sh
  # Copyright (C) 2011-2013 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 'seq_' subroutine.
  
  . test-init.sh
  
  plan_ 14
  
  unset stderr_fileno_
  
  check_work ()
  {
    desc=$1 args=$2 exp=$3
    st=0; got=$(seq_ $args) || st=$?
    command_ok_ "$desc [exit status = 0]" test $st -eq 0
    command_ok_ "$desc [output]" test x"$exp" = x"$got"
  }
  
  check_work 'one-argument form' '5' "\
  1
  2
  3
  4
  5"
  
  check_work 'two-arguments form' '7 11' "\
  7
  8
  9
  10
  11"
  
  check_work 'three-arguments form (1)' '120 5 135' "\
  120
  125
  130
  135"
  
  check_work 'three-arguments form (1)' '13 4 23' "\
  13
  17
  21"
  
  check_err ()
  {
    desc=$1 args=$2 err=$3
    (seq_ $args) >output || st=$?
    # Protect content emitted on stdout/stderr, to avoid sending to the
    # TAP driver possible "Bail out!" directives generated by 'seq_'.
    # Use 'grep -c' below for the same reason.
    sed 's/^/: /' output
    command_ok_ "$desc [exit status = 99]" test $st -eq 99
    command_ok_ "$desc [error message]" grep -c "seq_: $err" output
  }
  
  check_err 'no argument is an error' '' 'missing argument'
  check_err 'four arguments is an error' '1 1 2 1' 'too many arguments'
  check_err 'six arguments is an error' '1 1 1 1 1 1' 'too many arguments'
  
  :
  

Download