[commit: ghc] wip/names3: TysWiredIn: Fix comment (aee6465)

git at git.haskell.org git at git.haskell.org
Thu Sep 8 18:52:09 UTC 2016


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

On branch  : wip/names3
Link       : http://ghc.haskell.org/trac/ghc/changeset/aee6465e0d498579169457af09f8073a92ca1982/ghc

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

commit aee6465e0d498579169457af09f8073a92ca1982
Author: Ben Gamari <ben at smart-cactus.org>
Date:   Sat Aug 20 17:06:14 2016 -0400

    TysWiredIn: Fix comment


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

aee6465e0d498579169457af09f8073a92ca1982
 compiler/prelude/TysWiredIn.hs | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/compiler/prelude/TysWiredIn.hs b/compiler/prelude/TysWiredIn.hs
index cd0d7e2..27a1f4f 100644
--- a/compiler/prelude/TysWiredIn.hs
+++ b/compiler/prelude/TysWiredIn.hs
@@ -198,12 +198,12 @@ names in PrelNames, so they use wTcQual, wDataQual, etc
 -- See also Note [Known-key names]
 wiredInTyCons :: [TyCon]
 
-wiredInTyCons = [ unitTyCon     -- Not treated like other tuples, because
-                                -- it's defined in GHC.Base, and there's only
-                                -- one of it.  We put it in wiredInTyCons so
-                                -- that it'll pre-populate the name cache, so
-                                -- the special case in lookupOrigNameCache
-                                -- doesn't need to look out for it
+wiredInTyCons = [ -- Units are not treated like other tuples, because then
+                  -- are defined in GHC.Base, and there's only a few of them. We
+                  -- put them in wiredInTyCons so that they will pre-populate
+                  -- the name cache, so the parser in isBuiltInOcc_maybe doesn't
+                  -- need to look out for them.
+                  unitTyCon
                 , unboxedUnitTyCon
                 , anyTyCon
                 , boolTyCon



More information about the ghc-commits mailing list