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`
12 PSPP=$top_builddir/src/ui/terminal/pspp
14 # ensure that top_srcdir is absolute
15 top_srcdir=`cd $top_srcdir; pwd`
17 STAT_CONFIG_PATH=$top_srcdir/config
18 export STAT_CONFIG_PATH
55 activity="create flip.stat"
56 cat > $TEMPDIR/flip.stat <<EOF
57 data list /N 1 (a) A B C D 2-9.
71 if [ $? -ne 0 ] ; then no_result ; fi
74 activity="run program"
75 $SUPERVISOR $PSPP -o raw-ascii $TEMPDIR/flip.stat
76 if [ $? -ne 0 ] ; then no_result ; fi
78 activity="compare output"
79 perl -pi -e 's/^\s*$//g' $TEMPDIR/pspp.list
80 diff -b $TEMPDIR/pspp.list - << EOF
81 1.1 DATA LIST. Reading 1 record from INLINE.
82 +--------+------+-------+------+
83 |Variable|Record|Columns|Format|
84 #========#======#=======#======#
90 +--------+------+-------+------+
99 -------- -------- -------- -------- -------- --------
100 A 1.00 6.00 11.00 16.00 21.00
101 B 2.00 7.00 12.00 17.00 22.00
102 C 3.00 8.00 13.00 18.00 23.00
103 D 4.00 9.00 14.00 19.00 24.00
105 -------- -------- -------- -------- --------
106 V 1.00 2.00 3.00 4.00
107 W 6.00 7.00 8.00 9.00
108 X 11.00 12.00 13.00 14.00
109 Y 16.00 17.00 18.00 19.00
110 Z 21.00 22.00 23.00 24.00
112 if [ $? -ne 0 ] ; then fail ; fi