git.iko.soy/rowtype-yoga/purescript-native
on golang help sign in
Fix Docs Render compilation with GHC 7.10.1
b29a328Brian McKenna
src/Language/PureScript/Docs/Render.hs+1
compare with golang
unifiedsplit
@@ -101,6 +101,7 @@ addDefaultFixity rd@RenderedDeclaration{..}
101 | isOp rdTitle && isNothing rdFixity = rd { rdFixity = Just defaultFixity }
101 | isOp rdTitle && isNothing rdFixity = rd { rdFixity = Just defaultFixity }
102 | otherwise = rd
102 | otherwise = rd
103 where
103 where
104+ isOp :: String -> Bool
104 isOp str = "(" `isPrefixOf` str && ")" `isSuffixOf` str
105 isOp str = "(" `isPrefixOf` str && ")" `isSuffixOf` str
105 defaultFixity = P.Fixity P.Infixl (-1)
106 defaultFixity = P.Fixity P.Infixl (-1)
106
107