From e05a98cc2da173ed9126ea4aed7943de8ca78fdb Mon Sep 17 00:00:00 2001 From: Rob Rix Date: Tue, 24 Sep 2019 17:07:16 -0400 Subject: [PATCH] :memo: gfoldMap1. --- semantic-tags/src/Tags/Taggable/Precise.hs | 1 + 1 file changed, 1 insertion(+) diff --git a/semantic-tags/src/Tags/Taggable/Precise.hs b/semantic-tags/src/Tags/Taggable/Precise.hs index 9c12daaff..73a10c2b2 100644 --- a/semantic-tags/src/Tags/Taggable/Precise.hs +++ b/semantic-tags/src/Tags/Taggable/Precise.hs @@ -41,6 +41,7 @@ yield = tell . Endo . (:) class GFoldable1 c t where + -- | Generically map functions over fields of kind @* -> *@, monoidally combining the results. gfoldMap1 :: Monoid b => (forall f . c f => f a -> b)