lackey 2.0.0.8 → 2.0.0.9
raw patch · 2 files changed
+17/−31 lines, 2 filesdep ~base
Dependency ranges changed: base
Files
- lackey.cabal +3/−3
- source/test-suite/Main.hs +14/−28
lackey.cabal view
@@ -1,6 +1,6 @@ cabal-version: 2.2 name: lackey-version: 2.0.0.8+version: 2.0.0.9 synopsis: Generate Ruby clients from Servant APIs. description: Lackey generates Ruby clients from Servant APIs. bug-reports: https://github.com/tfausak/lackey/issues@@ -21,11 +21,10 @@ flag pedantic default: False- description: Enables @-Werror@, which turns warnings into errors. manual: True common library- build-depends: base ^>=4.18.0.0 || ^>=4.19.0.0 || ^>=4.20.0.0+ build-depends: base ^>=4.19.0.0 || ^>=4.20.0.0 || ^>=4.21.0.0 default-language: Haskell2010 ghc-options: -Weverything@@ -53,6 +52,7 @@ servant-foreign ^>=0.16, text ^>=2.0.2 || ^>=2.1, + -- cabal-gild: discover source/library exposed-modules: Lackey hs-source-dirs: source/library
source/test-suite/Main.hs view
@@ -45,8 +45,7 @@ let api = Proxy.Proxy :: Proxy.Proxy- ( Servant.Get '[Servant.JSON] () Servant.:<|> Servant.Delete '[Servant.JSON] ()- )+ (Servant.Get '[Servant.JSON] () Servant.:<|> Servant.Delete '[Servant.JSON] ()) Lackey.rubyForAPI api `Hspec.shouldBe` Text.concat [ ruby "get" "" "get" "" "" False,@@ -58,8 +57,7 @@ let api = Proxy.Proxy :: Proxy.Proxy- ( Servant.Capture "id" () Servant.:> Servant.Get '[Servant.JSON] ()- )+ (Servant.Capture "id" () Servant.:> Servant.Get '[Servant.JSON] ()) Lackey.rubyForAPI api `Hspec.shouldBe` ruby "get_by_id" ",id" "get" "#{id}" "" False @@ -67,8 +65,7 @@ let api = Proxy.Proxy :: Proxy.Proxy- ( Servant.QueryFlag "flag" Servant.:> Servant.Get '[Servant.JSON] ()- )+ (Servant.QueryFlag "flag" Servant.:> Servant.Get '[Servant.JSON] ()) Lackey.rubyForAPI api `Hspec.shouldBe` ruby "get"@@ -82,8 +79,7 @@ let api = Proxy.Proxy :: Proxy.Proxy- ( Servant.QueryParam "param" () Servant.:> Servant.Get '[Servant.JSON] ()- )+ (Servant.QueryParam "param" () Servant.:> Servant.Get '[Servant.JSON] ()) Lackey.rubyForAPI api `Hspec.shouldBe` ruby "get"@@ -97,8 +93,7 @@ let api = Proxy.Proxy :: Proxy.Proxy- ( Servant.QueryParams "params" () Servant.:> Servant.Get '[Servant.JSON] ()- )+ (Servant.QueryParams "params" () Servant.:> Servant.Get '[Servant.JSON] ()) Lackey.rubyForAPI api `Hspec.shouldBe` ruby "get"@@ -112,8 +107,7 @@ let api = Proxy.Proxy :: Proxy.Proxy- ( Servant.ReqBody '[Servant.JSON] () Servant.:> Servant.Get '[Servant.JSON] ()- )+ (Servant.ReqBody '[Servant.JSON] () Servant.:> Servant.Get '[Servant.JSON] ()) Lackey.rubyForAPI api `Hspec.shouldBe` ruby "get" ",body" "get" "" "" True @@ -121,8 +115,7 @@ let api = Proxy.Proxy :: Proxy.Proxy- ( Servant.Header "cookie" () Servant.:> Servant.Get '[Servant.JSON] ()- )+ (Servant.Header "cookie" () Servant.:> Servant.Get '[Servant.JSON] ()) Lackey.rubyForAPI api `Hspec.shouldBe` ruby "get"@@ -144,8 +137,7 @@ let api = Proxy.Proxy :: Proxy.Proxy- ( Servant.Capture "segment" () Servant.:> Servant.ReqBody '[Servant.JSON] () Servant.:> Servant.Get '[Servant.JSON] ()- )+ (Servant.Capture "segment" () Servant.:> Servant.ReqBody '[Servant.JSON] () Servant.:> Servant.Get '[Servant.JSON] ()) Lackey.rubyForAPI api `Hspec.shouldBe` ruby "get_by_segment"@@ -159,8 +151,7 @@ let api = Proxy.Proxy :: Proxy.Proxy- ( Servant.QueryFlag "flag" Servant.:> Servant.ReqBody '[Servant.JSON] () Servant.:> Servant.Get '[Servant.JSON] ()- )+ (Servant.QueryFlag "flag" Servant.:> Servant.ReqBody '[Servant.JSON] () Servant.:> Servant.Get '[Servant.JSON] ()) Lackey.rubyForAPI api `Hspec.shouldBe` ruby "get"@@ -182,8 +173,7 @@ let api = Proxy.Proxy :: Proxy.Proxy- ( Servant.Capture "A!" () Servant.:> Servant.Get '[Servant.JSON] ()- )+ (Servant.Capture "A!" () Servant.:> Servant.Get '[Servant.JSON] ()) Lackey.rubyForAPI api `Hspec.shouldBe` ruby "get_by_A!" ",a_" "get" "#{a_}" "" False @@ -191,8 +181,7 @@ let api = Proxy.Proxy :: Proxy.Proxy- ( Servant.QueryFlag "A!" Servant.:> Servant.Get '[Servant.JSON] ()- )+ (Servant.QueryFlag "A!" Servant.:> Servant.Get '[Servant.JSON] ()) Lackey.rubyForAPI api `Hspec.shouldBe` ruby "get" ",a_: nil" "get" "?A!=#{a_}" "" False @@ -200,8 +189,7 @@ let api = Proxy.Proxy :: Proxy.Proxy- ( Servant.QueryParam "A!" () Servant.:> Servant.Get '[Servant.JSON] ()- )+ (Servant.QueryParam "A!" () Servant.:> Servant.Get '[Servant.JSON] ()) Lackey.rubyForAPI api `Hspec.shouldBe` ruby "get" ",a_: nil" "get" "?A!=#{a_}" "" False @@ -209,8 +197,7 @@ let api = Proxy.Proxy :: Proxy.Proxy- ( Servant.QueryParams "A!" () Servant.:> Servant.Get '[Servant.JSON] ()- )+ (Servant.QueryParams "A!" () Servant.:> Servant.Get '[Servant.JSON] ()) Lackey.rubyForAPI api `Hspec.shouldBe` ruby "get" ",a_: nil" "get" "?A!=#{a_}" "" False @@ -218,8 +205,7 @@ let api = Proxy.Proxy :: Proxy.Proxy- ( Servant.Header "A!" () Servant.:> Servant.Get '[Servant.JSON] ()- )+ (Servant.Header "A!" () Servant.:> Servant.Get '[Servant.JSON] ()) Lackey.rubyForAPI api `Hspec.shouldBe` ruby "get" ",a_: nil" "get" "" "\"A!\"=>a_" False