module Tonalude.Prelude.IO
( withLazyFile
, readFileBinary
, writeFileBinary
, readFileUtf8
, writeFileUtf8
, hPutBuilder
) where
import RIO hiding
( withLazyFile
, readFileBinary
, writeFileBinary
, readFileUtf8
, writeFileUtf8
, hPutBuilder
)
import qualified RIO
import qualified Data.ByteString as B ()
import qualified Data.ByteString.Lazy as BL
withLazyFile :: FilePath -> (BL.ByteString -> RIO env a) -> RIO env a
withLazyFile = RIO.withLazyFile
writeFileUtf8 :: FilePath -> Text -> RIO env ()
writeFileUtf8 = RIO.writeFileUtf8
hPutBuilder :: Handle -> Builder -> RIO env ()
hPutBuilder = RIO.hPutBuilder
readFileBinary :: FilePath -> RIO env ByteString
readFileBinary = RIO.readFileBinary
writeFileBinary :: FilePath -> ByteString -> RIO env ()
writeFileBinary = RIO.writeFileBinary
readFileUtf8 :: FilePath -> RIO env Text
readFileUtf8 = RIO.readFileUtf8