19 lines
503 B
Haskell
19 lines
503 B
Haskell
|
module AnsiMain where
|
||
|
|
|
||
|
|
import GHCup
|
||
|
|
import GHCup.Download
|
||
|
|
import GHCup.Errors
|
||
|
|
import GHCup.Types.Optics ( getDirs )
|
||
|
|
import GHCup.Types hiding ( LeanAppState(..) )
|
||
|
|
import GHCup.Utils
|
||
|
|
import GHCup.Prelude ( decUTF8Safe )
|
||
|
|
import GHCup.Prelude.File
|
||
|
|
import GHCup.Prelude.Logger
|
||
|
|
import GHCup.Prelude.Process
|
||
|
|
|
||
|
|
ansiMain :: AppState
|
||
|
|
-> IO ()
|
||
|
|
ansiMain s = do
|
||
|
|
putStrLn "ansi terminal"
|
||
|
|
pure ()
|