From 2fb88465f7a25b1eac0cdbb78a05de9e78e68bfd Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= Date: Thu, 23 Jun 2022 04:14:46 +0200 Subject: Normalize keyword syntax. --- module/srfi/srfi-41/util.scm | 38 +++++++++++++++++++------------------- 1 file changed, 19 insertions(+), 19 deletions(-) (limited to 'module/srfi/srfi-41') 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) -- cgit v1.2.3