X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=tests%2Fcommand%2Frank.sh;h=8114c438f9aef125df005effd67797d95fac3946;hb=a7b5ed72c52e462c75a2fed485ed65aaf09a1d39;hp=5782465296da2eca539d369b500cd0453f22d458;hpb=73ef58a437ef6640a7813b4f898b1a57e0ec95ea;p=pspp diff --git a/tests/command/rank.sh b/tests/command/rank.sh index 5782465296..8114c438f9 100755 --- a/tests/command/rank.sh +++ b/tests/command/rank.sh @@ -11,7 +11,7 @@ if [ -z "$top_builddir" ] ; then top_builddir=. ; fi top_srcdir=`cd $top_srcdir; pwd` top_builddir=`cd $top_builddir; pwd` -PSPP=$top_builddir/src/ui/terminal/pspp +PSPP=$top_builddir/src/ui/terminal/pspp$EXEEXT STAT_CONFIG_PATH=$top_srcdir/config export STAT_CONFIG_PATH @@ -26,6 +26,7 @@ cleanup() echo "NOT cleaning $TEMPDIR" return ; fi + cd / rm -rf $TEMPDIR } @@ -81,7 +82,7 @@ if [ $? -ne 0 ] ; then no_result ; fi # Check that it properly handles failed transformations. activity="run program 1" -$SUPERVISOR $PSPP --testing-mode -o raw-ascii -e $TEMPDIR/err $TESTFILE +$SUPERVISOR $PSPP --testing-mode -o pspp.csv -e $TEMPDIR/err $TESTFILE if [ $? -ne 1 ] ; then fail ; fi activity="diff 1" @@ -130,12 +131,12 @@ if [ $? -ne 0 ] ; then no_result ; fi activity="run program (syntax errors)" -$SUPERVISOR $PSPP --testing-mode -o raw-ascii -e $TEMPDIR/errs $TESTFILE +$SUPERVISOR $PSPP -o pspp.csv -e $TEMPDIR/errs $TESTFILE if [ $? -ne 1 ] ; then fail ; fi activity="compare errors" perl -pi -e 's/^\s*$//g' $TEMPDIR/errs -diff -b $TEMPDIR/errs - << EOF +diff -b $TEMPDIR/errs - << EOF $TEMPDIR/rank.sh.sps:15: error: RANK: Syntax error expecting \`(' at end of command. $TEMPDIR/rank.sh.sps:19: error: RANK: Syntax error expecting integer at \`d'. $TEMPDIR/rank.sh.sps:25: error: RANK: Variable x already exists. @@ -245,6 +246,11 @@ LIST. NEW FILE. DATA LIST LIST NOTABLE /a * g1 g2 *. BEGIN DATA. +2 1 2 +2 1 2 +3 1 2 +4 1 2 +5 1 2 1 0 2 2 0 2 3 0 2 @@ -253,11 +259,6 @@ BEGIN DATA. 6 0 2 7 0 2 8 0 2 -2 1 2 -2 1 2 -3 1 2 -4 1 2 -5 1 2 6 1 2 7 1 2 7 1 2 @@ -274,6 +275,19 @@ RANK a (D) BY g2 g1 /NORMAL . +SPLIT FILE BY g1. + +RANK a (D) BY g2 + /PRINT=YES + /TIES=LOW + /MISSING=INCLUDE + /FRACTION=RANKIT + /RANK + /NORMAL + . + +SPLIT FILE OFF. + LIST. @@ -345,160 +359,247 @@ if [ $? -ne 0 ] ; then no_result ; fi activity="run program 3" -$SUPERVISOR $PSPP --testing-mode -o raw-ascii $TESTFILE +$SUPERVISOR $PSPP -o pspp.csv $TESTFILE if [ $? -ne 0 ] ; then no_result ; fi activity="compare output 3" -perl -pi -e 's/^\s*$//g' $TEMPDIR/pspp.list -diff -b $TEMPDIR/pspp.list - <