haskell/yesod
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

debug: add missing Debug.Trace import

Browse Source
This commit is contained in:
Sarah Vaupel 2023-04-19 14:01:46 +00:00
parent 7acff8dce2
commit 8488711b56
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
yesod-core/src/Yesod/Core/Internal/Run.hs
View File

@ -40,6 +40,8 @@ import Yesod.Routes.Class (Route, renderRoute)
import Control.DeepSeq (($!!), NFData) import Control.DeepSeq (($!!), NFData)
import UnliftIO.Exception import UnliftIO.Exception
import Debug.Trace (traceStack)
-- | Convert a synchronous exception into an ErrorResponse -- | Convert a synchronous exception into an ErrorResponse
toErrorHandler :: SomeException -> IO ErrorResponse toErrorHandler :: SomeException -> IO ErrorResponse
toErrorHandler e0 = handleAny errFromShow $ toErrorHandler e0 = handleAny errFromShow $