From c49dbef130f09667c619d1b7b77380aa53bae7e8 Mon Sep 17 00:00:00 2001 From: Arun Isaac Date: Wed, 24 Jun 2026 22:31:25 +0100 Subject: ccwl: Error out if #:binding is specified on stdout type output. --- tests/ccwl.scm | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'tests/ccwl.scm') 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 -- cgit 1.4.1