asynchronous - 在异步上下文中读取文件？

Question

我要杠杆async使我的代码在 F# 中更具可读性和性能。

我可以使用这样的函数读取整个文件:

let readFile path = async {
  return System.IO.File.ReadAllText path
}

然后像这样使用这个函数:

"README.md" |> readFile |> Async.RunSynchronously |> Console.WriteLine

但是，.NET ReadAllText方法是阻塞。

这是使用 async 读取文件的合适方法吗？ ?

Answer 1

您可以使用 StreamReader公开 ReadToEnd 的异步版本的类.

let readFile (path:string) = async {
  use sr = new StreamReader(path)
  return! sr.ReadToEndAsync() |> Async.AwaitTask
}

在实践中，运行一些测量以确保您实际上从在这种情况下使用 async 获得一些好处可能是一个好主意 - 除非您对许多文件做一些有趣的事情，否则它可能无关紧要。

奖金:

let writeFile (path : string) (content : string) = async {
  use sw = new System.IO.StreamWriter(path)
  return!
    sw.WriteAsync(content)
    |> Async.AwaitTask
}