diff options
| author | Hugo Hörnquist <hugo@lysator.liu.se> | 2022-06-23 04:14:46 +0200 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2022-06-23 04:14:46 +0200 |
| commit | 2fb88465f7a25b1eac0cdbb78a05de9e78e68bfd (patch) | |
| tree | c48c312e1d44306039fc00cfe4b5cd611d7f9a3b /module/srfi | |
| parent | Remove procedure tabset. (diff) | |
| download | calp-2fb88465f7a25b1eac0cdbb78a05de9e78e68bfd.tar.gz calp-2fb88465f7a25b1eac0cdbb78a05de9e78e68bfd.tar.xz | |
Normalize keyword syntax.
Diffstat (limited to 'module/srfi')
| -rw-r--r-- | module/srfi/srfi-41/util.scm | 38 |
1 files changed, 19 insertions, 19 deletions
diff --git a/module/srfi/srfi-41/util.scm b/module/srfi/srfi-41/util.scm index bc7a480d..d938ec4e 100644 --- a/module/srfi/srfi-41/util.scm +++ b/module/srfi/srfi-41/util.scm @@ -1,23 +1,23 @@ (define-module (srfi srfi-41 util) - #:use-module (srfi srfi-1) - #:use-module (srfi srfi-41) - #:use-module (srfi srfi-71) - #:use-module ((ice-9 sandbox) :select (call-with-time-limit)) - #:use-module (hnh util) ; find-min - #:export (stream-car+cdr - interleave-streams - stream-insert - filter-sorted-stream - filter-sorted-stream* - get-stream-interval - stream-find - stream-remove - stream->values - repeating-naturals - stream-partition - stream-split - stream-paginate - stream-timeslice-limit)) + :use-module (srfi srfi-1) + :use-module (srfi srfi-41) + :use-module (srfi srfi-71) + :use-module ((ice-9 sandbox) :select (call-with-time-limit)) + :use-module (hnh util) ; find-min + :export (stream-car+cdr + interleave-streams + stream-insert + filter-sorted-stream + filter-sorted-stream* + get-stream-interval + stream-find + stream-remove + stream->values + repeating-naturals + stream-partition + stream-split + stream-paginate + stream-timeslice-limit)) (define (stream-car+cdr stream) (values (stream-car stream) |