1 dnl PSPP - a program for statistical analysis.
2 dnl Copyright (C) 2017 Free Software Foundation, Inc.
4 dnl This program is free software: you can redistribute it and/or modify
5 dnl it under the terms of the GNU General Public License as published by
6 dnl the Free Software Foundation, either version 3 of the License, or
7 dnl (at your option) any later version.
9 dnl This program is distributed in the hope that it will be useful,
10 dnl but WITHOUT ANY WARRANTY; without even the implied warranty of
11 dnl MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 dnl GNU General Public License for more details.
14 dnl You should have received a copy of the GNU General Public License
15 dnl along with this program. If not, see <http://www.gnu.org/licenses/>.
26 if test "$a" = "1"; then
28 elif test "$a" = " "; then
30 elif test "$b" = "1"; then
32 elif test "$b" = " "; then
34 elif test "$c" = "1"; then
36 elif test "$c" = " "; then
38 elif test "$d" = "1"; then
40 elif test "$d" = " "; then
48 done) >expout 3>do-if.txt || exit 99
49 AT_DATA([do-if.sps], [dnl
50 DATA LIST FILE="do-if.txt"/A B C D 1-4 ABCD 1-4 (A).
52 PRINT OUTFILE="do-if.out"/ABCD 'A'.
54 PRINT OUTFILE="do-if.out"/ABCD 'B'.
56 PRINT OUTFILE="do-if.out"/ABCD 'C'.
58 PRINT OUTFILE="do-if.out"/ABCD 'D'.
60 PRINT OUTFILE="do-if.out"/ABCD 'E'.
64 AT_CHECK([pspp do-if.sps], [0], [ignore])
65 AT_CHECK([cat do-if.out], [0], [expout])
68 AT_SETUP([unpaired END IF crash])
69 AT_DATA([do-if.sps], [dnl
70 DATA LIST LIST NOTABLE/a b c.
73 AT_CHECK([pspp -O format=csv do-if.sps], [1], [dnl
74 do-if.sps:2: error: END IF: This command cannot appear outside DO IF...END IF.
80 AT_SETUP([ELSE without DO IF])
81 AT_DATA([do-if.sps], [dnl
82 DATA lIST NOTABLE LIST /QUA BRA *.
92 AT_CHECK([pspp -O format=csv do-if.sps], [1], [dnl
93 do-if.sps:7: error: ELSE: This command cannot appear outside DO IF...END IF.
95 do-if.sps:9: error: Stopping syntax file processing here to avoid a cascade of dependent command failures.