consts_dotnet.qtpl

{%- func dotnetConsts(data *ConstTemplateData) -%}
// {%s data.DoNotEdit %}

namespace StarFederation.Datastar

open System

{%- for _, enum := range data.Enums -%}
type {%s enum.Name.Pascal %} =
{% for _, entry := range enum.Values %}/// {%s entry.Description %}
| {%s entry.Name.Pascal %}
{% endfor %}
{% endfor %}
module Consts =
    let [<Literal>] DatastarKey               = "{%s data.DatastarKey %}"
    let [<Literal>] Version                   = "{%s data.Version %}"

    {%- for _, d := range data.DefaultDurations -%}
    /// Default: TimeSpan.FromMilliseconds {%d durationToMs(d.Duration) %}
    let Default{%s d.Name.Pascal %} = TimeSpan.FromMilliseconds {%d durationToMs(d.Duration) %}
    {%- endfor %}

    {%- for _, enum := range data.Enums -%}{%- if enum.DefaultIndex > -1 -%}
    /// Default: {%s enum.Default.Value %} - {%s enum.Default.Description %}
    let Default{%s enum.Name.Pascal %} = {%s enum.Default.Name.Pascal %}{% endif %}{% endfor %}

    {%- for _, b := range data.DefaultBools -%}
    let [<Literal>] Default{%s b.Name.Pascal %} = {%v b.Value %}
    {%- endfor -%}

    {%- for _, s := range data.DefaultStrings -%}
    let [<Literal>] Default{%s s.Name.Pascal %} = "{%s s.Value %}"
    {%- endfor -%}

    {%- for _, literal := range data.DatalineLiterals -%}
    let [<Literal>] DatastarDataline{%s literal.Pascal %} = "{%s literal.Camel %}"
    {%- endfor -%}

{%- for _, enum := range data.Enums -%}
    module {%s enum.Name.Pascal %} =
        let toString this =
            match this with
                {%- for _, entry := range enum.Values -%}
                | {%s enum.Name.Pascal %}.{%s entry.Name.Pascal %} -> "{%s entry.Value %}"
                {%- endfor -%}

{%- endfor -%}
{%- endfunc -%}