[commit: ghc] master: Make the fields in NameCache strict (bed118a)

[git at git.haskell.org]

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

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

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

commit bed118a43019e02ca0bc763fa6e41845b1deb21f
Author: Patrick Palka <patrick at parcs.ath.cx>
Date:   Sat Nov 9 14:23:46 2013 -0500

    Make the fields in NameCache strict
    
    We've already been making sure to strictly modify the global name cache
    in order to avoid space leaks.  However, that does us little good if the
    fields of the name cache are not made strict as well.


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

bed118a43019e02ca0bc763fa6e41845b1deb21f
 compiler/main/HscTypes.lhs |    4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/compiler/main/HscTypes.lhs b/compiler/main/HscTypes.lhs
index 1004a6b..a3c6a65 100644
--- a/compiler/main/HscTypes.lhs
+++ b/compiler/main/HscTypes.lhs
@@ -2033,9 +2033,9 @@ its binding site, we fix it up.
 -- each original name; i.e. (module-name, occ-name) pair and provides
 -- something of a lookup mechanism for those names.
 data NameCache
- = NameCache {  nsUniqs :: UniqSupply,
+ = NameCache {  nsUniqs :: !UniqSupply,
                 -- ^ Supply of uniques
-                nsNames :: OrigNameCache
+                nsNames :: !OrigNameCache
                 -- ^ Ensures that one original name gets one unique
    }