aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorArun Isaac2024-09-03 20:01:20 +0100
committerArun Isaac2024-09-05 16:22:50 +0100
commitdee8227273738261c910d545c5006aefe096b0b4 (patch)
tree97679afa3d0bd87e473faf443be6a925d5c3127d
parent6d39365fe9c13772c8d53bd8e1507ee96280a828 (diff)
downloadravanan-dee8227273738261c910d545c5006aefe096b0b4.tar.gz
ravanan-dee8227273738261c910d545c5006aefe096b0b4.tar.lz
ravanan-dee8227273738261c910d545c5006aefe096b0b4.zip
workflow: Check requirements and hints.
* ravanan/workflow.scm (workflow->propagators): Check requirements and hints.
-rw-r--r--ravanan/workflow.scm4
1 files changed, 4 insertions, 0 deletions
diff --git a/ravanan/workflow.scm b/ravanan/workflow.scm
index b531260..d3f2c7b 100644
--- a/ravanan/workflow.scm
+++ b/ravanan/workflow.scm
@@ -189,6 +189,10 @@ their own namespaces."
((string=? class "ExpressionTool")
(error "Workflow class not implemented yet" class))
((string=? class "Workflow")
+ (maybe-let* ((requirements (maybe-assoc-ref (just cwl) "requirements")))
+ (check-requirements requirements %supported-requirements))
+ (maybe-let* ((hints (maybe-assoc-ref (just cwl) "hints")))
+ (check-requirements hints %supported-requirements #t))
workflow-class->propagators)
(else
(error "Invalid workflow class" class)))