diff options
author | Arun Isaac | 2021-10-18 00:29:56 +0530 |
---|---|---|
committer | Arun Isaac | 2021-10-18 00:29:56 +0530 |
commit | 2a14921852ae58526c40bc8d2219bbc2e101184f (patch) | |
tree | f0ddd67c2923a9b7d1026263465a52ee52117047 | |
parent | 4507044300366c91e965cca905a9abc1a63ef0e5 (diff) | |
download | ccwl-2a14921852ae58526c40bc8d2219bbc2e101184f.tar.gz ccwl-2a14921852ae58526c40bc8d2219bbc2e101184f.tar.lz ccwl-2a14921852ae58526c40bc8d2219bbc2e101184f.zip |
ccwl: Add setter for name field of <key> type.
* ccwl/ccwl.scm (<key>): Add setter set-key-name.
-rw-r--r-- | ccwl/ccwl.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ccwl/ccwl.scm b/ccwl/ccwl.scm index fa79827..aca89cd 100644 --- a/ccwl/ccwl.scm +++ b/ccwl/ccwl.scm @@ -224,7 +224,7 @@ RUN-ARGS. If such an input is not present in RUN-ARGS, return #f." (define-immutable-record-type <key> (make-key name cwl-id step) key? - (name key-name) + (name key-name set-key-name) (cwl-id key-cwl-id) (step key-step)) |