JsonProvider 可以反序列化为 Generic.Dictionary 吗？

Question

我正在学习类型提供程序，它看起来像是一个突破性的功能。但是，我无法设法使用 JsonProvider 反序列化 json，以便目标类型具有 Generic.Dictionary 属性。可以使用 Json.NET 来完成。这是代码：

type ByProv = JsonProvider<"""{"dict":{"A":1,"B":2}}""">
type ByHand(d:Dictionary<string,int>) =
    member val dict = d with get,set

let text = """{"dict":{"C":3,"D":4}}"""
let newt = JsonConvert.DeserializeObject<ByHand> text
let prov = ByProv.Parse text
printfn "%A" newt.dict.["C"]
//Can only call statically inferred A or B (and it will throw at run-time)
printfn "%A" prov.Dict.A

显然，dict被推断为记录类型，而不是Dictionary默认类型。这可以被覆盖吗？

Answer 1

JSON 类型提供程序假定 JSON 记录用于存储记录（具有固定字段名称），并且 JSON 数组用于存储集合。您的示例是这种方法效果不佳的情况之一。

当您需要访问具有动态命名字段的 JSON 记录时，您可以使用JsonValue提供的类型公开的底层：

type ByProv = JsonProvider<"""{"dict":{"A":1,"B":2}}""">

let text = """{"dict":{"C":3,"D":4}}"""
let prov = ByProv.Parse text

prov.Dict.JsonValue.["C"].AsInteger()

这不太好，我想 JSON 类型提供程序可以扩展以更好地处理这个问题（并将记录更像数组）。请随意提交问题进行讨论，或者向GitHub 上的 F# Data提交拉取请求！