Language.Haskell.TH.PprLib

Monadic front-end to Text.PrettyPrint

The document type

type Doc = PprM Doc

data PprM a

Instances

Monad PprM

Methods

(>>=) :: PprM a -> (a -> PprM b) -> PprM b

(>>) :: PprM a -> PprM b -> PprM b

return :: a -> PprM a

fail :: String -> PprM a

Functor PprM

Methods

fmap :: (a -> b) -> PprM a -> PprM b

(<$) :: a -> PprM b -> PprM a

Show Doc

Methods

showsPrec :: Int -> Doc -> ShowS

show :: Doc -> String

showList :: [Doc] -> ShowS

Applicative PprM

Methods

pure :: a -> PprM a

(<*>) :: PprM (a -> b) -> PprM a -> PprM b

liftA2 :: (a -> b -> c) -> PprM a -> PprM b -> PprM c

(*>) :: PprM a -> PprM b -> PprM b

(<*) :: PprM a -> PprM b -> PprM a

Primitive Documents

empty :: Doc

An empty document

semi :: Doc

A ';' character

comma :: Doc

A ',' character

colon :: Doc

A : character

dcolon :: Doc

A "::" string

space :: Doc

A space character

equals :: Doc

A '=' character

arrow :: Doc

A "->" string

lparen :: Doc

A '(' character

rparen :: Doc

A ')' character

lbrack :: Doc

A '[' character

rbrack :: Doc

A ']' character

lbrace :: Doc

A '{' character

rbrace :: Doc

A '}' character

Converting values into documents

text :: String -> Doc

char :: Char -> Doc

ptext :: String -> Doc

int :: Int -> Doc

integer :: Integer -> Doc

float :: Float -> Doc

double :: Double -> Doc

rational :: Rational -> Doc

Wrapping documents in delimiters

parens :: Doc -> Doc

Wrap document in (...)

brackets :: Doc -> Doc

Wrap document in [...]

braces :: Doc -> Doc

Wrap document in {...}

quotes :: Doc -> Doc

Wrap document in '...'

doubleQuotes :: Doc -> Doc

Wrap document in "..."

Combining documents

(<>) :: Doc -> Doc -> Doc infixl 6

Beside

(<+>) :: Doc -> Doc -> Doc infixl 6

Beside, separated by space

hcat :: [Doc] -> Doc

List version of <>

hsep :: [Doc] -> Doc

List version of <+>

($$) :: Doc -> Doc -> Doc infixl 5

Above; if there is no overlap it "dovetails" the two

($+$) :: Doc -> Doc -> Doc infixl 5

Above, without dovetailing.

vcat :: [Doc] -> Doc

List version of $$

sep :: [Doc] -> Doc

Either hsep or vcat

cat :: [Doc] -> Doc

Either hcat or vcat

fsep :: [Doc] -> Doc

"Paragraph fill" version of sep

fcat :: [Doc] -> Doc

"Paragraph fill" version of cat

nest :: Int -> Doc -> Doc

Nested

hang :: Doc -> Int -> Doc -> Doc

hang d1 n d2 = sep [d1, nest n d2]

punctuate

Arguments

:: Doc

-> [Doc]

-> [Doc]

punctuate p [d1, ... dn] = [d1 <> p, d2 <> p, ... dn-1 <> p, dn]

Predicates on documents

isEmpty :: Doc -> PprM Bool

Returns True if the document is empty

to_HPJ_Doc :: Doc -> Doc

pprName :: Name -> Doc

pprName' :: NameIs -> Name -> Doc