Bring back withFrozenCallStack to emptyEff

haskell-effectful · Oct 22, 2024 · eda264f · eda264f
1 parent 86e633b
commit eda264f
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/effectful-core/src/Effectful/NonDet.hs b/effectful-core/src/Effectful/NonDet.hs
@@ -111,7 +111,7 @@ runNonDetRollback = reinterpret setup $ \env -> \case
 --
 -- @since 2.2.0.0
 emptyEff :: (HasCallStack, NonDet :> es) => Eff es a
-emptyEff = send Empty
+emptyEff = withFrozenCallStack send Empty
 
 -- | Specialized version of '<|>' with the `HasCallStack` constraint for
 -- tracking purposes.