Commit 858a5b26 authored by simonpj@microsoft.com's avatar simonpj@microsoft.com
Browse files

Layout only

parent f92dd77c
......@@ -164,9 +164,8 @@ mkUsedNames
TcGblEnv{ tcg_inst_uses = dfun_uses_var,
tcg_dus = dus
}
= do
dfun_uses <- readIORef dfun_uses_var -- What dfuns are used
return (allUses dus `unionNameSets` dfun_uses)
= do { dfun_uses <- readIORef dfun_uses_var -- What dfuns are used
; return (allUses dus `unionNameSets` dfun_uses) }
mkDependencies :: TcGblEnv -> IO Dependencies
mkDependencies
......
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