Skip to content

Commit 8eb270c

Browse files
committed
Formatting
1 parent 27be66e commit 8eb270c

File tree

1 file changed

+5
-1
lines changed

1 file changed

+5
-1
lines changed

src/FSharp.Control.TaskSeq/TaskSeqInternal.fs

Lines changed: 5 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -818,12 +818,14 @@ module internal TaskSeqInternal =
818818

819819
| Exclusive, PredicateAsync predicate -> // skipWhileAsync
820820
let mutable cont = true
821+
821822
if more then
822823
let! ok = predicate e.Current
823824
cont <- ok
824825

825826
while more && cont do
826827
let! moveNext = e.MoveNextAsync()
828+
827829
if moveNext then
828830
let! ok = predicate e.Current
829831
cont <- ok
@@ -840,20 +842,22 @@ module internal TaskSeqInternal =
840842

841843
| Inclusive, PredicateAsync predicate -> // skipWhileInclusiveAsync
842844
let mutable cont = true
845+
843846
if more then
844847
let! ok = predicate e.Current
845848
cont <- ok
846849

847850
while more && cont do
848851
let! moveNext = e.MoveNextAsync()
852+
849853
if moveNext then
850854
let! ok = predicate e.Current
851855
cont <- ok
852856

853857
more <- moveNext
854858

855859
if more then
856-
// get the rest, this gives 1 or more semantics
860+
// get the rest, this gives 1 or more semantics
857861
while! e.MoveNextAsync() do
858862
yield e.Current
859863
}

0 commit comments

Comments
 (0)