From: simonpj@microsoft.com Date: Tue, 27 Jul 2010 14:15:39 +0000 (+0000) Subject: Layout only X-Git-Tag: 2010-11-18~398 X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=d2ca68e80206520e7468e9bea053573d1026433e;p=ghc-hetmet.git Layout only --- diff --git a/compiler/coreSyn/CoreLint.lhs b/compiler/coreSyn/CoreLint.lhs index c69a9d2..732ab7a 100644 --- a/compiler/coreSyn/CoreLint.lhs +++ b/compiler/coreSyn/CoreLint.lhs @@ -213,8 +213,7 @@ lintCoreExpr (Var var) ; checkDeadIdOcc var ; var' <- lookupIdInScope var - ; return (idType var') - } + ; return (idType var') } lintCoreExpr (Lit lit) = return (literalType lit)