@@ -350,11 +350,54 @@ data SwaggerCollectionFormat
350350 | SwaggerCollectionMulti
351351 deriving (Show)
352352
353+data SwaggerItemsType
354+ = SwaggerItemsString
355+ | SwaggerItemsNumber
356+ | SwaggerItemsInteger
357+ | SwaggerItemsBoolean
358+ | SwaggerItemsArray
359+ deriving (Show)
360+
361+-- | Determines the format of the nested array.
362+data SwaggerItemsCollectionFormat
363+ = SwaggerItemsCollectionCSV -- ^ Comma separated values: @foo,bar@.
364+ | SwaggerItemsCollectionSSV -- ^ Space separated values @foo bar@.
365+ | SwaggerItemsCollectionTSV -- ^ Tab separated values @foo\\tbar@.
366+ | SwaggerItemsCollectionPipes -- ^ Pipe separated values @foo|bar@.
367+ deriving (Show)
368+
353369data SwaggerSchema = SwaggerSchema
354370 deriving (Show)
355371
356372data SwaggerItems = SwaggerItems
357− deriving (Show)
373+ { -- | The internal type of the array.
374+ swaggerItemsType :: SwaggerItemsType
375+
376+ -- | The extending format for the previously mentioned type.
377+ , swaggerItemsFormat :: SwaggerFormat
378+
379+ -- | __Required if type is @'SwaggerItemsArray'@.__
380+ -- Describes the type of items in the array.
381+ , swaggerItemsCollectionFormat :: SwaggerItemsCollectionFormat
382+
383+ -- | Declares the value of the item that the server will use if none is provided.
384+ -- (Note: "default" has no meaning for required items.)
385+ -- Unlike JSON Schema this value MUST conform to the defined type for the data type.
386+ , swaggerItemsDefault :: JSON.Value
387+
388+ , swaggerItemsMaximum :: Maybe Integer
389+ , swaggerItemsExclusiveMaximum :: Maybe Bool
390+ , swaggerItemsMinimum :: Maybe Integer
391+ , swaggerItemsExclusiveMinimum :: Maybe Bool
392+ , swaggerItemsMaxLength :: Maybe Integer
393+ , swaggerItemsMinLength :: Maybe Integer
394+ , swaggerItemsPattern :: Maybe Text
395+ , swaggerItemsMaxItems :: Maybe Integer
396+ , swaggerItemsMinItems :: Maybe Integer
397+ , swaggerItemsUniqueItems :: Maybe Bool
398+ , swaggerItemsEnum :: Maybe [JSON.Value]
399+ , swaggerItemsMultipleOf :: Maybe Integer
400+ } deriving (Show)
358401
359402data SwaggerResponses = SwaggerResponses
360403 deriving (Show)