3 # This program tests that SYSFILE INFO works.
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
22 if [ x"$PSPP_TEST_NO_CLEANUP" != x ] ; then
23 echo "NOT cleaning $TEMPDIR"
58 activity="Create test file"
59 cat > $TESTFILE << EOF
60 DATA LIST LIST /x * name (a10) .
66 SAVE OUTFILE='pro.sav'.
68 sysfile info file='pro.sav'.
70 if [ $? -ne 0 ] ; then no_result ; fi
73 activity="run program"
74 $SUPERVISOR $top_builddir/src/pspp --testing-mode -o raw-ascii $TESTFILE
75 if [ $? -ne 0 ] ; then no_result ; fi
77 activity="filter output"
78 egrep -v '^(Created|Endian): ' $TEMPDIR/pspp.list > $TEMPDIR/out-filtered
79 if [ $? -ne 0 ] ; then no_result ; fi
81 activity="compare output"
82 perl -pi -e 's/^\s*$//g' $TEMPDIR/out-filtered
83 diff -b -w $TEMPDIR/out-filtered - << EOF
84 1.1 DATA LIST. Reading free-form data from INLINE.
98 Mode: Compression off.
99 +--------+-------------+---+
100 |Variable|Description |Pos|
103 #========#=============#===#
104 |x |Format: F8.2 | 1|
105 +--------+-------------+---+
106 |name |Format: A10 | 2|
107 +--------+-------------+---+
109 if [ $? -ne 0 ] ; then fail ; fi