X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=tests%2Fbugs%2Finput-crash.sh;h=600ca729457745f6c77fec0ba64acd124db73fb7;hb=a7c7dd31b1ac252a08d7cfc2748cc3820c96e088;hp=f67b3d28a4fab8ee8275aa536d805d0d9894237c;hpb=9aff19b717bcc242e16d04c34f348fd79ebdd685;p=pspp-builds.git

diff --git a/tests/bugs/input-crash.sh b/tests/bugs/input-crash.sh
index f67b3d28..600ca729 100755
--- a/tests/bugs/input-crash.sh
+++ b/tests/bugs/input-crash.sh
@@ -77,5 +77,23 @@ $SUPERVISOR $PSPP --testing-mode -e /dev/null $TESTFILE
 if [ $? -ne 1 ] ; then fail ; fi
 
 
+activity="create test program 2"
+cat > $TESTFILE <<EOF
+* From bug #21108.
+input program.
+data list list /x.
+end file.
+end input program.
+
+descriptives x.
+EOF
+if [ $? -ne 0 ] ; then no_result ; fi
+
+
+# The above syntax is invalid, so this program should fail to parse
+activity="run program 2"
+$SUPERVISOR $PSPP --testing-mode -e /dev/null $TESTFILE
+if [ $? -ne 1 ] ; then fail ; fi
+
 
 pass;