|
definition:
|
trExpr :: (CVarIName -> a)
-> (CLiteral -> a)
-> (QName -> a)
-> (a -> a -> a)
-> ([CPattern] -> a -> a)
-> ([CLocalDecl] -> a -> a)
-> ([CStatement] -> a)
-> (a -> [CStatement] -> a)
-> (CCaseType -> a -> [(CPattern, CRhs)] -> a)
-> (a -> CQualTypeExpr -> a)
-> (QName -> [CField a] -> a)
-> (a -> [CField a] -> a)
-> CExpr -> a
trExpr var lit sym app lam clet cdo lcomp cas typ rcon rupd exp = trE exp
where
trE (CVar n) = var n
trE (CLit l) = lit l
trE (CSymbol n) = sym n
trE (CApply e1 e2) = app (trE e1) (trE e2)
trE (CLambda pats e) = lam pats (trE e)
trE (CLetDecl ls e) = clet ls (trE e)
trE (CDoExpr stm) = cdo stm
trE (CListComp e stm) = lcomp (trE e) stm
trE (CCase ct e branches) = cas ct (trE e) branches
trE (CTyped e te) = typ (trE e) te
trE (CRecConstr rn fds) = rcon rn (map (\ (lb,e) -> (lb, trE e)) fds)
trE (CRecUpdate e fds) = rupd (trE e) (map (\ (lb,v) -> (lb, trE v)) fds)
|
|
demand:
|
argument 13
|
|
deterministic:
|
deterministic operation
|
|
documentation:
|
--- Transforms an expression.
|
|
failfree:
|
(_, _, _, _, _, _, _, _, _, _, _, _, _)
|
|
indeterministic:
|
referentially transparent operation
|
|
infix:
|
no fixity defined
|
|
iotype:
|
{(_,_,_,_,_,_,_,_,_,_,_,_,_) |-> _}
|
|
name:
|
trExpr
|
|
precedence:
|
no precedence defined
|
|
result-values:
|
_
|
|
signature:
|
((Prelude.Int, String) -> a) -> (AbstractCurry.Types.CLiteral -> a)
-> ((String, String) -> a) -> (a -> a -> a) -> ([AbstractCurry.Types.CPattern]
-> a -> a) -> ([AbstractCurry.Types.CLocalDecl] -> a -> a)
-> ([AbstractCurry.Types.CStatement] -> a) -> (a
-> [AbstractCurry.Types.CStatement] -> a) -> (AbstractCurry.Types.CCaseType -> a
-> [(AbstractCurry.Types.CPattern, AbstractCurry.Types.CRhs)] -> a) -> (a
-> AbstractCurry.Types.CQualTypeExpr -> a) -> ((String, String)
-> [((String, String), a)] -> a) -> (a -> [((String, String), a)] -> a)
-> AbstractCurry.Types.CExpr -> a
|
|
solution-complete:
|
operation might suspend on free variables
|
|
terminating:
|
possibly non-terminating
|
|
totally-defined:
|
reducible on all ground data terms
|