X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=tests%2Fui%2Fterminal%2Fmain.at;h=38a88eca14a779174d838d8218ad836f2690c36e;hb=dfe6c9dc498c67115aa489adeb8c7a74a5e5b0ad;hp=1ee822688f30b416438d145fa79a834739a526fc;hpb=afca77f0c62b04630fde858c923134e8c680ffa9;p=pspp-builds.git diff --git a/tests/ui/terminal/main.at b/tests/ui/terminal/main.at index 1ee82268..38a88eca 100644 --- a/tests/ui/terminal/main.at +++ b/tests/ui/terminal/main.at @@ -5,3 +5,34 @@ AT_CHECK([pspp nonexistent], [1], [error: Opening `nonexistent': No such file or directory. ]) AT_CLEANUP + +AT_SETUP([SIGTERM yields clean shutdown]) +AT_DATA([main.sps], [dnl +INPUT PROGRAM. +COMPUTE x = x + 1. +DO IF x = 10000. +END CASE. +ELSE IF x < 0. +END FILE. +END IF. +END INPUT PROGRAM. +EXECUTE. +]) +AT_CHECK([pspp main.sps & sleep 1; kill $!; wait $!], [143], [], [ignore]) +AT_CLEANUP + +AT_SETUP([SIGSEGV yields error report]) +AT_CHECK([[echo 'host command=["kill -SEGV $PPID"].' | pspp -O format=csv]], + [139], [], [stderr]) +AT_DATA([expout], [dnl +****************************************************** +You have discovered a bug in PSPP. Please report this +to bug-gnu-pspp@gnu.org. Please include this entire +message, *plus* several lines of output just above it. +For the best chance at having the bug fixed, also +include the syntax file that triggered it and a sample +of any data file used for input. +proximate cause: Segmentation Violation +]) +AT_CHECK([sed '/proximate/q' < stderr], [0], [expout]) +AT_CLEANUP