diff --git a/src/FSharp.Control.TaskSeq.Test/FSharp.Control.TaskSeq.Test.fsproj b/src/FSharp.Control.TaskSeq.Test/FSharp.Control.TaskSeq.Test.fsproj index a40ff912..dd43eaa3 100644 --- a/src/FSharp.Control.TaskSeq.Test/FSharp.Control.TaskSeq.Test.fsproj +++ b/src/FSharp.Control.TaskSeq.Test/FSharp.Control.TaskSeq.Test.fsproj @@ -36,7 +36,7 @@ - + diff --git a/src/FSharp.Control.TaskSeq.Test/TaskSeq.Take.fs b/src/FSharp.Control.TaskSeq.Test/TaskSeq.Take.Tests.fs similarity index 100% rename from src/FSharp.Control.TaskSeq.Test/TaskSeq.Take.fs rename to src/FSharp.Control.TaskSeq.Test/TaskSeq.Take.Tests.fs diff --git a/src/FSharp.Control.TaskSeq/TaskSeqInternal.fs b/src/FSharp.Control.TaskSeq/TaskSeqInternal.fs index 9915f358..3294275e 100644 --- a/src/FSharp.Control.TaskSeq/TaskSeqInternal.fs +++ b/src/FSharp.Control.TaskSeq/TaskSeqInternal.fs @@ -138,7 +138,7 @@ module internal TaskSeqInternal = i <- i + 1 // update before moving: we are counting, not indexing go <- step - | Some (Predicate predicate) -> + | Some(Predicate predicate) -> while go do if predicate e.Current then i <- i + 1 @@ -146,7 +146,7 @@ module internal TaskSeqInternal = let! step = e.MoveNextAsync() go <- step - | Some (PredicateAsync predicate) -> + | Some(PredicateAsync predicate) -> while go do match! predicate e.Current with | true -> i <- i + 1 @@ -215,7 +215,7 @@ module internal TaskSeqInternal = // multiple threads access the same item through the same enumerator (which is // bad practice, but hey, who're we to judge). if isNull value then - value <- Lazy<_>.Create (fun () -> init i) + value <- Lazy<_>.Create(fun () -> init i) yield value.Force() value <- Unchecked.defaultof<_>