-
Notifications
You must be signed in to change notification settings - Fork 9
/
Copy pathexternal.hs
61 lines (60 loc) · 2.43 KB
/
external.hs
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
-- Common import statements for external libraries.
-- Intended to include by CPP.
import qualified CMark
import Control.Applicative ((<|>), optional, (<**>))
import qualified Control.Error as Error
import Control.Exception
( Exception
, SomeException
, bracket_
, catch
, throwIO
, throw
)
import Control.Monad (void, unless)
import Control.Monad.IO.Class (liftIO)
import qualified Control.Monad.Trans.Maybe as MaybeT
import Data.Bool (bool)
import Data.ByteString.Lazy.Char8 (ByteString)
import qualified Data.ByteString.Lazy.Char8 as ByteString
import qualified Data.Char as Char
import Data.Functor (($>))
import qualified Data.List as List
import Data.Maybe (fromMaybe, maybeToList, isJust)
import Data.IORef
( newIORef
, readIORef
, writeIORef
)
import Data.Monoid ((<>))
import qualified Data.Text.Encoding.Error as TextEncoding
import Data.Text.Lazy (Text)
import qualified Data.Text.Lazy as Text
import qualified Data.Text.Lazy.IO as Text
import qualified Data.Text.Lazy.Encoding as TextEncoding
import qualified Data.Text as TextS
import qualified Data.Text.IO as TextS
import Data.Typeable (Typeable)
import qualified Debug.Trace as Debug
import GHC.Generics (Generic)
import qualified GHC.SyntaxHighlighter as GHC
import Numeric.Natural (Natural)
import qualified Paths_makeMistakesToLearnHaskell as Paths
import Safe (headMay)
import qualified System.Directory as Dir
import qualified System.Environment as Env
import qualified System.Exit as Exit
import System.Exit (ExitCode(ExitSuccess, ExitFailure))
import System.FilePath ((</>))
import qualified System.IO as IO
import System.Process.Typed (readProcess)
import qualified System.Process.Typed as Process
import qualified Test.QuickCheck as QuickCheck
import Test.QuickCheck (Arbitrary, Gen, quickCheckWithResult, arbitrary)
import qualified Text.Regex.Applicative as Regex
import qualified Web.Browser as Browser
#ifdef mingw32_HOST_OS
import qualified System.Win32.Console as Win32
import GHC.IO.Encoding.CodePage (mkLocaleEncoding)
import GHC.IO.Encoding.Failure (CodingFailureMode(TransliterateCodingFailure))
#endif