[commit: ghc] master: Comments only (on IfDataInstance) (291b0f8)

git at git.haskell.org git at git.haskell.org
Thu Sep 13 13:01:21 UTC 2018


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

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

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

commit 291b0f89703f28631a381549e1838aa06195d011
Author: Simon Peyton Jones <simonpj at microsoft.com>
Date:   Thu Sep 13 09:18:25 2018 +0100

    Comments only (on IfDataInstance)


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

291b0f89703f28631a381549e1838aa06195d011
 compiler/iface/IfaceSyn.hs | 10 ++++++----
 1 file changed, 6 insertions(+), 4 deletions(-)

diff --git a/compiler/iface/IfaceSyn.hs b/compiler/iface/IfaceSyn.hs
index 9fcf5dc..2784dda 100644
--- a/compiler/iface/IfaceSyn.hs
+++ b/compiler/iface/IfaceSyn.hs
@@ -182,9 +182,11 @@ data IfaceClassBody
 
 data IfaceTyConParent
   = IfNoParent
-  | IfDataInstance IfExtName
-                   IfaceTyCon
-                   IfaceAppArgs
+  | IfDataInstance
+       IfExtName     -- Axiom name
+       IfaceTyCon    -- Family TyCon (pretty-printing only, not used in TcIface)
+                     -- see Note [Pretty printing via IfaceSyn] in PprTyThing
+       IfaceAppArgs  -- Arguments of the family TyCon
 
 data IfaceFamTyConFlav
   = IfaceDataFamilyTyCon                      -- Data family
@@ -192,7 +194,7 @@ data IfaceFamTyConFlav
   | IfaceClosedSynFamilyTyCon (Maybe (IfExtName, [IfaceAxBranch]))
     -- ^ Name of associated axiom and branches for pretty printing purposes,
     -- or 'Nothing' for an empty closed family without an axiom
-    -- See Note [Pretty-printing via IfaceSyn] in PprTyThing
+    -- See Note [Pretty printing via IfaceSyn] in PprTyThing
   | IfaceAbstractClosedSynFamilyTyCon
   | IfaceBuiltInSynFamTyCon -- for pretty printing purposes only
 



More information about the ghc-commits mailing list