Skip to content

Commit a54afac

Browse files
fcallejongusty
authored andcommitted
Fix issue in ValueOption|Option.Sequence
1 parent c56b22c commit a54afac

1 file changed

Lines changed: 2 additions & 2 deletions

File tree

src/FSharpPlus/Extensions/Extensions.fs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -140,7 +140,7 @@ module Extensions =
140140
let mutable accumulator = ArrayCollector<'t> ()
141141
let mutable noneFound = false
142142
use e = t.GetEnumerator ()
143-
while e.MoveNext () && noneFound do
143+
while e.MoveNext () && not noneFound do
144144
match e.Current with
145145
| Some v -> accumulator.Add v
146146
| None -> noneFound <- true
@@ -168,7 +168,7 @@ module Extensions =
168168
let mutable accumulator = ArrayCollector<'t> ()
169169
let mutable noneFound = false
170170
use e = t.GetEnumerator ()
171-
while e.MoveNext () && noneFound do
171+
while e.MoveNext () && not noneFound do
172172
match e.Current with
173173
| ValueSome v -> accumulator.Add v
174174
| ValueNone -> noneFound <- true

0 commit comments

Comments
 (0)