git.iko.soy/rowtype-yoga/purescript-native
on golang help sign in
Merge pull request #1145 from purescript/comments-before-instances
c3342eeGary Burgess
src/Language/PureScript/Docs/AsMarkdown.hs+3−4
compare with golang
unifiedsplit
@@ -44,14 +44,13 @@ declAsMarkdown RenderedDeclaration{..} = do
44 zipWithM_ (\f c -> tell' (childToString f c)) (First : repeat NotFirst) children
44 zipWithM_ (\f c -> tell' (childToString f c)) (First : repeat NotFirst) children
45 spacer
45 spacer
46
46
47+ for_ rdComments tell'
48+
47 unless (null instances) $ do
49 unless (null instances) $ do
48 headerLevel 5 "Instances"
50 headerLevel 5 "Instances"
49− fencedBlock $ do
50− mapM_ (tell' . childToString NotFirst) instances
51+ fencedBlock $ mapM_ (tell' . childToString NotFirst) instances
51 spacer
52 spacer
52
53
53− for_ rdComments tell'
54−
55codeToString :: RenderedCode -> String
54codeToString :: RenderedCode -> String
56codeToString = outputWith elemAsMarkdown
55codeToString = outputWith elemAsMarkdown
57 where
56 where