aboutsummaryrefslogtreecommitdiff
path: root/tests
diff options
context:
space:
mode:
authorArun Isaac2023-11-23 17:49:45 +0000
committerArun Isaac2023-11-23 19:02:58 +0000
commit9f601fc3f131e82e1ee5791783d330bddde468d2 (patch)
tree1a5cfe580722168270634a5d51f0f41df1033962 /tests
parent00c911b1bd5aca3800e0263240968ad8f3fbefde (diff)
downloadccwl-9f601fc3f131e82e1ee5791783d330bddde468d2.tar.gz
ccwl-9f601fc3f131e82e1ee5791783d330bddde468d2.tar.lz
ccwl-9f601fc3f131e82e1ee5791783d330bddde468d2.zip
ccwl: Implement item separators for array inputs.
* ccwl/ccwl.scm (<input>)[separator]: New field. * ccwl/ccwl.scm (run-arg-position, run-args): Support array input specifiers. (run-arg-separator): New function. (command): Set separator on input objects. * ccwl/cwl.scm (input->cwl-scm): Serialize itemSeparator. * tests/ccwl.scm ("commands with non-string #:separator parameters must raise a &ccwl-violation condition"): New test. * doc/ccwl.skb (Cookbook)[Array input item separators]: New section. * doc/array-input-item-separators.scm: New file.
Diffstat (limited to 'tests')
-rw-r--r--tests/ccwl.scm7
1 files changed, 7 insertions, 0 deletions
diff --git a/tests/ccwl.scm b/tests/ccwl.scm
index e876912..d3e1a96 100644
--- a/tests/ccwl.scm
+++ b/tests/ccwl.scm
@@ -308,4 +308,11 @@
'(workflow ((foo #:type string))
(rename #:bar foobar))))
+(test-condition "commands with non-string #:separator parameters must raise a &ccwl-violation condition"
+ (ccwl-violation-with-message?
+ "Invalid #:separator parameter ~a. #:separator parameter must be a string.")
+ (macroexpand
+ '(command #:inputs (messages #:type (array string))
+ #:run "echo" (array messages #:separator foo))))
+
(test-end "ccwl")