3 # This program tests for a bug which caused UNIFORM(x) to always return zero.
6 TEMPDIR=/tmp/pspp-tst-$$
7 TESTFILE=$TEMPDIR/`basename $0`.sps
11 # ensure that top_srcdir is absolute
12 cd $top_srcdir; top_srcdir=`pwd`
14 export STAT_CONFIG_PATH=$top_srcdir/config
50 activity="create program"
55 + do repeat response=R1.
56 + compute response = uniform(10).
65 if [ $? -ne 0 ] ; then no_result ; fi
67 activity="run program"
68 $SUPERVISOR $here/../src/pspp -o raw-ascii $TESTFILE
69 if [ $? -ne 0 ] ; then no_result ; fi
72 activity="compare output"
73 diff -b -B -w $TEMPDIR/pspp.list - << EOF
98 if [ $? -ne 0 ] ; then fail ; fi