forked from GitHub/gf-core
Comment out some dead code found with -fwarn-unused-binds
Also fixed some warnings and tightened some imports
This commit is contained in:
@@ -78,8 +78,8 @@ keepSymbol _ = True
|
||||
showToken :: Token -> Doc
|
||||
showToken = pp . map toLower
|
||||
|
||||
isPunct :: Char -> Bool
|
||||
isPunct c = c `elem` "-_.:;.,?!()[]{}"
|
||||
--isPunct :: Char -> Bool
|
||||
--isPunct c = c `elem` "-_.:;.,?!()[]{}"
|
||||
|
||||
comment :: String -> Doc
|
||||
comment s = ";" <+> s
|
||||
|
||||
Reference in New Issue
Block a user