From 3e8dac4240eb1f3abe46ce0efac83a97283b8fcc Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Fri, 29 Sep 2023 18:38:18 +0100
Subject: ccwl: Comment on allowing default parameter values.

* ccwl/ccwl.scm (collect-steps): Comment on allowing default parameter
values. Remove TODO note.
---
 ccwl/ccwl.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ccwl/ccwl.scm b/ccwl/ccwl.scm
index 174b040..00d503f 100644
--- a/ccwl/ccwl.scm
+++ b/ccwl/ccwl.scm
@@ -476,10 +476,10 @@ represented by <step> objects."
                      (formatted-message "Undefined ccwl command ~a"
                                         (syntax->datum #'function)))))
        ;; Test for missing required parameters.
-       ;; TODO: Filter out optional parameters.
        (match (lset-difference
                eq?
                (filter-map (lambda (input)
+                             ;; Leave out inputs that have default values.
                              (and (unspecified-default? (input-default input))
                                   (input-id input)))
                            (function-inputs function-object))
-- 
cgit v1.2.3