shithub: MicroHs

ref: 7f952c8f7f08adf3242fe8a3ef2300772a6099b6
dir: /lib/Data/Text/Lazy/IO.hs/

View raw version 
module Data.Text.Lazy.IO(readFile, writeFile) where
import Prelude hiding (readFile, writeFile)
import qualified Prelude as P
import Data.Text.Lazy

readFile :: FilePath -> IO Text
readFile fn = pack <$> P.readFile fn

writeFile :: FilePath -> Text -> IO ()
writeFile fn t = P.writeFile fn (unpack t)