build: Inline perl prototypes in sources
[automake.git] / t / tap-planskip-bailout.sh
blob93392e61f3d82e5911ae4beacb2e341e70ca2e6c
1 #! /bin/sh
2 # Copyright (C) 2011-2017 Free Software Foundation, Inc.
4 # This program is free software; you can redistribute it and/or modify
5 # it under the terms of the GNU General Public License as published by
6 # the Free Software Foundation; either version 2, or (at your option)
7 # any later version.
9 # This program is distributed in the hope that it will be useful,
10 # but WITHOUT ANY WARRANTY; without even the implied warranty of
11 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 # GNU General Public License for more details.
14 # You should have received a copy of the GNU General Public License
15 # along with this program. If not, see <http://www.gnu.org/licenses/>.
17 # TAP support:
18 # - a "Bail out!" directive causes an hard error, even if coming after
19 # a "SKIP plan" (e.g., "1..0 # SKIP").
21 . test-init.sh
23 . tap-setup.sh
25 cat > all.test <<END
26 1..0 # SKIP
27 Bail out!
28 END
30 run_make -O -e FAIL check
31 count_test_results total=2 pass=0 fail=0 xpass=0 xfail=0 skip=1 error=1
32 grep '^ERROR: all\.test - Bail out!' stdout