Commit f8c57cb9 authored by Herbert Valerio Riedel's avatar Herbert Valerio Riedel 🕺
Browse files

Add docstring for `monoidField` (#4679) [skip ci]

parent 5e49e53c
......@@ -1253,6 +1253,8 @@ listFieldWithSep separator name showF readF get' set =
set' xs b = set (get' b ++ xs) b
showF' = separator . map showF
-- | Parser combinator for simple fields which uses the field type's
-- 'Monoid' instance for combining multiple occurences of the field.
monoidField :: Monoid a => String -> (a -> Doc) -> ReadP a a
-> (b -> a) -> (a -> b -> b) -> FieldDescr b
monoidField name showF readF get' set =
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment