Fix UUID default value cast exception (swift5) (#16436)

This commit is contained in:
William Cheng
2023-08-29 19:32:01 +08:00
committed by GitHub
parent b14f99df92
commit b1564d8002
117 changed files with 678 additions and 176 deletions

View File

@@ -68,10 +68,12 @@ import qualified Prelude as P
op123testSpecialTags
:: (Consumes Op123testSpecialTags MimeJSON, MimeRender MimeJSON Client)
=> Client -- ^ "body" - client model
-> UuidTest -- ^ "uuidTest" - to test uuid example value
-> OpenAPIPetstoreRequest Op123testSpecialTags MimeJSON Client MimeJSON
op123testSpecialTags body =
op123testSpecialTags body (UuidTest uuidTest) =
_mkRequest "PATCH" ["/another-fake/dummy"]
`setBodyParam` body
`addHeader` toHeader ("uuid_test", uuidTest)
data Op123testSpecialTags

View File

@@ -225,6 +225,9 @@ newtype Url = Url { unUrl :: [Text] } deriving (P.Eq, P.Show)
-- ** Username
newtype Username = Username { unUsername :: Text } deriving (P.Eq, P.Show)
-- ** UuidTest
newtype UuidTest = UuidTest { unUuidTest :: Text } deriving (P.Eq, P.Show)
-- * Models