Repository : ssh://darcs.haskell.org//srv/darcs/ghc On branch : master
http://hackage.haskell.org/trac/ghc/changeset/b1b49b88b811885357d6a6c7339b0d08c588622b >--------------------------------------------------------------- commit b1b49b88b811885357d6a6c7339b0d08c588622b Author: Michal Terepeta <[email protected]> Date: Mon Nov 21 21:36:17 2011 +0100 Fix comments. >--------------------------------------------------------------- compiler/coreSyn/CoreSyn.lhs | 6 +++--- 1 files changed, 3 insertions(+), 3 deletions(-) diff --git a/compiler/coreSyn/CoreSyn.lhs b/compiler/coreSyn/CoreSyn.lhs index a8dbbce..3258d3d 100644 --- a/compiler/coreSyn/CoreSyn.lhs +++ b/compiler/coreSyn/CoreSyn.lhs @@ -1003,7 +1003,7 @@ instance Outputable b => OutputableBndr (TaggedBndr b) where \begin{code} -- | Apply a list of argument expressions to a function expression in a nested fashion. Prefer to --- use 'CoreUtils.mkCoreApps' if possible +-- use 'MkCore.mkCoreApps' if possible mkApps :: Expr b -> [Arg b] -> Expr b -- | Apply a list of type argument expressions to a function expression in a nested fashion mkTyApps :: Expr b -> [Type] -> Expr b @@ -1073,10 +1073,10 @@ mkDoubleLit d = Lit (mkMachDouble d) mkDoubleLitDouble d = Lit (mkMachDouble (toRational d)) -- | Bind all supplied binding groups over an expression in a nested let expression. Prefer to --- use 'CoreUtils.mkCoreLets' if possible +-- use 'MkCore.mkCoreLets' if possible mkLets :: [Bind b] -> Expr b -> Expr b -- | Bind all supplied binders over an expression in a nested lambda expression. Prefer to --- use 'CoreUtils.mkCoreLams' if possible +-- use 'MkCore.mkCoreLams' if possible mkLams :: [b] -> Expr b -> Expr b mkLams binders body = foldr Lam body binders _______________________________________________ Cvs-ghc mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-ghc
