规范的答案:通常,如果您想重用/缓存某些内容,您会将其作为参数传递给您的函数:
let isReachable' (client: HttpClient) url =
client.GetAsync(url) |> ...
注意函数名称后面的勾号。这是故意的,因为我会像这样部分应用它:
let oneTrueHttpClient = new HttpClient()
let isReachable = isReachable' oneTrueHttpClient
从而用一个参数取回我的原始isReachable
函数,但现在所有调用都使用相同的HttpClient
.
这个部分应用程序将在程序启动时完成,然后该isReachable
函数将作为参数传递给任何需要它的人。
当然,您可能希望有一个 HTTP 客户端池,每个线程一个或类似的东西。在这种情况下,您将使用工厂函数而不是实例本身:
let isReachable' (getClient: unit -> HttpClient) url =
getClient().GetAsync(url) |> ...
// And later:
let clientFactory () = magic.MakeClient() // <- insert caching behavior here
let isReachable = isReachable' clientFactory
实际的答案:但是,当然,上面的扩展性不好。例如,现在需要使用的人isReachable
不能直接从静态上下文中调用它,他们必须从调用它们的人那里获取它作为参数,等等。不过,这并不意味着您必须在任何地方都通过隧道。您可以部分应用可以在程序初始化时部分应用的所有内容。这相当于手动实现一个 IoC 容器,除了container.Add<IHttpClient, HttpClient>
你不是指定或其他什么,而是传递函数。
这是可行的。我已经做了。但随着时间的推移,它确实变得有点难看。
所以实际的答案是:宗教是为了精神成长,其他一切都使用常识。
完全可以偏离神圣的功能原则并使用 IoC 容器、接口或其他任何东西。毕竟,接口是 F# 实现更高等级行为的唯一机制,为什么不呢?
尤其如此,因为大多数“框架”(如 WPF、ASP.NET 等)本质上都是面向对象的,因此您会无缘无故地试图避免这种情况。
我个人采用的一般规则是:以函数式风格表达您的实际业务逻辑,尽可能清晰和纯粹,但在与外部世界(即操作系统或您正在使用的任何框架)的边界处,请随意做外界希望你做的任何事情。
应用于您的特定示例,该isReachable
功能非常明显属于与外界的边界。因此,请随意以任何适合的方式实现它。