Checkin of new directory structure.
[pspp-builds.git] / tests / bugs / crosstabs.sh
1 #!/bin/sh
2
3 # This program tests for a bug which crashed pspp when doing a crosstabs
4
5 TEMPDIR=/tmp/pspp-tst-$$
6 TESTFILE=$TEMPDIR/`basename $0`.sps
7
8 # ensure that top_builddir  are absolute
9 if [ -z "$top_builddir" ] ; then top_builddir=. ; fi
10 if [ -z "$top_srcdir" ] ; then top_srcdir=. ; fi
11 top_builddir=`cd $top_builddir; pwd`
12
13 # ensure that top_srcdir is absolute
14 top_srcdir=`cd $top_srcdir; pwd`
15
16 STAT_CONFIG_PATH=$top_srcdir/config
17 export STAT_CONFIG_PATH
18
19
20 cleanup()
21 {
22      cd /
23      rm -rf $TEMPDIR
24 }
25
26
27 fail()
28 {
29     echo $activity
30     echo FAILED
31     cleanup;
32     exit 1;
33 }
34
35
36 no_result()
37 {
38     echo $activity
39     echo NO RESULT;
40     cleanup;
41     exit 2;
42 }
43
44 pass()
45 {
46     cleanup;
47     exit 0;
48 }
49
50 mkdir -p $TEMPDIR
51
52 cd $TEMPDIR
53
54 activity="create program"
55 cat > $TEMPDIR/ct.stat <<EOF
56 DATA LIST FIXED
57      / x   1-2
58        y   3
59        z   4.
60
61 BEGIN DATA.
62 0111 
63 0222 
64 0311 
65 0412 
66 0521 
67 0612 
68 0711 
69 0811 
70 0912 
71 END DATA.
72
73 LIST.
74
75
76 CROSSTABS TABLES  y by z.
77
78 EOF
79 if [ $? -ne 0 ] ; then no_result ; fi
80
81
82 $SUPERVISOR $top_builddir/src/pspp $TEMPDIR/ct.stat
83 if [ $? -ne 0 ] ; then fail ; fi
84
85
86 pass;