servant-openapi-hs-5.0.0: app/GenOpenApi.hs

{-# LANGUAGE OverloadedStrings #-}

-- | Emit a representative API's OpenAPI 3.1 document as JSON to stdout.
--
-- Used to feed Layer-3 (external, authoritative) validation:
--
-- > cabal run gen-openapi > openapi.json
-- > nix run nixpkgs#vacuum-go -- lint -d openapi.json
module Main (main) where

import Data.Aeson (encode)
import Data.ByteString.Lazy.Char8 qualified as BL
import GenOpenApi.Spec qualified as GenOpenApi

main :: IO ()
main = BL.putStrLn (encode GenOpenApi.spec)