diff options
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/ccwl.scm | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/tests/ccwl.scm b/tests/ccwl.scm index ea14f86..bd852e9 100644 --- a/tests/ccwl.scm +++ b/tests/ccwl.scm @@ -108,6 +108,11 @@ ccwl-violation? (output #'(message #:type int string))) +(test-condition "output, when passed a #:binding to an stdout type, must raise a &ccwl-violation condition" + ccwl-violation? + (output #'(message #:type stdout + #:binding ((glob . "output.txt"))))) + (test-condition "command, when passed positional arguments, must raise a &ccwl-violation condition" ccwl-violation? (macroexpand |