diff options
| author | Twan van Laarhoven <twanvl@gmail.com> | 2008-01-17 21:52:33 +0000 |
|---|---|---|
| committer | Twan van Laarhoven <twanvl@gmail.com> | 2008-01-17 21:52:33 +0000 |
| commit | 36fa8c4890e439fe8c2a4682df2a877fa2cc606b (patch) | |
| tree | c8732bc3bca169b19296e2c5e9c844cfc2b13339 /compiler/iface | |
| parent | 93ed9b8d722f093aea5fa0508ed1efb6e407a81a (diff) | |
| download | haskell-36fa8c4890e439fe8c2a4682df2a877fa2cc606b.tar.gz | |
Replace remaining uses of ioToIOEnv by liftIO, remove ioToIOEnv
Diffstat (limited to 'compiler/iface')
| -rw-r--r-- | compiler/iface/BinIface.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/iface/BinIface.hs b/compiler/iface/BinIface.hs index 4f2457c341..12bde11734 100644 --- a/compiler/iface/BinIface.hs +++ b/compiler/iface/BinIface.hs @@ -54,7 +54,7 @@ import Control.Monad readBinIface :: FilePath -> TcRnIf a b ModIface readBinIface hi_path = do nc <- getNameCache - (new_nc, iface) <- ioToIOEnv $ readBinIface_ hi_path nc + (new_nc, iface) <- liftIO $ readBinIface_ hi_path nc setNameCache new_nc return iface |