3

我正在尝试构建一个 F# Asp.Net Core 3.0 Web API，我在其中发送一些 F# 记录。据我所知，Asp.Net Core 3.0System.Text.Json默认使用将对象序列化为 json。为了使域模型自我记录，我使用了 F# 区分联合类型。

该模型如下所示：

type Starttime =
    | NotStarted
    | Started of DateTime

type Category = {
    Name: string
    Starttime: Starttime
}

type ValueId = ValueId of String

type Value = {
    Id: ValueId
    Category: Category
}

所以我有一种联合类型，只有一种可能性ValueId，我有一种联合类型，有两种可能性Starttime，NotStarted其中Started包含一个DateTime对象。

现在在我的控制器中，我构建了一些示例数据并将其返回。

let isStarted i : Starttime =
    if i % 2 = 0 then
        Started DateTime.Now
    else
        NotStarted

[<HttpGet>]
member __.Get() : Value[] = 
    [|
        for index in 1..2 ->
            { 
                Id = ValueId (Guid.NewGuid().ToString())
                Category = {
                    Name = sprintf "Category %i" index
                    Starttime = isStarted index }
            }
    |]

当我查看返回的数据时，json我得到了单选项联合类型（Guid）的数据，但我从来没有得到多选项联合类型的值。

[
  {
    "id": {
      "tag": 0,
      "item": "6ed07303-6dfa-42b4-88ae-391bbebf772a"
    },
    "category": {
      "name": "Category 1",
      "starttime": {
        "tag": 0,
        "isNotStarted": true,
        "isStarted": false
      }
    }
  },
  {
    "id": {
      "tag": 0,
      "item": "5e122579-4945-4f19-919c-ad4cf16ad0ed"
    },
    "category": {
      "name": "Category 2",
      "starttime": {
        "tag": 1,
        "isNotStarted": false,
        "isStarted": true
      }
    }
  }
]

有谁知道如何发送多值联合类型的值？或者将有区别的联合类型映射到匿名记录通常更好吗？

谢谢！

4

1 回答 1

1

目前，System.Text.Json不支持 F# 类型（这里有一个未解决的问题）

现在，您可以改用这个库。

于 2019-10-14T03:24:53.750 回答