diff options
| author | Arun Isaac | 2026-07-01 14:51:43 +0100 |
|---|---|---|
| committer | Arun Isaac | 2026-07-01 23:14:41 +0100 |
| commit | 17f98d56973506fad6e7a75c4458464658b4e03e (patch) | |
| tree | c78a5fe7bf176513872accba0fa09ff16686b986 | |
| parent | 1578e7df972b61e8ece643dc9109492436e711f8 (diff) | |
| download | ccwl-17f98d56973506fad6e7a75c4458464658b4e03e.tar.gz ccwl-17f98d56973506fad6e7a75c4458464658b4e03e.tar.lz ccwl-17f98d56973506fad6e7a75c4458464658b4e03e.zip | |
tests: Simplify external CWL workflow relative path test.
| -rw-r--r-- | test-data/external-cwl-workflow.scm | 7 | ||||
| -rw-r--r-- | tests/ccwl.scm | 3 | ||||
| -rw-r--r-- | tests/echo.cwl (renamed from test-data/echo.cwl) | 0 | ||||
| -rw-r--r-- | tests/lang.scm | 3 |
4 files changed, 3 insertions, 10 deletions
diff --git a/test-data/external-cwl-workflow.scm b/test-data/external-cwl-workflow.scm deleted file mode 100644 index 74c91c1..0000000 --- a/test-data/external-cwl-workflow.scm +++ /dev/null @@ -1,7 +0,0 @@ -(define echo - (cwl-workflow "echo.cwl")) - -;; TODO: Remove this workflow and return echo directly once bug -;; a9352f5 is fixed. -(workflow ((message #:type string)) - (echo #:message "foo")) diff --git a/tests/ccwl.scm b/tests/ccwl.scm index 38a8302..b2da5cd 100644 --- a/tests/ccwl.scm +++ b/tests/ccwl.scm @@ -63,6 +63,9 @@ #:stdin file)) 'inputs)) +(test-assert "resolve CWL workflow relative to source file" + (cwl-workflow "echo.cwl")) + (test-equal "read all forms of inputs and outputs from a CWL workflow" '(((spam string)) ((ham stdout) diff --git a/test-data/echo.cwl b/tests/echo.cwl index b957a59..b957a59 100644 --- a/test-data/echo.cwl +++ b/tests/echo.cwl diff --git a/tests/lang.scm b/tests/lang.scm index d8a891b..5c506bc 100644 --- a/tests/lang.scm +++ b/tests/lang.scm @@ -23,9 +23,6 @@ (test-begin "lang") -(test-assert "load source file referencing external CWL workflow relative to it" - (ccwl-load "test-data/external-cwl-workflow.scm")) - (test-condition "loading non-existent source file must raise a &ccwl-violation" ccwl-violation? (ccwl-load "/non-existent/file.scm")) |