aboutsummaryrefslogtreecommitdiff
path: root/algebraic-structures.monoid.fold.scm
diff options
context:
space:
mode:
Diffstat (limited to 'algebraic-structures.monoid.fold.scm')
-rw-r--r--algebraic-structures.monoid.fold.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/algebraic-structures.monoid.fold.scm b/algebraic-structures.monoid.fold.scm
index 5e176f2..bb74e4a 100644
--- a/algebraic-structures.monoid.fold.scm
+++ b/algebraic-structures.monoid.fold.scm
@@ -1,4 +1,4 @@
-(functor ((algebraic-structures monoid fold) (M (<> unit)) (F (fold))) (fold)
+(functor ((algebraic-structures monoid fold) (M (<> unit)) (F (fold))) (fold fold-map)
(import scheme M (rename F (fold foldable:fold)))
(define (fold x) (foldable:fold <> unit x))