summaryrefslogtreecommitdiff
path: root/tests
diff options
context:
space:
mode:
Diffstat (limited to 'tests')
-rw-r--r--tests/ccwl.scm5
-rw-r--r--tests/utils.scm5
2 files changed, 4 insertions, 6 deletions
diff --git a/tests/ccwl.scm b/tests/ccwl.scm
index 5d8a17f..015dcde 100644
--- a/tests/ccwl.scm
+++ b/tests/ccwl.scm
@@ -1,5 +1,5 @@
;;; ccwl --- Concise Common Workflow Language
-;;; Copyright © 2021 Arun Isaac <arunisaac@systemreboot.net>
+;;; Copyright © 2021, 2022 Arun Isaac <arunisaac@systemreboot.net>
;;;
;;; This file is part of ccwl.
;;;
@@ -25,8 +25,7 @@
(not (assoc-ref
(assoc-ref
(assoc-ref
- ((module-ref (resolve-module '(ccwl cwl))
- 'command->cwl-scm)
+ ((@@ (ccwl cwl) command->cwl-scm)
(command #:inputs (file #:type File)
#:run "wc" "-c"
#:stdin file))
diff --git a/tests/utils.scm b/tests/utils.scm
index 3c8fac4..223e7cd 100644
--- a/tests/utils.scm
+++ b/tests/utils.scm
@@ -1,5 +1,5 @@
;;; ccwl --- Concise Common Workflow Language
-;;; Copyright © 2021 Arun Isaac <arunisaac@systemreboot.net>
+;;; Copyright © 2021, 2022 Arun Isaac <arunisaac@systemreboot.net>
;;;
;;; This file is part of ccwl.
;;;
@@ -54,8 +54,7 @@
;; expressions.
(test-assert "unsyntax-keywords"
(equal? (list #:ham #'1 #:eggs #'2)
- ((module-ref (resolve-module '(ccwl utils))
- 'unsyntax-keywords)
+ ((@@ (ccwl utils) unsyntax-keywords)
(list #'#:ham #'1 #'#:eggs #'2))))
(test-equal "lambda**"