3 # This program tests the flip command
5 TEMPDIR=/tmp/pspp-tst-$$
6 TESTFILE=$TEMPDIR/`basename $0`.sps
8 # ensure that top_builddir are absolute
9 if [ -z "$top_builddir" ] ; then top_builddir=. ; fi
10 if [ -z "$top_srcdir" ] ; then top_srcdir=. ; fi
11 top_builddir=`cd $top_builddir; pwd`
13 # ensure that top_srcdir is absolute
14 top_srcdir=`cd $top_srcdir; pwd`
16 STAT_CONFIG_PATH=$top_srcdir/config
17 export STAT_CONFIG_PATH
54 activity="create flip.stat"
55 cat > $TEMPDIR/flip.stat <<EOF
56 data list /N 1 (a) A B C D 2-9.
70 if [ $? -ne 0 ] ; then no_result ; fi
73 activity="run program"
74 $SUPERVISOR $top_builddir/src/pspp -o raw-ascii $TEMPDIR/flip.stat
75 if [ $? -ne 0 ] ; then no_result ; fi
77 activity="compare output"
78 perl -pi -e 's/^\s*$//g' $TEMPDIR/pspp.list
79 diff -b $TEMPDIR/pspp.list - << EOF
80 1.1 DATA LIST. Reading 1 record from INLINE.
81 +--------+------+-------+------+
82 |Variable|Record|Columns|Format|
83 #========#======#=======#======#
89 +--------+------+-------+------+
98 -------- -------- -------- -------- -------- --------
99 A 1.00 6.00 11.00 16.00 21.00
100 B 2.00 7.00 12.00 17.00 22.00
101 C 3.00 8.00 13.00 18.00 23.00
102 D 4.00 9.00 14.00 19.00 24.00
104 -------- -------- -------- -------- --------
105 V 1.00 2.00 3.00 4.00
106 W 6.00 7.00 8.00 9.00
107 X 11.00 12.00 13.00 14.00
108 Y 16.00 17.00 18.00 19.00
109 Z 21.00 22.00 23.00 24.00
111 if [ $? -ne 0 ] ; then fail ; fi