# This program tests the LOOP command
TEMPDIR=/tmp/pspp-tst-$$
+TESTFILE=$TEMPDIR/`basename $0`.sps
here=`pwd`;
activity="create prog"
cat > $TEMPDIR/loop.stat <<EOF
-data list /x 1 y 2 z 3.
+data list /X 1 Y 2 ZOOLOGICAL 3.
begin data.
125
256
397
401
end data.
-loop i=y to z by abs(z-y)/(z-y).
-print /x i.
+loop iterative_Variable=y to zoological by abs(zoological-y)/(zoological-y).
+print /x iterative_Variable.
break. /* Generates warning.
end loop.
execute.
if [ $? -ne 0 ] ; then no_result ; fi
activity="run program"
-$here/../src/pspp --testing-mode -o raw-ascii $TEMPDIR/loop.stat > $TEMPDIR/stdout
+$SUPERVISOR $here/../src/pspp --testing-mode -o raw-ascii $TEMPDIR/loop.stat > $TEMPDIR/stdout
if [ $? -ne 0 ] ; then no_result ; fi
activity="compare stdout"
activity="compare results"
diff -B -b $TEMPDIR/pspp.list - <<EOF
1.1 DATA LIST. Reading 1 record from the command file.
-+--------+------+-------+------+
-|Variable|Record|Columns|Format|
-#========#======#=======#======#
-|X | 1| 1- 1|F1.0 |
-|Y | 1| 2- 2|F1.0 |
-|Z | 1| 3- 3|F1.0 |
-+--------+------+-------+------+
++----------+------+-------+------+
+| Variable |Record|Columns|Format|
+#==========#======#=======#======#
+|X | 1| 1- 1|F1.0 |
+|Y | 1| 2- 2|F1.0 |
+|ZOOLOGICAL| 1| 3- 3|F1.0 |
++----------+------+-------+------+
1 2.00
2 5.00
3 9.00