在haskell-servant API定义中打印所有路由？

Question

我发誓我早些时候在文档中看到了这一点，但现在似乎找不到它。基本上，我正在寻找与rake routes中的servant命令等效的命令，该命令以人类可读的格式打印出所有路由。

Answer 1

Servant的功能layout可以在api的代理上工作，它与耙路径并没有多少相同，但是信息相同。

import Servant
import Data.Text.IO as T

type MyAPI = ...

printLayout = T.putStrLn $ layout (Proxy :: Proxy MyAPI)