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 ()
|