From ced597ee47dc03c9c44c883e5670090ec3bfb0ab Mon Sep 17 00:00:00 2001 From: Arun Isaac Date: Thu, 27 Nov 2025 16:00:01 +0000 Subject: reader: Resolve type ambiguities in default inputs. --- tests/reader.scm | 19 ++++++++++++++++++- 1 file changed, 18 insertions(+), 1 deletion(-) (limited to 'tests') diff --git a/tests/reader.scm b/tests/reader.scm index 77d6034..8a2d0bc 100644 --- a/tests/reader.scm +++ b/tests/reader.scm @@ -24,7 +24,8 @@ (ravanan reader) (ravanan work command-line-tool) (ravanan work types) - (ravanan work utils)) + (ravanan work utils) + (ravanan work vectors)) (define normalize-formal-input (@@ (ravanan reader) normalize-formal-input)) @@ -231,4 +232,20 @@ (lambda (workflow inputs) inputs))) +(test-equal "Resolve type ambiguities in workflow default inputs" + '(("number" . 13) + ("flag" . #t) + ("reverseflag" . #f) + ("foo" . "bar") + ("arr" . #(1 2 3))) + (call-with-values + (cut read-workflow+inputs + "test-data/workflow-with-default-inputs.cwl" + "test-data/empty.yaml") + (lambda (workflow inputs) + (vector-map->list (lambda (input) + (cons (assoc-ref input "id") + (assoc-ref input "default"))) + (assoc-ref workflow "inputs"))))) + (test-end "reader") -- cgit 1.4.1