X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=tests%2Fformats%2Fib-in.sh;h=50c8c93bea438fc16f18a5b628b4832dfae0e170;hb=refs%2Fbuilds%2F20100301040511%2Fpspp;hp=e52bf7d17dedef178ae2edcb95d1602d6faec119;hpb=0fa141762183890ebd139ccd9264f08db9011539;p=pspp

diff --git a/tests/formats/ib-in.sh b/tests/formats/ib-in.sh
index e52bf7d17d..50c8c93bea 100755
--- a/tests/formats/ib-in.sh
+++ b/tests/formats/ib-in.sh
@@ -7,6 +7,7 @@ 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
+: ${PERL:=perl}
 
 # ensure that top_srcdir is absolute
 top_srcdir=`cd $top_srcdir; pwd`
@@ -17,6 +18,10 @@ export STAT_CONFIG_PATH
 
 cleanup()
 {
+     if [ x"$PSPP_TEST_NO_CLEANUP" != x ] ; then 
+	echo "NOT cleaning $TEMPDIR" 
+	return ; 
+     fi
      cd /
      rm -rf $TEMPDIR
 }
@@ -67,7 +72,7 @@ EOF
 if [ $? -ne 0 ] ; then no_result ; fi
 
 activity="run program"
-$SUPERVISOR $PSPP --testing-mode ib-in.pspp
+$SUPERVISOR $PSPP -o pspp.csv ib-in.pspp
 if [ $? -ne 0 ] ; then no_result ; fi
 
 activity="gunzip expected results"