From 234dbc781c328db11c3cc17a74d2c9301e5d82bf Mon Sep 17 00:00:00 2001
From: Leah Neukirchen <leah@vuxu.org>
Date: Fri, 16 Dec 2022 00:15:35 +0100
Subject: add inject-accumulator

---
 mew.svnwiki | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'mew.svnwiki')

diff --git a/mew.svnwiki b/mew.svnwiki
index 1b8c0ae..3d30816 100644
--- a/mew.svnwiki
+++ b/mew.svnwiki
@@ -503,6 +503,12 @@ Two elements are considered equal if their image under {{<f>}} is {{equal?}}.
 Returns an accumulator that saves the {{<n>}}-th element, or
 an void value else.
 
+<procedure>(inject-accumulator <f> [<init>])</procedure>
+
+Returns an accumulator that xfolds {{<f>}} over the elements.
+If given, folding starts with {{<init>}}, else with the first element
+received.
+
 <procedure>(generator-xfold <f> <seed> <generators>...)</procedure>
 
 Like {{generator-fold}}, but {{<f>}} always takes the accumulator as
-- 
cgit 1.4.1