on cee9f6a help sign in
11 lines 213 B history raw
2module SourceSyntax.Helpers where
4import Data.Char (isSymbol)
6brkt s = "{ " ++ s ++ " }"
8parens s = "(" ++ s ++ ")"
9parensIf b s = if b then parens s else s
11isOp c = isSymbol c || elem c "+-/*=.$<>:&|^?%#@~!"