diff options
| -rw-r--r-- | tests/testsuite.at | 17 |
1 files changed, 7 insertions, 10 deletions
diff --git a/tests/testsuite.at b/tests/testsuite.at index a236149..74fab24 100644 --- a/tests/testsuite.at +++ b/tests/testsuite.at @@ -221,16 +221,13 @@ AT_DATA([expout], [[TEST Line 2 ]]) TE_CHECK([[@^A/TEST^JLine 2^J/]], 0, expout, ignore) -# FIXME: "Info" messages are surpressed by --quiet. -#AT_DATA([expout], [[Info: TEST -#]]) -#TE_CHECK([[1@^A/TEST/]], 0, expout, ignore) -AT_DATA([experr], [[Warning: TEST -]]) -TE_CHECK([[2@^A/TEST/]], 0, ignore, experr) -AT_DATA([experr], [[Error: TEST -]]) -TE_CHECK([[3@^A/TEST/]], 0, ignore, experr) +# "Info" messages would be surpressed by --quiet. +AT_CHECK([[$SCITECO -e '1@^A/TEST/']], 0, stdout, ignore) +AT_FAIL_IF([! $GREP "^Info:" stdout]) +TE_CHECK([[2@^A/TEST/]], 0, ignore, stderr) +AT_FAIL_IF([! $GREP "^Warning:" stderr]) +TE_CHECK([[3@^A/TEST/]], 0, ignore, stderr) +AT_FAIL_IF([! $GREP "^Error:" stderr]) AT_CLEANUP AT_SETUP([Type out buffer contents]) |