mirror of
https://github.com/chrisdone/duet.git
synced 2025-01-08 23:18:45 +03:00
Add buffering
This commit is contained in:
parent
186d4dbf85
commit
67c561e3be
@ -22,6 +22,7 @@ import Duet.Simple
|
|||||||
import Duet.Stepper
|
import Duet.Stepper
|
||||||
import Duet.Types
|
import Duet.Types
|
||||||
import Options.Applicative.Simple
|
import Options.Applicative.Simple
|
||||||
|
import System.IO
|
||||||
|
|
||||||
data Run = Run
|
data Run = Run
|
||||||
{ runInputFile :: FilePath
|
{ runInputFile :: FilePath
|
||||||
@ -34,6 +35,8 @@ data Run = Run
|
|||||||
|
|
||||||
main :: IO ()
|
main :: IO ()
|
||||||
main = do
|
main = do
|
||||||
|
hSetBuffering stdout LineBuffering
|
||||||
|
hSetBuffering stdin LineBuffering
|
||||||
((), cmd) <-
|
((), cmd) <-
|
||||||
simpleOptions
|
simpleOptions
|
||||||
"1.0"
|
"1.0"
|
||||||
|
Loading…
Reference in New Issue
Block a user