X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=tests%2Fcommand%2Fdata-list.sh;h=3f821199ff3e2d10f22627e6ce35c93ec7b1f157;hb=b5c82cc9aabe7e641011130240ae1b2e84348e23;hp=d16521a102168e9cfc4516b83042e6812dacf0ee;hpb=cdecc06d6e3298bc8284753cd74ff22ded1f06c5;p=pspp-builds.git diff --git a/tests/command/data-list.sh b/tests/command/data-list.sh index d16521a1..3f821199 100755 --- a/tests/command/data-list.sh +++ b/tests/command/data-list.sh @@ -20,6 +20,10 @@ export STAT_CONFIG_PATH cleanup() { + if [ x"$PSPP_TEST_NO_CLEANUP" != x ] ; then + echo "NOT cleaning $TEMPDIR" + return ; + fi cd / rm -rf $TEMPDIR } @@ -72,7 +76,7 @@ begin data. 6 7, 8 9 -0,1,,, +0,1 ,,, ,,,, 2 @@ -102,6 +106,40 @@ begin data. 3 4 +end data. +list. + +* Test DATA LIST FIXED with multiple records. +data list fixed notable + /1 start 1-20 (adate) + /2 end 1-20 (adate) + /3 count 1-3. +begin data. +07-22-2007 +10-06-2007 +321 +07-14-1789 +08-26-1789 +4 +01-01-1972 +12-31-1999 +682 +end data. +list. + +* Test that DATA LIST FIXED works with an empty trailing record. +data list fixed notable records=2/x 1 y 2. +begin data. +12 + +34 + +56 + +78 + +90 + end data. list. EOF @@ -109,7 +147,7 @@ if [ $? -ne 0 ] ; then no_result ; fi activity="run program" -$SUPERVISOR $PSPP --testing-mode -o raw-ascii --testing-mode $TESTFILE +$SUPERVISOR $PSPP --testing-mode $TESTFILE if [ $? -ne 0 ] ; then fail ; fi activity="compare output" @@ -155,6 +193,18 @@ diff -b $TEMPDIR/pspp.list - << EOF . . 3.00 . . . . 4.00 . . . . + start end count +-------------------- -------------------- ----- + 07/22/2007 10/06/2007 321 + 07/14/1789 08/26/1789 4 + 01/01/1972 12/31/1999 682 +x y +- - +1 2 +3 4 +5 6 +7 8 +9 0 EOF if [ $? -ne 0 ] ; then fail ; fi