projects
/
pspp
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Use gsl_finite from GSL, which is portable, instead of isfinite, which
[pspp]
/
tests
/
bugs
/
random.sh
diff --git
a/tests/bugs/random.sh
b/tests/bugs/random.sh
index 1e0e55e296253fa3942f6377d2c00b77ef9604c2..c7f3e8bee7fee13574a9c1ac98e7fd2de1325863 100755
(executable)
--- a/
tests/bugs/random.sh
+++ b/
tests/bugs/random.sh
@@
-4,17
+4,24
@@
TEMPDIR=/tmp/pspp-tst-$$
TEMPDIR=/tmp/pspp-tst-$$
+TESTFILE=$TEMPDIR/`basename $0`.sps
-here=`pwd`;
+# ensure that top_builddir are absolute
+if [ -z "$top_builddir" ] ; then top_builddir=. ; fi
+if [ -z "$top_srcdir" ] ; then top_srcdir=. ; fi
+top_builddir=`cd $top_builddir; pwd`
+PSPP=$top_builddir/src/ui/terminal/pspp
# ensure that top_srcdir is absolute
# ensure that top_srcdir is absolute
-
cd $top_srcdir; top_srcdir=`
pwd`
+
top_srcdir=`cd $top_srcdir;
pwd`
-export STAT_CONFIG_PATH=$top_srcdir/config
+STAT_CONFIG_PATH=$top_srcdir/config
+export STAT_CONFIG_PATH
cleanup()
{
cleanup()
{
+ cd /
rm -rf $TEMPDIR
}
rm -rf $TEMPDIR
}
@@
-47,51
+54,52
@@
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.
+ end loop.
+ end file.
+ compute response = uniform(10).
+ end repeat.
+ end case.
+ end loop.
+ end file.
-end input program.
+end input program.
list.
EOF
if [ $? -ne 0 ] ; then no_result ; fi
activity="run program"
list.
EOF
if [ $? -ne 0 ] ; then no_result ; fi
activity="run program"
-$SUPERVISOR $
here/../src/pspp -o raw-ascii $TEMPDIR/rnd.sps
+$SUPERVISOR $
PSPP -o raw-ascii $TESTFILE
if [ $? -ne 0 ] ; then no_result ; fi
activity="compare output"
if [ $? -ne 0 ] ; then no_result ; fi
activity="compare output"
-diff -b -B -w $TEMPDIR/pspp.list - << EOF
+perl -pi -e 's/^\s*$//g' $TEMPDIR/pspp.list
+diff -b -w $TEMPDIR/pspp.list - << EOF
R1
--------
R1
--------
- 2.36
- 3.13
- 1.76
-
.1
5
- 5.88
- 8.74
-
2.1
9
- 6.53
-
5.6
9
- 6.77
- 7.20
- 4.01
- .03
- 4.67
- 5.10
- .44
- 8.27
- 6.81
- 9.55
- 8.74
+ 7.71
+ 2.99
+ .21
+
4.9
5
+ 6.34
+ 4.43
+
7.4
9
+ 8.32
+
4.9
9
+ 5.83
+ 2.25
+ .25
+ 1.98
+ 7.09
+ 7.61
+ 2.66
+ 1.69
+ 2.64
+ .88
+ 1.50
EOF
if [ $? -ne 0 ] ; then fail ; fi
EOF
if [ $? -ne 0 ] ; then fail ; fi