module Symantic.Compta.Utils.Error where
--import Data.Semigroup (Semigroup(..))
import GHC.Stack
import Data.String (String)
import Prelude (error)

--import Symantic.Compta.Lang.Rebindable

errorWithStack :: HasCallStack => String -> a
errorWithStack = error -- (msg <> "\n" <> prettyCallStack callStack)