Skip to content
Snippets Groups Projects
Commit 778ac793 authored by Kazuki Okamoto's avatar Kazuki Okamoto Committed by Marge Bot
Browse files

No haddock markup in doctest line

parent ea458779
No related branches found
No related tags found
No related merge requests found
Pipeline #102634 failed
Stage: not-interruptible
    Stage: tool-lint
      Stage: quick-build
        Stage: full-build
          Stage: packaging
            Stage: testing
              Stage: deploy
                Hide whitespace changes
                Inline Side-by-side
                libraries/ghc-internal/src/GHC/Internal/List.hs
                + 1
                − 1
                View file @ 778ac793
                ......@@ -1619,7 +1619,7 @@ lookup key ((x,y):xys)
                -- >>> concatMap (\i -> [-i, i]) [1, 2, 3]
                -- [-1,1,-2,2,-3,3]
                --
                -- >>> concatMap ('replicate' 3) [0, 2, 4]
                -- >>> concatMap (replicate 3) [0, 2, 4]
                -- [0,0,0,2,2,2,4,4,4]
                concatMap :: (a -> [b]) -> [a] -> [b]
                concatMap f = foldr ((++) . f) []
                ......
                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