@@ -48,7 +48,8 @@ spec = do
4848 context "Simple Model" $ schemaSimpleModelExample <~> schemaSimpleModelExampleJSON
4949 context "Model with Map/Dictionary Properties" $ schemaModelDictExample <~> schemaModelDictExampleJSON
5050 context "Model with Example" $ schemaWithExampleExample <~> schemaWithExampleExampleJSON
51− describe "Schema Object" $ definitionsExample <~> definitionsExampleJSON
51+ describe "Definitions Object" $ definitionsExample <~> definitionsExampleJSON
52+ describe "Parameters Definition Object" $ parametersDefinitionExample <~> parametersDefinitionExampleJSON
5253
5354main :: IO ()
5455main = hspec spec
@@ -390,3 +391,48 @@ definitionsExampleJSON = [aesonQQ|
390391 }
391392}
392393|]
394+
395+-- =======================================================================
396+-- Parameters Definition object
397+-- =======================================================================
398+
399+parametersDefinitionExample :: HashMap Text SwaggerParameter
400+parametersDefinitionExample =
401+ [ ("skipParam", mempty
402+ { swaggerParameterName = "skip"
403+ , swaggerParameterDescription = Just "number of items to skip"
404+ , swaggerParameterRequired = True
405+ , swaggerParameterSchema = SwaggerParameterOther mempty
406+ { swaggerParameterOtherSchemaIn = SwaggerParameterQuery
407+ , swaggerParameterOtherSchemaType = SwaggerParamInteger
408+ , swaggerParameterOtherSchemaFormat = Just "int32" } })
409+ , ("limitParam", mempty
410+ { swaggerParameterName = "limit"
411+ , swaggerParameterDescription = Just "max records to return"
412+ , swaggerParameterRequired = True
413+ , swaggerParameterSchema = SwaggerParameterOther mempty
414+ { swaggerParameterOtherSchemaIn = SwaggerParameterQuery
415+ , swaggerParameterOtherSchemaType = SwaggerParamInteger
416+ , swaggerParameterOtherSchemaFormat = Just "int32" } }) ]
417+
418+parametersDefinitionExampleJSON :: Value
419+parametersDefinitionExampleJSON = [aesonQQ|
420+{
421+ "skipParam": {
422+ "name": "skip",
423+ "in": "query",
424+ "description": "number of items to skip",
425+ "required": true,
426+ "type": "integer",
427+ "format": "int32"
428+ },
429+ "limitParam": {
430+ "name": "limit",
431+ "in": "query",
432+ "description": "max records to return",
433+ "required": true,
434+ "type": "integer",
435+ "format": "int32"
436+ }
437+}
438+|]