807076ad57
CSaveEnv is a special constraint that indicates that the current environment should be saved for later use. (/\) now optimizes away arguments that are already CTrue.
13 lines
No EOL
250 B
Haskell
13 lines
No EOL
250 B
Haskell
|
|
module Type.PrettyPrint where
|
|
|
|
import Text.PrettyPrint
|
|
|
|
data ParensWhen = Fn | App | Never
|
|
|
|
class PrettyType a where
|
|
pretty :: ParensWhen -> a -> Doc
|
|
|
|
commaSep docs = sep (punctuate comma docs)
|
|
|
|
parensIf bool doc = if bool then parens doc else doc |