Fixed some memory leaks.

[pspp-builds.git] / tests / command / examine-extremes.sh

diff --git a/tests/command/examine-extremes.sh b/tests/command/examine-extremes.sh
new file mode 100755 (executable)
index 0000000..3df60f1
--- /dev/null
+++ b/tests/command/examine-extremes.sh
@@ -0,0 +1,123 @@
+#!/bin/sh
+
+# This program tests  the EXTREME subcommand of the EXAMINE command.
+
+TEMPDIR=/tmp/pspp-tst-$$
+
+here=`pwd`;
+
+# ensure that top_srcdir is absolute
+cd $top_srcdir; top_srcdir=`pwd`
+
+export STAT_CONFIG_PATH=$top_srcdir/config
+
+
+cleanup()
+{
+     rm -rf $TEMPDIR
+}
+
+
+fail()
+{
+    echo $activity
+    echo FAILED
+    cleanup;
+    exit 1;
+}
+
+
+no_result()
+{
+    echo $activity
+    echo NO RESULT;
+    cleanup;
+    exit 2;
+}
+
+pass()
+{
+    cleanup;
+    exit 0;
+}
+
+mkdir -p $TEMPDIR
+
+cd $TEMPDIR
+
+activity="create program"
+cat > $TEMPDIR/out.stat <<EOF
+data list free /v1 w
+begin data.
+1  1
+2  1
+3  2
+3  1
+4  1
+5  1
+6  1
+7  1
+8  1
+9  1
+10 1
+11 1
+12 1
+13 1
+14 1
+15 1
+16 1
+17 1
+18 2
+19 1
+20 1
+end data.
+
+weight by w.
+
+examine v1 
+ /statistics=extreme(6)
+ .
+EOF
+if [ $? -ne 0 ] ; then no_result ; fi
+
+
+activity="run program"
+$SUPERVISOR $here/../src/pspp -o raw-ascii $TEMPDIR/out.stat
+if [ $? -ne 0 ] ; then no_result ; fi
+
+activity="compare results"
+diff $TEMPDIR/pspp.list - << EOF
+1.1 EXAMINE.  Case Processing Summary
+#==#===============================#
+#  #             Cases             #
+#  #----------+---------+----------#
+#  #   Valid  | Missing |   Total  #
+#  #--+-------+-+-------+--+-------#
+#  # N|Percent|N|Percent| N|Percent#
+#==#==#=======#=#=======#==#=======#
+#V1#23|   100%|0|     0%|23|   100%#
+#==#==#=======#=#=======#==#=======#
+
+1.2 EXAMINE.  Extreme Values
+#==========#===========#=====#
+#          #Case Number|Value#
+#==========#===========#=====#
+#V1Highest1#         21|20.00#
+#         2#         20|19.00#
+#         3#         19|18.00#
+#         4#         19|18.00#
+#         5#         18|17.00#
+#         6#         17|16.00#
+#  --------#-----------+-----#
+#   Lowest1#          1| 1.00#
+#         2#          2| 2.00#
+#         3#          4| 3.00#
+#         4#          3| 3.00#
+#         5#          3| 3.00#
+#         6#          5| 4.00#
+#==========#===========#=====#
+
+EOF
+if [ $? -ne 0 ] ; then fail ; fi
+
+pass