Added a test for reading/writing of portable files.
[pspp-builds.git] / tests / bugs / val-labs.sh
1 #!/bin/sh
2
3 # This program tests for a bug which caused VALUE LABELS to 
4 # crash when given invalid syntax
5
6
7 TEMPDIR=/tmp/pspp-tst-$$
8
9 here=`pwd`;
10
11 # ensure that top_srcdir is absolute
12 cd $top_srcdir; top_srcdir=`pwd`
13
14 export STAT_CONFIG_PATH=$top_srcdir/config
15
16
17 cleanup()
18 {
19      rm -rf $TEMPDIR
20 }
21
22
23 fail()
24 {
25     echo $activity
26     echo FAILED
27     cleanup;
28     exit 1;
29 }
30
31
32 no_result()
33 {
34     echo $activity
35     echo NO RESULT;
36     cleanup;
37     exit 2;
38 }
39
40 pass()
41 {
42     cleanup;
43     exit 0;
44 }
45
46 mkdir -p $TEMPDIR
47
48 cd $TEMPDIR
49
50 activity="create program"
51 cat > $TEMPDIR/rnd.sps <<EOF
52 DATA LIST LIST /a * pref * .
53 BEGIN DATA.
54     1.00     1.00    
55     1.00     2.00    
56     2.00     1.00    
57     2.00     2.00    
58 END DATA.
59
60 VALUE LABELS /var=a 'label for a'.
61
62
63
64 EOF
65 if [ $? -ne 0 ] ; then no_result ; fi
66
67 $SUPERVISOR $here/../src/pspp -o raw-ascii $TEMPDIR/rnd.sps > /dev/null
68 if [ $? -ne 1 ] ; then fail ; fi
69
70 pass;