From db542a9857944446cf7e0db4497825e8f51f1822 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@lysator.liu.se>
Date: Mon, 24 Aug 2020 19:58:48 +0200
Subject: .

---
 module/util.scm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'module')

diff --git a/module/util.scm b/module/util.scm
index 755afccf..c1eaf6bf 100644
--- a/module/util.scm
+++ b/module/util.scm
@@ -506,7 +506,8 @@
     (let* ((row rest (split-at list width)))
       (cons row (group rest width)))))
 
-;; repeatedly apply proc to base unitl @var{until} is satisfied.
+;; repeatedly apply @var{proc} to @var{base}
+;; unitl @var{until} is satisfied.
 ;; (a → a), (a → bool), a → a
 (define-public (iterate proc until base)
   (let loop ((o base))
-- 
cgit v1.2.3