Skip to content

Commit 57f1bd0

Browse files
committed
Fix import
1 parent 8be1e8c commit 57f1bd0

2 files changed

Lines changed: 7 additions & 9 deletions

File tree

tests/FSharp.Control.AsyncSeq.Tests/AsyncSeqPerf.fsx

Lines changed: 6 additions & 7 deletions
Original file line numberDiff line numberDiff line change
@@ -1,4 +1,4 @@
1-
#r @"../../bin/FSharp.Control.AsyncSeq.dll"
1+
#r @"../../src/FSharp.Control.AsyncSeq/bin/Release/netstandard2.1/FSharp.Control.AsyncSeq.dll"
22
#nowarn "40"
33
#time "on"
44

@@ -107,7 +107,7 @@ let bindUnfold =
107107

108108

109109

110-
let collect n =
110+
let collect n =
111111
AsyncSeq.replicate n ()
112112
|> AsyncSeq.collect (fun () -> AsyncSeq.singleton ())
113113
|> AsyncSeq.iter ignore
@@ -122,7 +122,7 @@ let collect n =
122122

123123
let Y = Choice1Of2
124124
let S = Choice2Of2
125-
125+
126126
let timeMs = 500
127127

128128
let inp0 = [ ]
@@ -138,19 +138,18 @@ let toSeq (xs:Choice<int, int> list) = asyncSeq {
138138
for x in xs do
139139
match x with
140140
| Choice1Of2 v -> yield v
141-
| Choice2Of2 s -> do! Async.Sleep s }
141+
| Choice2Of2 s -> do! Async.Sleep s }
142142

143143
for (inp,exp) in [ (inp0,exp0) ; (inp1,exp1) ] do
144144

145-
let actual =
145+
let actual =
146146
toSeq inp
147147
|> AsyncSeq.bufferByTime (timeMs - 5)
148148
|> AsyncSeq.map List.ofArray
149149
|> AsyncSeq.toListSynchronously
150-
150+
151151
printfn "actual=%A expected=%A" actual exp
152152

153153
//let ls = toSeq inp |> AsyncSeq.toListSynchronously
154154
//let actualLs = actual |> List.concat
155155

156-

tests/FSharp.Control.AsyncSeq.Tests/AsyncSeqTests.fs

Lines changed: 1 addition & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1,5 +1,5 @@
11
#if INTERACTIVE
2-
#load @"../../.paket/load/netcoreapp3.1/Test/NUnit.fsx"
2+
#r "nuget: NUnit, 3.9.0"
33
#time "on"
44
#else
55

@@ -10,7 +10,6 @@ open NUnit.Framework
1010
open FSharp.Control
1111
open System
1212
open System.Threading
13-
open System.Threading.Tasks
1413

1514
type AsyncOps = AsyncOps with
1615
static member unit : Async<unit> = async { return () }

0 commit comments

Comments
 (0)