X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=tests%2Fformats%2Ffloat-format.sh;h=2a6b608740e1e248895056a043513f0bcdf3614d;hb=77ce797fbee4ea815123f46f2dbdad589fd608a2;hp=4ce1f39156b2220beb17891a9a209789c2e91723;hpb=f89de8c330e8f82f0e7195c4d35588cfcbdd02fc;p=pspp-builds.git

diff --git a/tests/formats/float-format.sh b/tests/formats/float-format.sh
index 4ce1f391..2a6b6087 100755
--- a/tests/formats/float-format.sh
+++ b/tests/formats/float-format.sh
@@ -19,6 +19,10 @@ export STAT_CONFIG_PATH
 
 cleanup()
 {
+     if [ x"$PSPP_TEST_NO_CLEANUP" != x ] ; then 
+	echo "NOT cleaning $TEMPDIR" 
+	return ; 
+     fi
      cd /
      rm -rf $TEMPDIR
 }
@@ -51,12 +55,10 @@ mkdir -p $TEMPDIR
 
 cd $TEMPDIR
 activity="create test program"
-sed -n \
-    -e 's/#.*//' \
+sed -e 's/#.*//' \
     -e 's/^[ 	]*//' \
     -e 's/[ 	]*$//' \
-    -e '/^$/d' \
-    -e 's/^\(.*\)$/DEBUG FLOAT FORMAT \1./p' \
+    -e 's/^\(..*\)$/DEBUG FLOAT FORMAT \1./' \
     > $TEMPDIR/float-format.pspp <<'EOF'
 # Each of the tests below checks that conversion between
 # floating-point formats works correctly.  Comparisons that use ==
@@ -78,7 +80,6 @@ sed -n \
 
 # IEEE special values.
  0 == isb(x'00000000')
--0 == isb(x'80000000')
 x('Infinity') == isb(x'7f800000')
 x('-Infinity') == isb(x'ff800000')
 x('NaN:') => isb(x'7f800001')		# NaN requires nonzero fraction.
@@ -122,7 +123,7 @@ x('.446c3b15f9926688p168') => idb(x'4a511b0ec57e649a')
 	      0.5 == zs(x'40800000') == isb(x'3f000000')
        x('.4p-4') == zs(x'3f400000') == isb(x'3c800000')
 		0 == zs(x'00000000') == isb(x'00000000')
-	       -0 == zs(x'80000000') == isb(x'80000000')
+	             zs(x'80000000') == isb(x'80000000')
 	      -15 == zs(x'c1f00000') == isb(x'c1700000')
 # x('.ffffffp252') == zs(x'7fffffff')
       x('.3b4p8') == zs(x'423b4000')
@@ -148,7 +149,7 @@ EOF
 if [ $? -ne 0 ] ; then no_result ; fi
 
 activity="run program"
-$SUPERVISOR $PSPP --testing-mode -o raw-ascii $TEMPDIR/float-format.pspp
+$SUPERVISOR $PSPP --testing-mode $TEMPDIR/float-format.pspp
 if [ $? -ne 0 ] ; then fail ; fi
 
 pass