Fix memory leaks.
[pspp-builds.git] / tests / command / t-test-1s.sh
1 #!/bin/sh
2
3 # This program tests that the T-TEST /TESTVAL command works OK
4
5 TEMPDIR=/tmp/pspp-tst-$$
6
7 here=`pwd`;
8
9 # ensure that top_srcdir is absolute
10 cd $top_srcdir; top_srcdir=`pwd`
11
12 export STAT_CONFIG_PATH=$top_srcdir/config
13
14
15 cleanup()
16 {
17      rm -rf $TEMPDIR
18 }
19
20
21 fail()
22 {
23     echo $activity
24     echo FAILED
25     cleanup;
26     exit 1;
27 }
28
29
30 no_result()
31 {
32     echo $activity
33     echo NO RESULT;
34     cleanup;
35     exit 2;
36 }
37
38 pass()
39 {
40     cleanup;
41     exit 0;
42 }
43
44 mkdir -p $TEMPDIR
45
46 cd $TEMPDIR
47
48 activity="create program"
49 cat > $TEMPDIR/out.stat <<EOF
50 data list list /id * abc *.
51 begin data.
52 1 3.5
53 2 2.0
54 3 2.0
55 4 3.5
56 5 3.0
57 6 4.0
58 end data.
59
60 t-test /testval=2.0 /var=abc.
61 EOF
62 if [ $? -ne 0 ] ; then no_result ; fi
63
64
65 activity="run program"
66 $SUPERVISOR $here/../src/pspp -o raw-ascii $TEMPDIR/out.stat
67 if [ $? -ne 0 ] ; then no_result ; fi
68
69 activity="compare output"
70 diff -B -b $TEMPDIR/pspp.list - <<EOF
71 1.1 DATA LIST.  Reading free-form data from the command file.
72 +--------+------+
73 |Variable|Format|
74 #========#======#
75 |ID      |F8.0  |
76 |ABC     |F8.0  |
77 +--------+------+
78
79 2.1 T-TEST.  One-Sample Statistics
80 #===#=#====#==============#========#
81 #   #N|Mean|Std. Deviation|SE. Mean#
82 #===#=#====#==============#========#
83 #ABC#6|3.00|           .84|    .342#
84 #===#=#====#==============#========#
85
86 2.2 T-TEST.  One-Sample Test
87 #===#=====================================================#
88 #   #                Test Value = 2.000000                #
89 #   #-----+--+---------------+---------------+------------#
90 #   #     |  |               |               |    95%     #
91 #   #     |  |               |               +-----+------#
92 #   #  t  |df|Sig. (2-tailed)|Mean Difference|Lower| Upper#
93 #===#=====#==#===============#===============#=====#======#
94 #ABC#2.928| 5|           .033|          1.000|.1220|1.8780#
95 #===#=====#==#===============#===============#=====#======#
96 EOF
97 if [ $? -ne 0 ] ; then fail ; fi
98
99
100 pass