We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent ce56bca commit 18485abCopy full SHA for 18485ab
tests/IcedTasks.Tests/CancellableTaskTests.fs
@@ -309,6 +309,24 @@ module CancellableTaskTests =
309
Expect.equal actual expected ""
310
}
311
312
+
313
+ testCaseAsync "Can Bind Type inference"
314
+ <| async {
315
+ let expected = "lol"
316
317
+ let outerTask fooTask =
318
+ cancellableTask {
319
+ let! result = fooTask
320
+ return result
321
+ }
322
323
+ let! actual =
324
+ outerTask (fun ct -> Task.FromResult expected)
325
+ |> Async.AwaitCancellableTask
326
327
+ Expect.equal actual expected ""
328
329
330
]
331
332
testList "Zero/Combine/Delay" [
0 commit comments