Слуга: загрузить файл как multipart/form-data

Question

Как реализовать API для загрузки файлов с Servant? Я пытаюсь справиться с "стандартом" multipart/form-data но не могу понять, как объявить это в Слугу.

Это, очевидно, не работает, поскольку он не может обрабатывать множественные части:

type API = "file" :> ReqBody '[OctetStream] ByteString :> Post '[OctetStream] ()

Servant поддерживает загрузку файлов?

Answer 1

Этот комбинатор работает хорошо. Просто поместите это в файл в вашем приложении. https://github.com/haskell-servant/servant/issues/133