X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=tests%2Fcommand%2Ftabs.sh;h=83b364199a8ca69beb34febda277b5d0760abebb;hb=60429959d82cbe0d27be3c150bb89c4a237cb3e8;hp=5f77f9c2087d146e70130afbb2647111d4f4dd14;hpb=7f3ac8559f71179a95fad28a30882ca476d8ac99;p=pspp diff --git a/tests/command/tabs.sh b/tests/command/tabs.sh index 5f77f9c208..83b364199a 100755 --- a/tests/command/tabs.sh +++ b/tests/command/tabs.sh @@ -5,10 +5,14 @@ TEMPDIR=/tmp/pspp-tst-$$ TESTFILE=$TEMPDIR/`basename $0`.sps -here=`pwd`; +# ensure that top_builddir are absolute +if [ -z "$top_builddir" ] ; then top_builddir=. ; fi +if [ -z "$top_srcdir" ] ; then top_srcdir=. ; fi +top_builddir=`cd $top_builddir; pwd` +PSPP=$top_builddir/src/ui/terminal/pspp$EXEEXT # ensure that top_srcdir is absolute -cd $top_srcdir; top_srcdir=`pwd` +top_srcdir=`cd $top_srcdir; pwd` STAT_CONFIG_PATH=$top_srcdir/config export STAT_CONFIG_PATH @@ -16,6 +20,11 @@ export STAT_CONFIG_PATH cleanup() { + if [ x"$PSPP_TEST_NO_CLEANUP" != x ] ; then + echo "NOT cleaning $TEMPDIR" + return ; + fi + cd / rm -rf $TEMPDIR } @@ -69,17 +78,15 @@ if [ $? -ne 0 ] ; then no_result ; fi activity="run program" -$SUPERVISOR $here/../src/pspp -o raw-ascii $TEMPDIR/tabs.stat +$SUPERVISOR $PSPP -o pspp.csv $TEMPDIR/tabs.stat if [ $? -ne 0 ] ; then no_result ; fi -diff -B -b $TEMPDIR/pspp.list - << EOF -1.1 DATA LIST. Reading 1 record from the command file. -+--------+------+-------+------+ -|Variable|Record|Columns|Format| -#========#======#=======#======# -|X | 1| 1- 80|A80 | -+--------+------+-------+------+ +diff -c $TEMPDIR/pspp.csv - << EOF | perl -e 's/^\s*$//g' +Table: Reading 1 record from INLINE. +Variable,Record,Columns,Format +X,1,1- 80,A80 + 1 12 123 1234 12345 EOF if [ $? -ne 0 ] ; then fail ; fi