src/FundLab.Api/Health.fs


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

namespace FundLab.Api

open System.Text.Json

type HealthResponse =
    {
        service: string
        status: string
    }

module Health =
    let payload (serviceName: string) : string =
        JsonSerializer.Serialize<HealthResponse> {
            service = serviceName
            status = "ok"
        }