{-# LANGUAGE OverloadedStrings #-}
module Haskell.Debug.Adapter.Constant where
import qualified Data.Version as V
_INI_SEC_DEF :: String
_INI_SEC_DEF :: String
_INI_SEC_DEF = String
"DEFAULT"
_INI_DEF_WORK_DIR :: String
_INI_DEF_WORK_DIR :: String
_INI_DEF_WORK_DIR = String
"work_dir"
_INI_SEC_LOG :: String
_INI_SEC_LOG :: String
_INI_SEC_LOG = String
"LOG"
_INI_LOG_FILE :: String
_INI_LOG_FILE :: String
_INI_LOG_FILE = String
"file"
_INI_LOG_LEVEL :: String
_INI_LOG_LEVEL :: String
_INI_LOG_LEVEL = String
"level"
_LOG_NAME :: String
_LOG_NAME :: String
_LOG_NAME = String
"HDA"
_LOG_REQUEST :: String
_LOG_REQUEST :: String
_LOG_REQUEST = String
"REQUEST"
_LOG_RESPONSE :: String
_LOG_RESPONSE :: String
_LOG_RESPONSE = String
"RESPONSE"
_LOG_APP :: String
_LOG_APP :: String
_LOG_APP = String
"APP"
_LOG_THREAD_MGR :: String
_LOG_THREAD_MGR :: String
_LOG_THREAD_MGR = String
"THREAD_MGR"
_LOG_EVENT :: String
_LOG_EVENT :: String
_LOG_EVENT = String
"EVENT"
_LOG_GHCI_STDOUT :: String
_LOG_GHCI_STDOUT :: String
_LOG_GHCI_STDOUT = String
"GHCI_STDOUT"
_LOG_WATCH :: String
_LOG_WATCH :: String
_LOG_WATCH = String
"WATCH"
_LOG_FORMAT :: String
_LOG_FORMAT :: String
_LOG_FORMAT = String
"$time [$pid($tid)] $prio $loggername - $msg"
_LOG_FORMAT_DATE :: String
_LOG_FORMAT_DATE :: String
_LOG_FORMAT_DATE = String
"%Y-%m-%d %H:%M:%S.%q"
_CONTENT_LENGTH :: String
_CONTENT_LENGTH :: String
_CONTENT_LENGTH = String
"Content-Length: "
_TWO_CRLF :: String
_TWO_CRLF :: String
_TWO_CRLF = String
"\r\n\r\n"
_1_MILLI_SEC :: Int
_1_MILLI_SEC :: Int
_1_MILLI_SEC = Int
1 forall a. Num a => a -> a -> a
* Int
1000
_10_MILLI_SEC :: Int
_10_MILLI_SEC :: Int
_10_MILLI_SEC = Int
10 forall a. Num a => a -> a -> a
* Int
1000
_100_MILLI_SEC :: Int
_100_MILLI_SEC :: Int
_100_MILLI_SEC = Int
100 forall a. Num a => a -> a -> a
* Int
1000
_1_SEC :: Int
_1_SEC :: Int
_1_SEC = Int
1000 forall a. Num a => a -> a -> a
* Int
1000
_SEP_WIN :: Char
_SEP_WIN :: Char
_SEP_WIN = Char
'\\'
_SEP_UNIX :: Char
_SEP_UNIX :: Char
_SEP_UNIX = Char
'/'
_GHCI_PROMPT :: String
_GHCI_PROMPT :: String
_GHCI_PROMPT = String
"Prelude> "
_GHCI_PROMPT_HDA :: String
_GHCI_PROMPT_HDA :: String
_GHCI_PROMPT_HDA = String
"H>>= "
_LF_STR :: String
_LF_STR :: String
_LF_STR = String
"\n"
_BASE_GHCI_VERSION :: V.Version
_BASE_GHCI_VERSION :: Version
_BASE_GHCI_VERSION = [Int] -> [String] -> Version
V.Version [Int
8, Int
0, Int
0] []
_DAP_HEADER :: String
= String
"<<DAP>>"
_DAP_HEADER_OUTPUT_EVENT :: String
= String
"<<DAP_OUTPUT_EVENT>>"
_DAP_CMD_END2 :: String
_DAP_CMD_END2 :: String
_DAP_CMD_END2 = String
"<<DAP_CMD_END2>>"
_HS_FILE_EXT :: String
_HS_FILE_EXT :: String
_HS_FILE_EXT = String
".hs"