diff options
| author | Arun Isaac | 2026-06-20 11:04:58 +0100 |
|---|---|---|
| committer | Arun Isaac | 2026-06-20 11:04:58 +0100 |
| commit | ac0715673488be9dbc1cdc131198a78b4556e6ee (patch) | |
| tree | 1330c333746aa979f85324658b447ced6f421f3f | |
| parent | f96a98d04ee459256ee768332cd1896efd57b231 (diff) | |
| download | ccwl-ac0715673488be9dbc1cdc131198a78b4556e6ee.tar.gz ccwl-ac0715673488be9dbc1cdc131198a78b4556e6ee.tar.lz ccwl-ac0715673488be9dbc1cdc131198a78b4556e6ee.zip | |
scripts: Prefer let to let*.
| -rwxr-xr-x | scripts/ccwl | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/scripts/ccwl b/scripts/ccwl index ce1dfd1..3f8ab9b 100755 --- a/scripts/ccwl +++ b/scripts/ccwl @@ -118,12 +118,12 @@ Thank you! (lambda () (match args ((program "compile" args ...) - (let* ((args (args-fold args - %options - invalid-option - (lambda (arg result) - (acons 'source-file arg result)) - '((to . cwl))))) + (let ((args (args-fold args + %options + invalid-option + (lambda (arg result) + (acons 'source-file arg result)) + '((to . cwl))))) (when (or (assq 'help args) (not (assq-ref args 'source-file))) (display (format "Usage: ~a compile [OPTIONS] SOURCE-FILE |