Skip to content

Commit 02c977e

Browse files
committed
Support Haddock's shaded inline code with rounded corners
With background shading the rounded corners between two immediately consecutive inline code spans would be visible. Merges these inline code spans into a single one to avoid this.
1 parent b1de045 commit 02c977e

File tree

2 files changed

+3
-3
lines changed

2 files changed

+3
-3
lines changed

src/Control/Foldl.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -235,7 +235,7 @@ import qualified Data.Semigroupoid
235235
value of type __b__.
236236
-}
237237
data Fold a b
238-
-- | @Fold @ @ step @ @ initial @ @ extract@
238+
-- | @Fold step initial extract@.
239239
= forall x. Fold (x -> a -> x) x (x -> b)
240240

241241
instance Functor (Fold a) where
@@ -403,7 +403,7 @@ instance Floating b => Floating (Fold a b) where
403403
results in a monadic value of type __m b__.
404404
-}
405405
data FoldM m a b =
406-
-- | @FoldM @ @ step @ @ initial @ @ extract@
406+
-- | @FoldM step initial extract@.
407407
forall x . FoldM (x -> a -> m x) (m x) (x -> m b)
408408

409409
instance Functor m => Functor (FoldM m a) where

src/Control/Foldl/NonEmpty.hs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -128,7 +128,7 @@ data Fold1 a b = Fold1 (a -> Fold a b)
128128
step function as the first argument and the initial accumulator as the
129129
second argument, whereas @Fold1_@ takes them in swapped order:
130130
131-
@Fold1_ @ @ initial @ @ step @ @ extract@
131+
@Fold1_ initial step extract@.
132132
133133
While @Fold@ resembles 'Prelude.foldl', @Fold1_@ resembles
134134
'Data.Foldable1.foldlMap1'.

0 commit comments

Comments
 (0)