Files
WoofWare.Myriad/ConsumePlugin/JsonRecord.fs
2023-12-27 20:57:16 +00:00

31 lines
635 B
Forth

namespace ConsumePlugin
open System.Text.Json.Serialization
module Literals =
[<Literal>]
let something = "something"
[<WoofWare.Myriad.Plugins.JsonParse>]
type InnerType =
{
[<JsonPropertyName(Literals.something)>]
Thing : string
}
/// My whatnot
[<WoofWare.Myriad.Plugins.JsonParse>]
type JsonRecordType =
{
/// A thing!
A : int
/// Another thing!
[<JsonPropertyName "another-thing">]
B : string
[<System.Text.Json.Serialization.JsonPropertyName "hi">]
C : int list
D : InnerType
E : string array
F : int[]
}