diff options
| author |  Arthur A. Gleckler
| 2022-09-19 20:36:10 -0700 |
|---|---|---|
| committer | Arthur A. Gleckler
| 2022-09-19 20:36:10 -0700 |
| commit | a893afd4f6a7a515f555fd09b003a3e7ec7a310c (patch) | |
| tree | d0285391ecedae7b81a2b0a4da01880ebd363c01 /srfi/225 | |
| parent | Merge branch 'master' of github.com:johnwcowan/srfi-225 (diff) | |
Drop trailing whitespace.
Diffstat (limited to 'srfi/225')
| -rw-r--r-- | srfi/225/default-impl.sld | 2 | ||||
| -rw-r--r-- | srfi/225/srfi-146-impl.sld | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/srfi/225/default-impl.sld b/srfi/225/default-impl.sld index 0c7d75c..c6d493c 100644 --- a/srfi/225/default-impl.sld +++ b/srfi/225/default-impl.sld @@ -254,7 +254,7 @@ (define (accept el) (and (upper el) (lower el))) - (dict-map + (dict-map dto (lambda (key value) (when (accept key) diff --git a/srfi/225/srfi-146-impl.sld b/srfi/225/srfi-146-impl.sld index d9577b4..163bf66 100644 --- a/srfi/225/srfi-146-impl.sld +++ b/srfi/225/srfi-146-impl.sld @@ -14,7 +14,7 @@ (define (mapping-map* dto proc dict) (mapping-map (lambda (key value) - (values key (proc key value))) + (values key (proc key value))) (dict-comparator dto dict) dict)) (define (mapping-find-update* dto dict key failure success) |