forked from GitHub/gf-core
20 lines
358 B
Haskell
20 lines
358 B
Haskell
module PGF.Expr where
|
|
|
|
import PGF.CId
|
|
import qualified Text.PrettyPrint as PP
|
|
import qualified Text.ParserCombinators.ReadP as RP
|
|
|
|
data Expr
|
|
|
|
instance Eq Expr
|
|
instance Ord Expr
|
|
instance Show Expr
|
|
|
|
pFactor :: RP.ReadP Expr
|
|
|
|
ppExpr :: Int -> [CId] -> Expr -> PP.Doc
|
|
|
|
freshName :: CId -> [CId] -> CId
|
|
|
|
ppParens :: Bool -> PP.Doc -> PP.Doc
|