X-Git-Url: https://git.draconx.ca/gitweb/cdecl99.git/blobdiff_plain/8724637093324f6fcadca663c97cad8b6e6ef61a..5fc35dc076078b9710d86b47c53f4315edd3cd82:/tests/general.at diff --git a/tests/general.at b/tests/general.at index fb4ee68..7b34b9d 100644 --- a/tests/general.at +++ b/tests/general.at @@ -63,13 +63,33 @@ AT_CLEANUP AT_SETUP([cdecl99 help command]) -AT_DATA([input], [[help +AT_DATA([input], +[[help explain int ]]) -AT_CHECK([cdecl99 -f input], [0], [stdout]) -AT_CHECK([sed -n '$p' stdout], [0], [type int -]) +# Program to generate expected output based on src/execute.gperf +AT_DATA([expout.sed], +[[#n +/^%%$/,/^%%$/ { + s/^exit.*// + s/,.*//p +} +$a\ +type int +]]) +sed -f expout.sed "$srcdir/src/execute.gperf" >expout + +# Program to filter the help output to extract the command list from "help" +# without any descriptions. +AT_DATA([filter.sed], +[[/^ /,$ !d +/^ /d +s/^ *\([^ ]*\).*/\1/ +]]) + +AT_CHECK([LC_ALL=C cdecl99 -f input >stdout && sed -f filter.sed stdout], + [0], [expout]) AT_CLEANUP