在 FSI 中运行异步计算表达式

Question

我正在尝试在 FSI 中运行此代码

#r @"C:\Program Files\dotnet\packs\Microsoft.NETCore.App.Ref\6.0.1\ref\net6.0\System.Net.Http.dll"

async {
    let httpClient = new System.Net.Http.HttpClient()
    let! response = httpClient.GetAsync("") |> Async.AwaitTask
    response.EnsureSuccessStatusCode() |> ignore
    return! response.Content.ReadAsStringAsync() |> Async.AwaitTask
}

我收到以下错误

错误 FS0193：模块/命名空间“System.Threading.Tasks”来自 编译单元“System.Runtime”不包含命名空间， 模块或输入'Task`1'

但是，当我将该代码粘贴到项目的文件中时，它会按预期编译。

我错过了什么？

Answer 1

我不确定您为什么会收到此错误，但您应该能够在不指定完整路径的情况下引用标准 .NET 库。

我尝试使用以下内容创建一个 F# 脚本，它工作得非常好（我仍在使用 F# 5，但我不希望这会在新版本中发生变化）：

#r @"System.Net.Http.dll"

async {
    let httpClient = new System.Net.Http.HttpClient()
    let! response = httpClient.GetAsync("http://tomasp.net") |> Async.AwaitTask
    response.EnsureSuccessStatusCode() |> ignore
    return! response.Content.ReadAsStringAsync() |> Async.AwaitTask
}
|> Async.RunSynchronously

我只需要添加一个真实的下载 URL 和 Async.RunSynchronously 来实际运行代码。