Fix double-free bug.

[pspp] / tests / command / list.sh

diff --git a/tests/command/list.sh b/tests/command/list.sh
index 3bc92aa67335ea22e186b46a86d989a3602a3185..c1e67dd4c96376978b30eaa51b34580ee69cf189 100755 (executable)
--- a/tests/command/list.sh
+++ b/tests/command/list.sh
@@ -48,7 +48,7 @@ cd $TEMPDIR
 
 
 activity="create program"
-cat > $TEMPDIR/list.stat << foobar
+cat > $TESTFILE << EOF
 *** Single lines.
 data list file='$top_srcdir/tests/weighting.data'/AVAR 1-5 BVAR 6-10.
 weight by BVAR.
@@ -62,11 +62,11 @@ data list file='$top_srcdir/tests/list.data' notable /X000 to X126 1-127.
 list x000 to x030.
 list /cases=from 1 to 25.
 
-foobar
+EOF
 if [ $? -ne 0 ] ; then no_result ; fi
 
 activity="run program"
-$SUPERVISOR $here/../src/pspp --testing-mode -o raw-ascii $TEMPDIR/list.stat
+$SUPERVISOR $here/../src/pspp --testing-mode -o raw-ascii $TESTFILE
 if [ $? -ne 0 ] ; then no_result ; fi