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

diff --git a/tests/formats/bcd-in.sh b/tests/formats/bcd-in.sh
index aaa0a8d9..934f4302 100755
--- a/tests/formats/bcd-in.sh
+++ b/tests/formats/bcd-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
 }