X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=tests%2Fformats%2Fbcd-in.sh;h=b21b2090489bd0d6dd62e5ff1b6aa3f79e8f27e1;hb=a9c5233f04317a5ace5e6dcbe3cc61a9f07d57c0;hp=aaa0a8d9ef5827b346ebff193ea3f2d0a5f9cc05;hpb=0fa141762183890ebd139ccd9264f08db9011539;p=pspp

diff --git a/tests/formats/bcd-in.sh b/tests/formats/bcd-in.sh
index aaa0a8d9ef..b21b209048 100755
--- a/tests/formats/bcd-in.sh
+++ b/tests/formats/bcd-in.sh
@@ -6,7 +6,8 @@ TEMPDIR=/tmp/pspp-tst-$$
 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
+PSPP=$top_builddir/src/ui/terminal/pspp$EXEEXT
+: ${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
 }
@@ -66,7 +71,7 @@ EOF
 if [ $? -ne 0 ] ; then no_result ; fi
 
 activity="run program"
-$SUPERVISOR $PSPP --testing-mode bcd-in.pspp
+$SUPERVISOR $PSPP -o pspp.csv bcd-in.pspp
 if [ $? -ne 0 ] ; then no_result ; fi
 
 activity="gunzip expected results"