[commit: ghc] master: Add a blank line (3b932cc)
git at git.haskell.org
git at git.haskell.org
Wed Apr 22 08:49:29 UTC 2015
Repository : ssh://git@git.haskell.org/ghc
On branch : master
Link : http://ghc.haskell.org/trac/ghc/changeset/3b932cc0ad885cc6eb9cef49fc1fe96bb9ff241e/ghc
>---------------------------------------------------------------
commit 3b932cc0ad885cc6eb9cef49fc1fe96bb9ff241e
Author: Simon Peyton Jones <simonpj at microsoft.com>
Date: Wed Apr 22 07:48:18 2015 +0100
Add a blank line
>---------------------------------------------------------------
3b932cc0ad885cc6eb9cef49fc1fe96bb9ff241e
compiler/coreSyn/CoreArity.hs | 1 +
1 file changed, 1 insertion(+)
diff --git a/compiler/coreSyn/CoreArity.hs b/compiler/coreSyn/CoreArity.hs
index 47c8085..79e3463 100644
--- a/compiler/coreSyn/CoreArity.hs
+++ b/compiler/coreSyn/CoreArity.hs
@@ -111,6 +111,7 @@ typeArity ty
| Just (arg,res) <- splitFunTy_maybe ty
= typeOneShot arg : go rec_nts res
+
| Just (tc,tys) <- splitTyConApp_maybe ty
, Just (ty', _) <- instNewTyCon_maybe tc tys
, Just rec_nts' <- checkRecTc rec_nts tc -- See Note [Expanding newtypes]
More information about the ghc-commits
mailing list