[commit: ghc] master: White space only (cf788a5)

git at git.haskell.org git at git.haskell.org
Tue Jan 26 10:48:48 UTC 2016


Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/cf788a53df3ada686ec516c2edffeb54b632065f/ghc

>---------------------------------------------------------------

commit cf788a53df3ada686ec516c2edffeb54b632065f
Author: Simon Peyton Jones <simonpj at microsoft.com>
Date:   Tue Jan 26 09:00:57 2016 +0000

    White space only


>---------------------------------------------------------------

cf788a53df3ada686ec516c2edffeb54b632065f
 compiler/coreSyn/CoreSubst.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/compiler/coreSyn/CoreSubst.hs b/compiler/coreSyn/CoreSubst.hs
index a3ab970..8d4529a 100644
--- a/compiler/coreSyn/CoreSubst.hs
+++ b/compiler/coreSyn/CoreSubst.hs
@@ -542,8 +542,8 @@ cloneBndrs subst us vs
 
 cloneBndr :: Subst -> Unique -> Var -> (Subst, Var)
 cloneBndr subst uniq v
-      | isTyVar v = cloneTyVarBndr subst v uniq
-      | otherwise = clone_id subst subst (v,uniq)  -- Works for coercion variables too
+  | isTyVar v = cloneTyVarBndr subst v uniq
+  | otherwise = clone_id subst subst (v,uniq)  -- Works for coercion variables too
 
 -- | Clone a mutually recursive group of 'Id's
 cloneRecIdBndrs :: Subst -> UniqSupply -> [Id] -> (Subst, [Id])



More information about the ghc-commits mailing list