Dummy implementations of openBinaryFile and hSetBinaryMode for nhc98.
-- * Binary input and output
-- * Binary input and output
openBinaryFile, -- :: FilePath -> IOMode -> IO Handle
hSetBinaryMode, -- :: Handle -> Bool -> IO ()
openBinaryFile, -- :: FilePath -> IOMode -> IO Handle
hSetBinaryMode, -- :: Handle -> Bool -> IO ()
hPutBuf, -- :: Handle -> Ptr a -> Int -> IO ()
hGetBuf, -- :: Handle -> Ptr a -> Int -> IO Int
#endif
hPutBuf, -- :: Handle -> Ptr a -> Int -> IO ()
hGetBuf, -- :: Handle -> Ptr a -> Int -> IO Int
#endif
, FilePath -- :: String
)
import NHC.IOExtras (fixIO)
, FilePath -- :: String
)
import NHC.IOExtras (fixIO)
+openBinaryFile = openFile
+hSetBinaryMode _ _ = return ()
#endif
import System.IO.Error (
#endif
import System.IO.Error (