yesod-raml-mock 0.1.0 → 0.1.1
raw patch · 3 files changed
+13/−1 lines, 3 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
+ Yesod.Raml.Mock: mockSrcFromRaml :: Raml -> IO String
Files
- ChangeLog.md +4/−0
- Yesod/Raml/Mock.hs +8/−0
- yesod-raml-mock.cabal +1/−1
ChangeLog.md view
@@ -1,3 +1,7 @@+## 0.1.1++* Add mockSrcFromRaml to print mock-handler+ ## 0.1.0 * First Release
Yesod/Raml/Mock.hs view
@@ -7,6 +7,7 @@ module Yesod.Raml.Mock ( parseRamlMockFile , mockFromRaml+, mockSrcFromRaml ) where import Yesod.Raml.Routes@@ -16,6 +17,7 @@ import Yesod.Core import Data.Char(toLower) import Language.Haskell.TH.Syntax+import Language.Haskell.TH.Ppr import Yesod.Raml.Type import Yesod.Raml.Parser () import Yesod.Routes.TH.Types@@ -42,6 +44,11 @@ decs <- forM routes handlerFromRoute return $ concat decs +mockSrcFromRaml :: Raml -> IO String+mockSrcFromRaml raml = do+ v <- runQ $ mockFromRaml raml+ return $ show $ ppr v+ handlerFromRoute :: RouteEx -> Q [Dec] handlerFromRoute RouteEx{..} = do decs <- forM re_methods (handlerFromRoute' re_pieces re_handler)@@ -98,6 +105,7 @@ typeList [] v = v typeList (x:xs) v = (AppT (AppT ArrowT (ConT x)) (typeList xs v)) wildPs xs = map (\_ -> WildP) xs+ argsFromPiecies :: [Piece String] -> [Name] argsFromPiecies [] = []
yesod-raml-mock.cabal view
@@ -1,5 +1,5 @@ name: yesod-raml-mock-version: 0.1.0+version: 0.1.1 synopsis: A mock-handler generator library from RAML. description: A mock-handler generator library from RAML. license: MIT