X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=tests%2Fexpressions%2Frandist.sh;h=adfdb006425ebf767ea52bdeb33f7acc86209f43;hb=c246143823df29e9ce4c5115c647a47954dea883;hp=b1c9f440317e53b8a4a824f325cb28782bc7f839;hpb=65a4e29574b67921ea899b6a1d45806dca11db00;p=pspp

diff --git a/tests/expressions/randist.sh b/tests/expressions/randist.sh
index b1c9f44031..adfdb00642 100755
--- a/tests/expressions/randist.sh
+++ b/tests/expressions/randist.sh
@@ -67,8 +67,8 @@ if [ $? -ne 0 ] ; then fail ; fi
 for d in beta cauchy chisq exp f gamma laplace logistic lnormal \
 	 normal pareto t uniform weibull; do
     activity="compare output for $d distribution"
-    perl -pi -e 's/^\s*$//g' $top_srcdir/tests/expressions/randist/$d.out $TEMPDIR/$d.out
-    diff -b $top_srcdir/tests/expressions/randist/$d.out $TEMPDIR/$d.out
+    perl $top_srcdir/tests/expressions/randist/compare.pl \
+	$top_srcdir/tests/expressions/randist/$d.out $TEMPDIR/$d.out
     if [ $? -ne 0 ] ; then fail ; fi
 done