From ea8611f2cb62c378848b6a2ab90afb40bd10dc70 Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Tue, 7 Nov 2023 11:35:52 +0000
Subject: ccwl: Delete unused input=? function.

* ccwl/ccwl.scm (input=?): Delete function.
---
 ccwl/ccwl.scm | 4 ----
 1 file changed, 4 deletions(-)

diff --git a/ccwl/ccwl.scm b/ccwl/ccwl.scm
index 793facd..03e1264 100644
--- a/ccwl/ccwl.scm
+++ b/ccwl/ccwl.scm
@@ -443,10 +443,6 @@ identifiers defined in the commands."
                                (make-output id type #f #f #f)))
                             (parameters->id+type (assoc-ref yaml "outputs"))))))
 
-(define (input=? input1 input2)
-  (eq? (input-id input1)
-       (input-id input2)))
-
 (define (function-inputs function)
   "Return the list of inputs accepted by @var{function}, a
 @code{<command>} or @code{<cwl-workflow>} object."
-- 
cgit v1.2.3