From 8b397e05a8e80b5d50cdbf94d8858c617c5ebafd Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@lysator.liu.se>
Date: Wed, 12 Aug 2020 01:06:39 +0200
Subject: Massivly simplify config internals.

---
 module/util.scm | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 'module/util.scm')

diff --git a/module/util.scm b/module/util.scm
index 04d13220..fce1c014 100644
--- a/module/util.scm
+++ b/module/util.scm
@@ -486,6 +486,11 @@
      (and=>> (and=> value proc)
              rest ...)]))
 
+;; @example
+;; (group (iota 10) 2)
+;; ⇒ ((0 1) (2 3) (4 5) (6 7) (8 9))
+;; @end example
+;; Requires that width|(length list)
 (define-public (group list width)
   (unless (null? list)
     (let* ((row rest (split-at list width)))
-- 
cgit v1.2.3