aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--tests/ccwl.scm16
1 files changed, 14 insertions, 2 deletions
diff --git a/tests/ccwl.scm b/tests/ccwl.scm
index d97c757..1bef07d 100644
--- a/tests/ccwl.scm
+++ b/tests/ccwl.scm
@@ -16,10 +16,22 @@
;;; You should have received a copy of the GNU General Public License
;;; along with ccwl. If not, see <https://www.gnu.org/licenses/>.
-(use-modules (srfi srfi-64))
+(use-modules (srfi srfi-64)
+ (ccwl ccwl))
(test-begin "ccwl")
-;; Add tests here when relevant.
+(test-assert "stdin input should not have inputBinding"
+ (not (assoc-ref
+ (assoc-ref
+ (assoc-ref
+ ((module-ref (resolve-module '(ccwl ccwl))
+ 'command->cwl)
+ (command #:inputs (file #:type 'File)
+ #:run "wc" "-c"
+ #:stdin file))
+ 'inputs)
+ 'file)
+ 'inputBinding)))
(test-end "ccwl")