@@ -33,6 +33,7 @@ toDoc filePath (Report title _ _ message) =
3333 messageBar title filePath
3434 <> hardline <> hardline <>
3535 message
36+ <> hardline <> hardline
3637
3738
3839messageBar :: String -> FilePath -> Doc
@@ -58,7 +59,6 @@ toCodeSnippet source region highlight (preHint, postHint) =
5859 Code.render source region highlight
5960 <> hardline <>
6061 postHint
61− <> hardline <> hardline
6262
6363
6464toCodePair :: Code.Source -> R.Region -> R.Region -> (Doc, Doc) -> (Doc, Doc, Doc) -> Doc