From 18c241ff7a53625c6f3c4e6f20ee8df5bb37ddf3 Mon Sep 17 00:00:00 2001 From: Jan Tuomi Date: Mon, 26 Sep 2022 23:28:51 +0300 Subject: Add kinds of fixes and stuff --- src/Utils.hs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'src/Utils.hs') diff --git a/src/Utils.hs b/src/Utils.hs index e0695c3..56fd1a2 100644 --- a/src/Utils.hs +++ b/src/Utils.hs @@ -14,7 +14,8 @@ data Config = Config { configScriptFileName :: Maybe String, configVerboseMode :: Bool, configShowHelp :: Bool, - configPrintEvaled :: Bool + configPrintEvaled :: Bool, + configPrintCallStack :: Bool } type LContext a = ReaderT Config (ExceptT LException IO) a -- cgit v1.3