rest - サーバントのすべてのエンドポイントにプレフィックスを追加する方法は?

Question

私はHaskellのサーバントに一種のHello Worldアプリを持っています.これはその一部です:

type API = 
  "my_items" :> Get '[JSON] [MyItem]
  :<|> "my_items" :> Capture "id" Int :> Get '[JSON] MyItem
  -- ...................

URLは次のとおりです。

  localhost/my_items
  localhost/my_items/123

既存の URL や作成する他の URL にプレフィックスを追加するにはどうすればよいですか。

  localhost/api/v1/my_items
  localhost/api/v1/my_items/123
  localhost/api/v1/.....

?

Answer 1

別のタイプを作成するだけです：

type APIv1 = "api" :> "v1" :> API