Useless brackets

This commit is contained in:
Daniel Gröber 2016-07-17 22:42:26 +02:00
parent f35ebbbab9
commit d92eecbc90

View File

@ -85,7 +85,7 @@ initSession opts mdf = do
df <- liftIO $ hsc_dflags <$> readIORef hsc_env_ref
changed <-
withLightHscEnv' (initDF crdl) $ \hsc_env ->
return $ not $ (hsc_dflags hsc_env) `eqDynFlags` df
return $ not $ hsc_dflags hsc_env `eqDynFlags` df
if changed
then do