[commit: ghc] master: Comments only (36f2ad5)
git at git.haskell.org
git at git.haskell.org
Sun Feb 15 20:21:54 UTC 2015
Repository : ssh://git@git.haskell.org/ghc
On branch : master
Link : http://ghc.haskell.org/trac/ghc/changeset/36f2ad5db052bd3bf90c0058c030997c408f2a0d/ghc
>---------------------------------------------------------------
commit 36f2ad5db052bd3bf90c0058c030997c408f2a0d
Author: Simon Peyton Jones <simonpj at microsoft.com>
Date: Sun Feb 15 20:14:54 2015 +0000
Comments only
>---------------------------------------------------------------
36f2ad5db052bd3bf90c0058c030997c408f2a0d
compiler/main/HscTypes.hs | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/compiler/main/HscTypes.hs b/compiler/main/HscTypes.hs
index 1965afa..067e9a9 100644
--- a/compiler/main/HscTypes.hs
+++ b/compiler/main/HscTypes.hs
@@ -1410,7 +1410,8 @@ extendInteractiveContext ictxt ids tcs new_cls_insts new_fam_insts defaults new_
-- a new mod_index (Trac #9426)
, ic_tythings = new_tythings ++ old_tythings
, ic_rn_gbl_env = ic_rn_gbl_env ictxt `icExtendGblRdrEnv` new_tythings
- , ic_instances = (new_cls_insts ++ old_cls_insts, new_fam_insts ++ old_fam_insts)
+ , ic_instances = ( new_cls_insts ++ old_cls_insts
+ , new_fam_insts ++ old_fam_insts )
, ic_default = defaults }
where
new_tythings = map AnId ids ++ map ATyCon tcs ++ map (AConLike . PatSynCon) new_patsyns
More information about the ghc-commits
mailing list