| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111 | #! /bin/sh# Copyright (C) 2011-2017 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/>.# TAP support:#  - don't spuriously recognize lines that are "almost" TAP lines as#    real TAP lines. test-init.sh. tap-setup.shecho 1..5 > all.test# The only recognized directives are "TODO" and "SKIP".# So the following should count as passed tests.cat >> all.test <<ENDok 1 # XFAILok 2 # SKIPPEDok 3 # TO DOok 4 # TODOALLok 5 # FIXMEEND# According to documentation of Test::Harness::TAP(3):##    Lines written to standard output matching /^(not )?ok\b/#    must be interpreted as test lines. All other lines must#    not be considered test output.cat >> all.test <<END ok ok 1${tab}ok${tab}ok 1 not ok not ok 1${tab}not ok${tab}not ok 1notoknotok 1not${tab}oknot${tab}ok 1not  oknot  ok 1no okno ok 1# ok# not ok# ok 1# not ok 1#ok#not ok#ok 1#not ok 1ENDset +x # Don't pollute logs too much.for r in 'ok' 'not ok'; do  for s1 in \    a b c d e f g h i j k l m n o p q r s t u v w x y z \    A B C D E F G H I J K L M N O P Q R S T U V W X Y Z \    0 1 2 3 4 5 6 7 8 9 _ ab 0a 23 a1B2c _o _x_y_  do    for s2 in '' @ % + - = / . : \; \* \? \& \! \# \$ \< \> \\; do      printf '%s\n' "$r$s1$s2"    done  donedone >> all.testset -x # Reset shell xtraces.# The prove(1) utility doesn't bail out on these, so our driver# shouldn't either.# See comments in 'tap-bailout-leading-space.sh' for an explanation# of why we don't have a whitespace-prepended "Bail out!" line here.cat >> all.test <<'END'bailoutbailout!bail outbail out!BailoutBailout!Bail out Bail out#Bail out!# Bail out!END# Debugging info and minor sanity check.cat all.test \  && test $(grep -c '^ok1$' all.test) -eq 1 \  && test $(grep -c '^not ok1$' all.test) -eq 1 \  || framework_failure_ "creating all.test"run_make -O checkcount_test_results total=5 pass=5 fail=0 xpass=0 xfail=0 skip=0 error=0:
 |