diff options
Diffstat (limited to 'src/Utils.hs')
| -rw-r--r-- | src/Utils.hs | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/src/Utils.hs b/src/Utils.hs index 2f9e3c0..c2a5088 100644 --- a/src/Utils.hs +++ b/src/Utils.hs @@ -15,11 +15,17 @@ type PositionString = String type ErrorString = String data LException = LException (Maybe PositionString) ErrorString +data PrintEvaled + = PrintEvaledOff + | PrintEvaledAll + | PrintEvaledNonUnit + deriving Show + data Config = Config { configScriptFileName :: Maybe String, configVerboseMode :: Bool, configShowHelp :: Bool, - configPrintEvaled :: Bool, + configPrintEvaled :: PrintEvaled, configPrintCallStack :: Bool, configUseREPL :: Bool } |
