WoofWare.Myriad/ConsumePlugin/JsonRecord.fs

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[]
    }

[<WoofWare.Myriad.Plugins.JsonParse true>]
type ToGetExtensionMethod =
    {
        Tinker : string
        Tailor : int
        Soldier : System.Uri
        Sailor : float
    }

[<RequireQualifiedAccess>]
module ToGetExtensionMethod =
    let thisModuleWouldClash = 3