From 7973ce5063ecd140325caf1cb17534bcb28a8d89 Mon Sep 17 00:00:00 2001 From: Fernando Callejon Date: Sat, 18 Nov 2023 20:57:11 +0000 Subject: [PATCH] Fix issue in ValueOption|Option.Sequence --- src/FSharpPlus/Extensions/Extensions.fs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/FSharpPlus/Extensions/Extensions.fs b/src/FSharpPlus/Extensions/Extensions.fs index c01ceaa0f..1d22dd65b 100644 --- a/src/FSharpPlus/Extensions/Extensions.fs +++ b/src/FSharpPlus/Extensions/Extensions.fs @@ -140,7 +140,7 @@ module Extensions = let mutable accumulator = ArrayCollector<'t> () let mutable noneFound = false use e = t.GetEnumerator () - while e.MoveNext () && noneFound do + while e.MoveNext () && not noneFound do match e.Current with | Some v -> accumulator.Add v | None -> noneFound <- true @@ -168,7 +168,7 @@ module Extensions = let mutable accumulator = ArrayCollector<'t> () let mutable noneFound = false use e = t.GetEnumerator () - while e.MoveNext () && noneFound do + while e.MoveNext () && not noneFound do match e.Current with | ValueSome v -> accumulator.Add v | ValueNone -> noneFound <- true