module GHC.GHCi.Helpers
( disableBuffering, flushAll
, evalWrapper
) where
import System.IO
import System.Environment
disableBuffering :: IO ()
disableBuffering :: IO ()
disableBuffering = do
Handle -> BufferMode -> IO ()
hSetBuffering Handle
stdin BufferMode
NoBuffering
Handle -> BufferMode -> IO ()
hSetBuffering Handle
stdout BufferMode
NoBuffering
Handle -> BufferMode -> IO ()
hSetBuffering Handle
stderr BufferMode
NoBuffering
flushAll :: IO ()
flushAll :: IO ()
flushAll = do
Handle -> IO ()
hFlush Handle
stdout
Handle -> IO ()
hFlush Handle
stderr
evalWrapper :: String -> [String] -> IO a -> IO a
evalWrapper :: forall a. String -> [String] -> IO a -> IO a
evalWrapper String
progName [String]
args IO a
m =
forall a. String -> IO a -> IO a
withProgName String
progName (forall a. [String] -> IO a -> IO a
withArgs [String]
args IO a
m)