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 STAT_CONFIG_PATH=$top_srcdir/config
15 export STAT_CONFIG_PATH
51 activity="create program"
56 + do repeat response=R1.
57 + compute response = uniform(10).
66 if [ $? -ne 0 ] ; then no_result ; fi
68 activity="run program"
69 $SUPERVISOR $here/../src/pspp -o raw-ascii $TESTFILE
70 if [ $? -ne 0 ] ; then no_result ; fi
73 activity="compare output"
74 diff -b -B -w $TEMPDIR/pspp.list - << EOF
99 if [ $? -ne 0 ] ; then fail ; fi