projects
/
pspp
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Fix double-free bug.
[pspp]
/
tests
/
bugs
/
random.sh
diff --git
a/tests/bugs/random.sh
b/tests/bugs/random.sh
index 0f4acd777c834aa0b1066a37ab09aaffa5f722b8..1d8b05e729a48a179c7a9c5930d69b03c3e13f1c 100755
(executable)
--- a/
tests/bugs/random.sh
+++ b/
tests/bugs/random.sh
@@
-4,6
+4,7
@@
TEMPDIR=/tmp/pspp-tst-$$
TEMPDIR=/tmp/pspp-tst-$$
+TESTFILE=$TEMPDIR/`basename $0`.sps
here=`pwd`;
here=`pwd`;
@@
-47,11
+48,11
@@
mkdir -p $TEMPDIR
cd $TEMPDIR
activity="create program"
cd $TEMPDIR
activity="create program"
-cat > $TE
MPDIR/rnd.sps
<<EOF
+cat > $TE
STFILE
<<EOF
set seed=10.
input program.
+ loop #i = 1 to 20.
set seed=10.
input program.
+ loop #i = 1 to 20.
-+ do repeat response=
r
1.
++ do repeat response=
R
1.
+ compute response = uniform(10).
+ end repeat.
+ end case.
+ compute response = uniform(10).
+ end repeat.
+ end case.
@@
-64,7
+65,7
@@
EOF
if [ $? -ne 0 ] ; then no_result ; fi
activity="run program"
if [ $? -ne 0 ] ; then no_result ; fi
activity="run program"
-$SUPERVISOR $here/../src/pspp -o raw-ascii $TE
MPDIR/rnd.sps
+$SUPERVISOR $here/../src/pspp -o raw-ascii $TE
STFILE
if [ $? -ne 0 ] ; then no_result ; fi
if [ $? -ne 0 ] ; then no_result ; fi