diff options
Diffstat (limited to 'libraries/base/Data/Typeable/Internal.hs')
| -rw-r--r-- | libraries/base/Data/Typeable/Internal.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libraries/base/Data/Typeable/Internal.hs b/libraries/base/Data/Typeable/Internal.hs index 4ccbd5fd52..274efb8ade 100644 --- a/libraries/base/Data/Typeable/Internal.hs +++ b/libraries/base/Data/Typeable/Internal.hs @@ -934,7 +934,7 @@ mkTyCon# pkg modl name n_kinds kind_rep (unpackCStringUtf8# name) -- it is extremely important that this fingerprint computation --- remains in sync with that in TcTypeable to ensure that type +-- remains in sync with that in GHC.Tc.Instance.Typeable to ensure that type -- equality is correct. -- | Exquisitely unsafe. @@ -954,7 +954,7 @@ mkTyCon pkg modl name (I# n_kinds) kind_rep fingerprint :: Fingerprint fingerprint = mkTyConFingerprint pkg modl name --- This must match the computation done in TcTypeable.mkTyConRepTyConRHS. +-- This must match the computation done in GHC.Tc.Instance.Typeable.mkTyConRepTyConRHS. mkTyConFingerprint :: String -- ^ package name -> String -- ^ module name -> String -- ^ tycon name |