F#：去流畅化 API 的最佳方式？

Question

我正在扩展 Fluent NHibernate 以便更好地与 F# 一起使用（即引用支持），并希望得到一些关于去流化 API 的反馈。 F# 要求使用返回值，除非它们是类型单位。所以这最终会以“|> ignore”终止每一行：

type ProductMap() as m = inherit QClassMap<Product>() do
    let x = Unchecked.defaultof<Product> 
    m.Id <@ x.Id @> |> ignore
    m.Map <@ x.Name @> |> ignore
    m.Map <@ x.Price @> |> ignore
    (m.HasManyToMany <@ seq x.StoresStockedIn @>)
        .Cascade.All()
        .Inverse()
        .WithTableName("StoreProduct") |> ignore

我的第一反应是向基类添加更多方法，以便它们返回单位。例如，“IdI”和“MapI”：

...
m.IdI <@ x.Id @>
m.MapI <@ x.Name @> 
m.MapI <@ x.Price @> 
... 

但这需要特定的重载，长链仍然需要|>忽略。我还考虑过使用 Done 属性扩展对象：

(m.Id <@ x.Id @>).Done
(m.Map <@ x.Name @>).Done
(m.Map <@ x.Price @>).Done
(m.HasManyToMany <@ seq x.StoresStockedIn @>)
    .Cascade.All()
    .Inverse()
    .WithTableName("StoreProduct").Done

你怎么看？

Answer 1

恕我直言，更好的方法是从头开始在 F# 中思考（例如函数管道、currying、组合器）而不是包装 fluent nhibernate，但是使用 fluent nhibernate已用于生成映射。也就是构建一个F#专用的“并行流利的nhibernate”。

我已经recently posted 询问了 Windsor 在 F# 中的流畅界面的类似问题。我的结论是，许多为 C#/VB.NET 构建的 DSL/流式接口会在 F# 中中断，所以我认为最好构建适合 F# 方式的特定流式接口。