3 # This program tests for a bug which caused MATCH FILES to crash
4 # when used with scratch variables.
7 TEMPDIR=/tmp/pspp-tst-$$
8 TESTFILE=$TEMPDIR/`basename $0`.pspp
10 # ensure that top_builddir are absolute
11 if [ -z "$top_builddir" ] ; then top_builddir=. ; fi
12 if [ -z "$top_srcdir" ] ; then top_srcdir=. ; fi
13 top_builddir=`cd $top_builddir; pwd`
14 PSPP=$top_builddir/src/ui/terminal/pspp
16 # ensure that top_srcdir is absolute
17 top_srcdir=`cd $top_srcdir; pwd`
19 STAT_CONFIG_PATH=$top_srcdir/config
20 export STAT_CONFIG_PATH
57 activity="create program"
59 DATA LIST LIST /w * x * y * .
70 MATCH FILES FILE=* /DROP=w.
75 if [ $? -ne 0 ] ; then no_result ; fi
77 $SUPERVISOR $PSPP -o raw-ascii $TESTFILE
78 if [ $? -ne 0 ] ; then no_result ; fi
81 perl -pi -e 's/^\s*$//g' $TEMPDIR/pspp.list
82 diff -b -w $TEMPDIR/pspp.list - << EOF
83 1.1 DATA LIST. Reading free-form data from INLINE.
92 -------- -------- --------
96 if [ $? -ne 0 ] ; then fail ; fi