on master help sign in
Fix GenerateList to let the API be nested
commitb769ddc32bdb5519725ce9a61d74f24211e4389f authorFreezeboy <freezeboy@users.noreply.github.com> dateWed 5 Aug 2015, 21:01 (11 years ago) parent3dc304b
1 file changed+2−2
servant-js/src/Servant/JS.hs+2−2
servant-js/src/Servant/JS.hs+2−2
@@ -156,8 +156,8 @@ class GenerateList reqs where
156156instance GenerateList AjaxReq where
157157 generateList r = [r]
158158
159−instance GenerateList rest => GenerateList (AjaxReq :<|> rest) where
160− generateList (r :<|> rest) = r : generateList rest
159+instance (GenerateList start, GenerateList rest) => GenerateList (start :<|> rest) where
160+ generateList (start :<|> rest) = (generateList start) ++ (generateList rest)
161161
162162-- | Generate the necessary data for JS codegen as a list, each 'AjaxReq'
163163-- describing one endpoint from your API type.