diff options
| -rw-r--r-- | compiler/main/HscTypes.lhs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/main/HscTypes.lhs b/compiler/main/HscTypes.lhs index 1004a6b463..a3c6a65802 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 } |