Skip to content

Commit f45c8fc

Browse files
committed
Experiment
1 parent a300076 commit f45c8fc

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

src/FSharpPlus/Builders.fs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -68,7 +68,7 @@ module GenericBuilders =
6868
type StrictBuilder<'``monad<'t>``> () =
6969
inherit Builder<'``monad<'t>``> ()
7070
member inline _.Delay ([<InlineIfLambda>]expr) = expr : unit -> '``Monad<'T>``
71-
member inline _.Run ([<InlineIfLambda>]f) = f () : '``monad<'t>``
71+
member inline _.Run ([<InlineIfLambda>]f) = Delay.Invoke f : '``monad<'t>``
7272
member inline _.TryWith ([<InlineIfLambda>]expr, [<InlineIfLambda>]handler) = TryWith.InvokeForStrict expr handler : '``Monad<'T>``
7373
member inline _.TryFinally ([<InlineIfLambda>]expr, [<InlineIfLambda>]compensation) = TryFinally.InvokeForStrict expr compensation : '``Monad<'T>``
7474

0 commit comments

Comments
 (0)