Turn NameCacheUpdater into a newtype
authorPatrick Palka <patrick@parcs.ath.cx>
Sat, 9 Nov 2013 19:23:15 +0000 (14:23 -0500)
committerPatrick Palka <patrick@parcs.ath.cx>
Wed, 13 Nov 2013 02:55:45 +0000 (21:55 -0500)
compiler/iface/IfaceEnv.lhs

index 1410675..ef102e4 100644 (file)
@@ -235,7 +235,7 @@ updNameCache upd_fn = do
 -- | A function that atomically updates the name cache given a modifier
 -- function.  The second result of the modifier function will be the result
 -- of the IO action.
-data NameCacheUpdater = NCU { updateNameCache :: forall c. (NameCache -> (NameCache, c)) -> IO c }
+newtype NameCacheUpdater = NCU { updateNameCache :: forall c. (NameCache -> (NameCache, c)) -> IO c }
 
 -- | Return a function to atomically update the name cache.
 mkNameCacheUpdater :: TcRnIf a b NameCacheUpdater