aboutsummaryrefslogtreecommitdiffstats
path: root/src/Utils.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Utils.hs')
-rw-r--r--src/Utils.hs8
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
}