X-Git-Url: https://git.draconx.ca/gitweb/cdecl99.git/blobdiff_plain/ce4b1fa54fb01a782ad87f66b86d6f43ed9e71cd..a0629a04f4fc6093900c9e4703e440d6b0ba24ad:/tests/general.at

diff --git a/tests/general.at b/tests/general.at
index 776c619..b0806a3 100644
--- a/tests/general.at
+++ b/tests/general.at
@@ -104,6 +104,7 @@ AT_DATA([input],
 [[explain int a b c
 simplify int a b c
 declare a as b c
+bad command
 ]])
 
 AT_DATA([check.awk],
@@ -116,6 +117,14 @@ END { exit(status); }
 AT_CHECK([LC_ALL=C cdecl99 --file=input || exit 42], [42], [], [stderr])
 AT_CHECK([$AWK -v progname="$progname" -f check.awk stderr])
 
+exec 3<input
+set x; shift
+while read line <&3; do
+  set x "$@" "--execute=$line"; shift;
+done
+AT_CHECK([LC_ALL=C cdecl99 "$@" || exit 42], [42], [], [stderr])
+AT_CHECK([$AWK -v progname="$progname" -f check.awk stderr])
+
 AT_CLEANUP
 
 AT_SETUP([cdecl99 invalid character error messages])
@@ -140,3 +149,16 @@ AT_CHECK([$AWK '{ print $NF; }' stderr], [0],
 ]])
 
 AT_CLEANUP
+
+AT_SETUP([cdecl99 interactive mode])
+
+AT_DATA([test.dat],
+[[explain int x;
+quit
+]])
+
+AT_CHECK([cdecl99 --quiet --interactive <test.dat], [0], [stdout])
+AT_CHECK([sed '/^>/d' stdout], [0], [declare x as int
+])
+
+AT_CLEANUP