Commit bed118a4 authored by parcs's avatar parcs
Browse files

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.
parent 54957b6e
......@@ -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
}
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment