amazonka-dynamodb 0.0.0 → 0.0.1

raw patch · 10 files changed

+147/−99 lines, 10 filesdep ~amazonka-corePVP: major bump suggested

API removals or changes: PVP suggests a major version bump

Dependency ranges changed: amazonka-core

API changes (from Hackage documentation)

Files

• amazonka-dynamodb.cabal +3/−3
• gen/Network/AWS/DynamoDB/BatchGetItem.hs +3/−3
• gen/Network/AWS/DynamoDB/BatchWriteItem.hs +6/−6
• gen/Network/AWS/DynamoDB/DeleteItem.hs +12/−12
• gen/Network/AWS/DynamoDB/GetItem.hs +3/−3
• gen/Network/AWS/DynamoDB/PutItem.hs +12/−12
• gen/Network/AWS/DynamoDB/Query.hs +9/−9
• gen/Network/AWS/DynamoDB/Scan.hs +9/−9
• gen/Network/AWS/DynamoDB/Types.hs +78/−30
• gen/Network/AWS/DynamoDB/UpdateItem.hs +12/−12

@@ -1,5 +1,5 @@ name:                  amazonka-dynamodb-version:               0.0.0+version:               0.0.1 synopsis:              Amazon DynamoDB SDK. homepage:              https://github.com/brendanhay/amazonka license:               OtherLicense@@ -57,5 +57,5 @@     other-modules:      build-depends:-          amazonka-core-        , base          >= 4.7 && < 5+          amazonka-core == 0.0.1.*+        , base          >= 4.7     && < 5

@@ -86,7 +86,7 @@  data BatchGetItem = BatchGetItem     { _bgiRequestItems           :: Map Text KeysAndAttributes-    , _bgiReturnConsumedCapacity :: Maybe Text+    , _bgiReturnConsumedCapacity :: Maybe ReturnConsumedCapacity     } deriving (Eq, Show)  -- | 'BatchGetItem' constructor.@@ -95,7 +95,7 @@ -- -- * 'bgiRequestItems' @::@ 'HashMap' 'Text' 'KeysAndAttributes' ----- * 'bgiReturnConsumedCapacity' @::@ 'Maybe' 'Text'+-- * 'bgiReturnConsumedCapacity' @::@ 'Maybe' 'ReturnConsumedCapacity' -- batchGetItem :: BatchGetItem batchGetItem = BatchGetItem@@ -121,7 +121,7 @@ bgiRequestItems :: Lens' BatchGetItem (HashMap Text KeysAndAttributes) bgiRequestItems = lens _bgiRequestItems (\s a -> s { _bgiRequestItems = a }) . _Map -bgiReturnConsumedCapacity :: Lens' BatchGetItem (Maybe Text)+bgiReturnConsumedCapacity :: Lens' BatchGetItem (Maybe ReturnConsumedCapacity) bgiReturnConsumedCapacity =     lens _bgiReturnConsumedCapacity         (\s a -> s { _bgiReturnConsumedCapacity = a })

@@ -99,8 +99,8 @@  data BatchWriteItem = BatchWriteItem     { _bwiRequestItems                :: Map Text (List1 "RequestItems" WriteRequest)-    , _bwiReturnConsumedCapacity      :: Maybe Text-    , _bwiReturnItemCollectionMetrics :: Maybe Text+    , _bwiReturnConsumedCapacity      :: Maybe ReturnConsumedCapacity+    , _bwiReturnItemCollectionMetrics :: Maybe ReturnItemCollectionMetrics     } deriving (Eq, Show)  -- | 'BatchWriteItem' constructor.@@ -109,9 +109,9 @@ -- -- * 'bwiRequestItems' @::@ 'HashMap' 'Text' ('NonEmpty' 'WriteRequest') ----- * 'bwiReturnConsumedCapacity' @::@ 'Maybe' 'Text'+-- * 'bwiReturnConsumedCapacity' @::@ 'Maybe' 'ReturnConsumedCapacity' ----- * 'bwiReturnItemCollectionMetrics' @::@ 'Maybe' 'Text'+-- * 'bwiReturnItemCollectionMetrics' @::@ 'Maybe' 'ReturnItemCollectionMetrics' -- batchWriteItem :: BatchWriteItem batchWriteItem = BatchWriteItem@@ -143,7 +143,7 @@ bwiRequestItems :: Lens' BatchWriteItem (HashMap Text (NonEmpty WriteRequest)) bwiRequestItems = lens _bwiRequestItems (\s a -> s { _bwiRequestItems = a }) . _Map -bwiReturnConsumedCapacity :: Lens' BatchWriteItem (Maybe Text)+bwiReturnConsumedCapacity :: Lens' BatchWriteItem (Maybe ReturnConsumedCapacity) bwiReturnConsumedCapacity =     lens _bwiReturnConsumedCapacity         (\s a -> s { _bwiReturnConsumedCapacity = a })@@ -152,7 +152,7 @@ -- collections, if any, that were modified during the operation are returned -- in the response. If set to NONE (the default), no statistics are -- returned.-bwiReturnItemCollectionMetrics :: Lens' BatchWriteItem (Maybe Text)+bwiReturnItemCollectionMetrics :: Lens' BatchWriteItem (Maybe ReturnItemCollectionMetrics) bwiReturnItemCollectionMetrics =     lens _bwiReturnItemCollectionMetrics         (\s a -> s { _bwiReturnItemCollectionMetrics = a })

@@ -67,14 +67,14 @@  data DeleteItem = DeleteItem     { _diConditionExpression         :: Maybe Text-    , _diConditionalOperator         :: Maybe Text+    , _diConditionalOperator         :: Maybe ConditionalOperator     , _diExpected                    :: Map Text ExpectedAttributeValue     , _diExpressionAttributeNames    :: Map Text Text     , _diExpressionAttributeValues   :: Map Text AttributeValue     , _diKey                         :: Map Text AttributeValue-    , _diReturnConsumedCapacity      :: Maybe Text-    , _diReturnItemCollectionMetrics :: Maybe Text-    , _diReturnValues                :: Maybe Text+    , _diReturnConsumedCapacity      :: Maybe ReturnConsumedCapacity+    , _diReturnItemCollectionMetrics :: Maybe ReturnItemCollectionMetrics+    , _diReturnValues                :: Maybe ReturnValue     , _diTableName                   :: Text     } deriving (Eq, Show) @@ -84,7 +84,7 @@ -- -- * 'diConditionExpression' @::@ 'Maybe' 'Text' ----- * 'diConditionalOperator' @::@ 'Maybe' 'Text'+-- * 'diConditionalOperator' @::@ 'Maybe' 'ConditionalOperator' -- -- * 'diExpected' @::@ 'HashMap' 'Text' 'ExpectedAttributeValue' --@@ -94,11 +94,11 @@ -- -- * 'diKey' @::@ 'HashMap' 'Text' 'AttributeValue' ----- * 'diReturnConsumedCapacity' @::@ 'Maybe' 'Text'+-- * 'diReturnConsumedCapacity' @::@ 'Maybe' 'ReturnConsumedCapacity' ----- * 'diReturnItemCollectionMetrics' @::@ 'Maybe' 'Text'+-- * 'diReturnItemCollectionMetrics' @::@ 'Maybe' 'ReturnItemCollectionMetrics' ----- * 'diReturnValues' @::@ 'Maybe' 'Text'+-- * 'diReturnValues' @::@ 'Maybe' 'ReturnValue' -- -- * 'diTableName' @::@ 'Text' --@@ -135,7 +135,7 @@ -- one of the conditions evaluate to true, then the entire map evaluates to -- true. If you omit ConditionalOperator, then AND is the default. The -- operation will succeed only if the entire map evaluates to true.-diConditionalOperator :: Lens' DeleteItem (Maybe Text)+diConditionalOperator :: Lens' DeleteItem (Maybe ConditionalOperator) diConditionalOperator =     lens _diConditionalOperator (\s a -> s { _diConditionalOperator = a }) @@ -305,7 +305,7 @@ diKey :: Lens' DeleteItem (HashMap Text AttributeValue) diKey = lens _diKey (\s a -> s { _diKey = a }) . _Map -diReturnConsumedCapacity :: Lens' DeleteItem (Maybe Text)+diReturnConsumedCapacity :: Lens' DeleteItem (Maybe ReturnConsumedCapacity) diReturnConsumedCapacity =     lens _diReturnConsumedCapacity         (\s a -> s { _diReturnConsumedCapacity = a })@@ -314,7 +314,7 @@ -- collections, if any, that were modified during the operation are returned -- in the response. If set to NONE (the default), no statistics are -- returned.-diReturnItemCollectionMetrics :: Lens' DeleteItem (Maybe Text)+diReturnItemCollectionMetrics :: Lens' DeleteItem (Maybe ReturnItemCollectionMetrics) diReturnItemCollectionMetrics =     lens _diReturnItemCollectionMetrics         (\s a -> s { _diReturnItemCollectionMetrics = a })@@ -324,7 +324,7 @@ -- ReturnValues is not specified, or if its value is NONE, then nothing is -- returned. (This setting is the default for ReturnValues.) ALL_OLD - The -- content of the old item is returned.-diReturnValues :: Lens' DeleteItem (Maybe Text)+diReturnValues :: Lens' DeleteItem (Maybe ReturnValue) diReturnValues = lens _diReturnValues (\s a -> s { _diReturnValues = a })  -- | The name of the table from which to delete the item.

@@ -63,7 +63,7 @@     , _giExpressionAttributeNames :: Map Text Text     , _giKey                      :: Map Text AttributeValue     , _giProjectionExpression     :: Maybe Text-    , _giReturnConsumedCapacity   :: Maybe Text+    , _giReturnConsumedCapacity   :: Maybe ReturnConsumedCapacity     , _giTableName                :: Text     } deriving (Eq, Show) @@ -81,7 +81,7 @@ -- -- * 'giProjectionExpression' @::@ 'Maybe' 'Text' ----- * 'giReturnConsumedCapacity' @::@ 'Maybe' 'Text'+-- * 'giReturnConsumedCapacity' @::@ 'Maybe' 'ReturnConsumedCapacity' -- -- * 'giTableName' @::@ 'Text' --@@ -155,7 +155,7 @@ giProjectionExpression =     lens _giProjectionExpression (\s a -> s { _giProjectionExpression = a }) -giReturnConsumedCapacity :: Lens' GetItem (Maybe Text)+giReturnConsumedCapacity :: Lens' GetItem (Maybe ReturnConsumedCapacity) giReturnConsumedCapacity =     lens _giReturnConsumedCapacity         (\s a -> s { _giReturnConsumedCapacity = a })

@@ -73,14 +73,14 @@  data PutItem = PutItem     { _piConditionExpression         :: Maybe Text-    , _piConditionalOperator         :: Maybe Text+    , _piConditionalOperator         :: Maybe ConditionalOperator     , _piExpected                    :: Map Text ExpectedAttributeValue     , _piExpressionAttributeNames    :: Map Text Text     , _piExpressionAttributeValues   :: Map Text AttributeValue     , _piItem                        :: Map Text AttributeValue-    , _piReturnConsumedCapacity      :: Maybe Text-    , _piReturnItemCollectionMetrics :: Maybe Text-    , _piReturnValues                :: Maybe Text+    , _piReturnConsumedCapacity      :: Maybe ReturnConsumedCapacity+    , _piReturnItemCollectionMetrics :: Maybe ReturnItemCollectionMetrics+    , _piReturnValues                :: Maybe ReturnValue     , _piTableName                   :: Text     } deriving (Eq, Show) @@ -90,7 +90,7 @@ -- -- * 'piConditionExpression' @::@ 'Maybe' 'Text' ----- * 'piConditionalOperator' @::@ 'Maybe' 'Text'+-- * 'piConditionalOperator' @::@ 'Maybe' 'ConditionalOperator' -- -- * 'piExpected' @::@ 'HashMap' 'Text' 'ExpectedAttributeValue' --@@ -100,11 +100,11 @@ -- -- * 'piItem' @::@ 'HashMap' 'Text' 'AttributeValue' ----- * 'piReturnConsumedCapacity' @::@ 'Maybe' 'Text'+-- * 'piReturnConsumedCapacity' @::@ 'Maybe' 'ReturnConsumedCapacity' ----- * 'piReturnItemCollectionMetrics' @::@ 'Maybe' 'Text'+-- * 'piReturnItemCollectionMetrics' @::@ 'Maybe' 'ReturnItemCollectionMetrics' ----- * 'piReturnValues' @::@ 'Maybe' 'Text'+-- * 'piReturnValues' @::@ 'Maybe' 'ReturnValue' -- -- * 'piTableName' @::@ 'Text' --@@ -141,7 +141,7 @@ -- one of the conditions evaluate to true, then the entire map evaluates to -- true. If you omit ConditionalOperator, then AND is the default. The -- operation will succeed only if the entire map evaluates to true.-piConditionalOperator :: Lens' PutItem (Maybe Text)+piConditionalOperator :: Lens' PutItem (Maybe ConditionalOperator) piConditionalOperator =     lens _piConditionalOperator (\s a -> s { _piConditionalOperator = a }) @@ -316,7 +316,7 @@ piItem :: Lens' PutItem (HashMap Text AttributeValue) piItem = lens _piItem (\s a -> s { _piItem = a }) . _Map -piReturnConsumedCapacity :: Lens' PutItem (Maybe Text)+piReturnConsumedCapacity :: Lens' PutItem (Maybe ReturnConsumedCapacity) piReturnConsumedCapacity =     lens _piReturnConsumedCapacity         (\s a -> s { _piReturnConsumedCapacity = a })@@ -325,7 +325,7 @@ -- collections, if any, that were modified during the operation are returned -- in the response. If set to NONE (the default), no statistics are -- returned.-piReturnItemCollectionMetrics :: Lens' PutItem (Maybe Text)+piReturnItemCollectionMetrics :: Lens' PutItem (Maybe ReturnItemCollectionMetrics) piReturnItemCollectionMetrics =     lens _piReturnItemCollectionMetrics         (\s a -> s { _piReturnItemCollectionMetrics = a })@@ -336,7 +336,7 @@ -- NONE, then nothing is returned. (This setting is the default for -- ReturnValues.) ALL_OLD - If PutItem overwrote an attribute name-value -- pair, then the content of the old item is returned.-piReturnValues :: Lens' PutItem (Maybe Text)+piReturnValues :: Lens' PutItem (Maybe ReturnValue) piReturnValues = lens _piReturnValues (\s a -> s { _piReturnValues = a })  -- | The name of the table to contain the item.

@@ -83,7 +83,7 @@  data Query = Query     { _qAttributesToGet           :: List1 "AttributesToGet" Text-    , _qConditionalOperator       :: Maybe Text+    , _qConditionalOperator       :: Maybe ConditionalOperator     , _qConsistentRead            :: Maybe Bool     , _qExclusiveStartKey         :: Map Text AttributeValue     , _qExpressionAttributeNames  :: Map Text Text@@ -94,9 +94,9 @@     , _qLimit                     :: Maybe Nat     , _qProjectionExpression      :: Maybe Text     , _qQueryFilter               :: Map Text Condition-    , _qReturnConsumedCapacity    :: Maybe Text+    , _qReturnConsumedCapacity    :: Maybe ReturnConsumedCapacity     , _qScanIndexForward          :: Maybe Bool-    , _qSelect                    :: Maybe Text+    , _qSelect                    :: Maybe Select     , _qTableName                 :: Text     } deriving (Eq, Show) @@ -106,7 +106,7 @@ -- -- * 'qAttributesToGet' @::@ 'NonEmpty' 'Text' ----- * 'qConditionalOperator' @::@ 'Maybe' 'Text'+-- * 'qConditionalOperator' @::@ 'Maybe' 'ConditionalOperator' -- -- * 'qConsistentRead' @::@ 'Maybe' 'Bool' --@@ -128,11 +128,11 @@ -- -- * 'qQueryFilter' @::@ 'HashMap' 'Text' 'Condition' ----- * 'qReturnConsumedCapacity' @::@ 'Maybe' 'Text'+-- * 'qReturnConsumedCapacity' @::@ 'Maybe' 'ReturnConsumedCapacity' -- -- * 'qScanIndexForward' @::@ 'Maybe' 'Bool' ----- * 'qSelect' @::@ 'Maybe' 'Text'+-- * 'qSelect' @::@ 'Maybe' 'Select' -- -- * 'qTableName' @::@ 'Text' --@@ -192,7 +192,7 @@ -- one of the conditions evaluate to true, then the entire map evaluates to -- true. If you omit ConditionalOperator, then AND is the default. The -- operation will succeed only if the entire map evaluates to true.-qConditionalOperator :: Lens' Query (Maybe Text)+qConditionalOperator :: Lens' Query (Maybe ConditionalOperator) qConditionalOperator =     lens _qConditionalOperator (\s a -> s { _qConditionalOperator = a }) @@ -374,7 +374,7 @@ qQueryFilter :: Lens' Query (HashMap Text Condition) qQueryFilter = lens _qQueryFilter (\s a -> s { _qQueryFilter = a }) . _Map -qReturnConsumedCapacity :: Lens' Query (Maybe Text)+qReturnConsumedCapacity :: Lens' Query (Maybe ReturnConsumedCapacity) qReturnConsumedCapacity =     lens _qReturnConsumedCapacity (\s a -> s { _qReturnConsumedCapacity = a }) @@ -420,7 +420,7 @@ -- single request, unless the value for Select is SPECIFIC_ATTRIBUTES. (This -- usage is equivalent to specifying AttributesToGet without any value for -- Select.).-qSelect :: Lens' Query (Maybe Text)+qSelect :: Lens' Query (Maybe Select) qSelect = lens _qSelect (\s a -> s { _qSelect = a })  -- | The name of the table containing the requested items.

@@ -75,17 +75,17 @@  data Scan = Scan     { _sAttributesToGet           :: List1 "AttributesToGet" Text-    , _sConditionalOperator       :: Maybe Text+    , _sConditionalOperator       :: Maybe ConditionalOperator     , _sExclusiveStartKey         :: Map Text AttributeValue     , _sExpressionAttributeNames  :: Map Text Text     , _sExpressionAttributeValues :: Map Text AttributeValue     , _sFilterExpression          :: Maybe Text     , _sLimit                     :: Maybe Nat     , _sProjectionExpression      :: Maybe Text-    , _sReturnConsumedCapacity    :: Maybe Text+    , _sReturnConsumedCapacity    :: Maybe ReturnConsumedCapacity     , _sScanFilter                :: Map Text Condition     , _sSegment                   :: Maybe Nat-    , _sSelect                    :: Maybe Text+    , _sSelect                    :: Maybe Select     , _sTableName                 :: Text     , _sTotalSegments             :: Maybe Nat     } deriving (Eq, Show)@@ -96,7 +96,7 @@ -- -- * 'sAttributesToGet' @::@ 'NonEmpty' 'Text' ----- * 'sConditionalOperator' @::@ 'Maybe' 'Text'+-- * 'sConditionalOperator' @::@ 'Maybe' 'ConditionalOperator' -- -- * 'sExclusiveStartKey' @::@ 'HashMap' 'Text' 'AttributeValue' --@@ -110,13 +110,13 @@ -- -- * 'sProjectionExpression' @::@ 'Maybe' 'Text' ----- * 'sReturnConsumedCapacity' @::@ 'Maybe' 'Text'+-- * 'sReturnConsumedCapacity' @::@ 'Maybe' 'ReturnConsumedCapacity' -- -- * 'sScanFilter' @::@ 'HashMap' 'Text' 'Condition' -- -- * 'sSegment' @::@ 'Maybe' 'Natural' ----- * 'sSelect' @::@ 'Maybe' 'Text'+-- * 'sSelect' @::@ 'Maybe' 'Select' -- -- * 'sTableName' @::@ 'Text' --@@ -165,7 +165,7 @@ -- one of the conditions evaluate to true, then the entire map evaluates to -- true. If you omit ConditionalOperator, then AND is the default. The -- operation will succeed only if the entire map evaluates to true.-sConditionalOperator :: Lens' Scan (Maybe Text)+sConditionalOperator :: Lens' Scan (Maybe ConditionalOperator) sConditionalOperator =     lens _sConditionalOperator (\s a -> s { _sConditionalOperator = a }) @@ -240,7 +240,7 @@ sProjectionExpression =     lens _sProjectionExpression (\s a -> s { _sProjectionExpression = a }) -sReturnConsumedCapacity :: Lens' Scan (Maybe Text)+sReturnConsumedCapacity :: Lens' Scan (Maybe ReturnConsumedCapacity) sReturnConsumedCapacity =     lens _sReturnConsumedCapacity (\s a -> s { _sReturnConsumedCapacity = a }) @@ -299,7 +299,7 @@ -- in a single request, unless the value for Select is SPECIFIC_ATTRIBUTES. -- (This usage is equivalent to specifying AttributesToGet without any value -- for Select.).-sSelect :: Lens' Scan (Maybe Text)+sSelect :: Lens' Scan (Maybe Select) sSelect = lens _sSelect (\s a -> s { _sSelect = a })  -- | The name of the table containing the requested items.

@@ -402,6 +402,10 @@         Hash  -> "HASH"         Range -> "RANGE" +instance ToByteString KeyType+instance ToHeader     KeyType+instance ToQuery      KeyType+ instance FromJSON KeyType where     parseJSON = parseJSONText "KeyType" @@ -548,6 +552,10 @@         Deleting -> "DELETING"         Updating -> "UPDATING" +instance ToByteString IndexStatus+instance ToHeader     IndexStatus+instance ToQuery      IndexStatus+ instance FromJSON IndexStatus where     parseJSON = parseJSONText "IndexStatus" @@ -625,6 +633,10 @@         TSDeleting -> "DELETING"         TSUpdating -> "UPDATING" +instance ToByteString TableStatus+instance ToHeader     TableStatus+instance ToQuery      TableStatus+ instance FromJSON TableStatus where     parseJSON = parseJSONText "TableStatus" @@ -650,6 +662,10 @@         Include  -> "INCLUDE"         KeysOnly -> "KEYS_ONLY" +instance ToByteString ProjectionType+instance ToHeader     ProjectionType+instance ToQuery      ProjectionType+ instance FromJSON ProjectionType where     parseJSON = parseJSONText "ProjectionType" @@ -666,7 +682,7 @@     , _tdProvisionedThroughput  :: Maybe ProvisionedThroughputDescription     , _tdTableName              :: Maybe Text     , _tdTableSizeBytes         :: Maybe Integer-    , _tdTableStatus            :: Maybe Text+    , _tdTableStatus            :: Maybe TableStatus     } deriving (Eq, Show)  -- | 'TableDescription' constructor.@@ -691,7 +707,7 @@ -- -- * 'tdTableSizeBytes' @::@ 'Maybe' 'Integer' ----- * 'tdTableStatus' @::@ 'Maybe' 'Text'+-- * 'tdTableStatus' @::@ 'Maybe' 'TableStatus' -- tableDescription :: NonEmpty KeySchemaElement -- ^ 'tdKeySchema'                  -> TableDescription@@ -828,7 +844,7 @@ -- updated, as the result of an UpdateTable operation. DELETING - The table -- is being deleted, as the result of a DeleteTable operation. ACTIVE - The -- table is ready for use.-tdTableStatus :: Lens' TableDescription (Maybe Text)+tdTableStatus :: Lens' TableDescription (Maybe TableStatus) tdTableStatus = lens _tdTableStatus (\s a -> s { _tdTableStatus = a })  instance FromJSON TableDescription where@@ -975,6 +991,10 @@         None    -> "NONE"         Total   -> "TOTAL" +instance ToByteString ReturnConsumedCapacity+instance ToHeader     ReturnConsumedCapacity+instance ToQuery      ReturnConsumedCapacity+ instance FromJSON ReturnConsumedCapacity where     parseJSON = parseJSONText "ReturnConsumedCapacity" @@ -997,6 +1017,10 @@         RICMNone -> "NONE"         RICMSize -> "SIZE" +instance ToByteString ReturnItemCollectionMetrics+instance ToHeader     ReturnItemCollectionMetrics+instance ToQuery      ReturnItemCollectionMetrics+ instance FromJSON ReturnItemCollectionMetrics where     parseJSON = parseJSONText "ReturnItemCollectionMetrics" @@ -1004,7 +1028,7 @@     toJSON = toJSONText  data AttributeValueUpdate = AttributeValueUpdate-    { _avuAction :: Maybe Text+    { _avuAction :: Maybe AttributeAction     , _avuValue  :: Maybe AttributeValue     } deriving (Eq, Show) @@ -1012,7 +1036,7 @@ -- -- The fields accessible through corresponding lenses are: ----- * 'avuAction' @::@ 'Maybe' 'Text'+-- * 'avuAction' @::@ 'Maybe' 'AttributeAction' -- -- * 'avuValue' @::@ 'Maybe' 'AttributeValue' --@@ -1056,7 +1080,7 @@ -- with the supplied primary key and number (or set of numbers) for the -- attribute value. The only data types allowed are number and number set; -- no other data types can be specified.-avuAction :: Lens' AttributeValueUpdate (Maybe Text)+avuAction :: Lens' AttributeValueUpdate (Maybe AttributeAction) avuAction = lens _avuAction (\s a -> s { _avuAction = a })  avuValue :: Lens' AttributeValueUpdate (Maybe AttributeValue)@@ -1075,7 +1099,7 @@  data ExpectedAttributeValue = ExpectedAttributeValue     { _eavAttributeValueList :: List "AttributeValueList" AttributeValue-    , _eavComparisonOperator :: Maybe Text+    , _eavComparisonOperator :: Maybe ComparisonOperator     , _eavExists             :: Maybe Bool     , _eavValue              :: Maybe AttributeValue     } deriving (Eq, Show)@@ -1086,7 +1110,7 @@ -- -- * 'eavAttributeValueList' @::@ ['AttributeValue'] ----- * 'eavComparisonOperator' @::@ 'Maybe' 'Text'+-- * 'eavComparisonOperator' @::@ 'Maybe' 'ComparisonOperator' -- -- * 'eavExists' @::@ 'Maybe' 'Bool' --@@ -1196,7 +1220,7 @@ -- a different type than the one specified in the request, the value does -- not match. For example, {"S":"6"} does not compare to {"N":"6"}. Also, -- {"N":"6"} does not compare to {"NS":["6", "2", "1"]}.-eavComparisonOperator :: Lens' ExpectedAttributeValue (Maybe Text)+eavComparisonOperator :: Lens' ExpectedAttributeValue (Maybe ComparisonOperator) eavComparisonOperator =     lens _eavComparisonOperator (\s a -> s { _eavComparisonOperator = a }) @@ -1239,8 +1263,8 @@  data AttributeDefinition = AttributeDefinition     { _adAttributeName :: Text-    , _adAttributeType :: Text-    } deriving (Eq, Ord, Show)+    , _adAttributeType :: ScalarAttributeType+    } deriving (Eq, Show)  -- | 'AttributeDefinition' constructor. --@@ -1248,10 +1272,10 @@ -- -- * 'adAttributeName' @::@ 'Text' ----- * 'adAttributeType' @::@ 'Text'+-- * 'adAttributeType' @::@ 'ScalarAttributeType' -- attributeDefinition :: Text -- ^ 'adAttributeName'-                    -> Text -- ^ 'adAttributeType'+                    -> ScalarAttributeType -- ^ 'adAttributeType'                     -> AttributeDefinition attributeDefinition p1 p2 = AttributeDefinition     { _adAttributeName = p1@@ -1263,7 +1287,7 @@ adAttributeName = lens _adAttributeName (\s a -> s { _adAttributeName = a })  -- | The data type for the attribute.-adAttributeType :: Lens' AttributeDefinition Text+adAttributeType :: Lens' AttributeDefinition ScalarAttributeType adAttributeType = lens _adAttributeType (\s a -> s { _adAttributeType = a })  instance FromJSON AttributeDefinition where@@ -1326,6 +1350,10 @@         NotNull     -> "NOT_NULL"         Null        -> "NULL" +instance ToByteString ComparisonOperator+instance ToHeader     ComparisonOperator+instance ToQuery      ComparisonOperator+ instance FromJSON ComparisonOperator where     parseJSON = parseJSONText "ComparisonOperator" @@ -1357,6 +1385,10 @@         RVUpdatedNew -> "UPDATED_NEW"         RVUpdatedOld -> "UPDATED_OLD" +instance ToByteString ReturnValue+instance ToHeader     ReturnValue+instance ToQuery      ReturnValue+ instance FromJSON ReturnValue where     parseJSON = parseJSONText "ReturnValue" @@ -1418,7 +1450,7 @@ data GlobalSecondaryIndexDescription = GlobalSecondaryIndexDescription     { _gsidIndexName             :: Maybe Text     , _gsidIndexSizeBytes        :: Maybe Integer-    , _gsidIndexStatus           :: Maybe Text+    , _gsidIndexStatus           :: Maybe IndexStatus     , _gsidItemCount             :: Maybe Integer     , _gsidKeySchema             :: List1 "KeySchema" KeySchemaElement     , _gsidProjection            :: Maybe Projection@@ -1433,7 +1465,7 @@ -- -- * 'gsidIndexSizeBytes' @::@ 'Maybe' 'Integer' ----- * 'gsidIndexStatus' @::@ 'Maybe' 'Text'+-- * 'gsidIndexStatus' @::@ 'Maybe' 'IndexStatus' -- -- * 'gsidItemCount' @::@ 'Maybe' 'Integer' --@@ -1471,7 +1503,7 @@ -- UPDATING - The index is being updated, as the result of a CreateTable or -- UpdateTable operation. DELETING - The index is being deleted, as the -- result of a DeleteTable operation. ACTIVE - The index is ready for use.-gsidIndexStatus :: Lens' GlobalSecondaryIndexDescription (Maybe Text)+gsidIndexStatus :: Lens' GlobalSecondaryIndexDescription (Maybe IndexStatus) gsidIndexStatus = lens _gsidIndexStatus (\s a -> s { _gsidIndexStatus = a })  -- | The number of items in the specified index. DynamoDB updates this value@@ -1824,6 +1856,10 @@         Delete' -> "DELETE"         Put     -> "PUT" +instance ToByteString AttributeAction+instance ToHeader     AttributeAction+instance ToQuery      AttributeAction+ instance FromJSON AttributeAction where     parseJSON = parseJSONText "AttributeAction" @@ -1849,6 +1885,10 @@         N -> "N"         S -> "S" +instance ToByteString ScalarAttributeType+instance ToHeader     ScalarAttributeType+instance ToQuery      ScalarAttributeType+ instance FromJSON ScalarAttributeType where     parseJSON = parseJSONText "ScalarAttributeType" @@ -1857,8 +1897,8 @@  data Projection = Projection     { _pNonKeyAttributes :: List1 "NonKeyAttributes" Text-    , _pProjectionType   :: Maybe Text-    } deriving (Eq, Ord, Show)+    , _pProjectionType   :: Maybe ProjectionType+    } deriving (Eq, Show)  -- | 'Projection' constructor. --@@ -1866,7 +1906,7 @@ -- -- * 'pNonKeyAttributes' @::@ 'NonEmpty' 'Text' ----- * 'pProjectionType' @::@ 'Maybe' 'Text'+-- * 'pProjectionType' @::@ 'Maybe' 'ProjectionType' -- projection :: NonEmpty Text -- ^ 'pNonKeyAttributes'            -> Projection@@ -1890,7 +1930,7 @@ -- the specified table attributes are projected into the index. The list of -- projected attributes are in NonKeyAttributes. ALL - All of the table -- attributes are projected into the index.-pProjectionType :: Lens' Projection (Maybe Text)+pProjectionType :: Lens' Projection (Maybe ProjectionType) pProjectionType = lens _pProjectionType (\s a -> s { _pProjectionType = a })  instance FromJSON Projection where@@ -1926,6 +1966,10 @@         Count                  -> "COUNT"         SpecificAttributes     -> "SPECIFIC_ATTRIBUTES" +instance ToByteString Select+instance ToHeader     Select+instance ToQuery      Select+ instance FromJSON Select where     parseJSON = parseJSONText "Select" @@ -1934,8 +1978,8 @@  data KeySchemaElement = KeySchemaElement     { _kseAttributeName :: Text-    , _kseKeyType       :: Text-    } deriving (Eq, Ord, Show)+    , _kseKeyType       :: KeyType+    } deriving (Eq, Show)  -- | 'KeySchemaElement' constructor. --@@ -1943,10 +1987,10 @@ -- -- * 'kseAttributeName' @::@ 'Text' ----- * 'kseKeyType' @::@ 'Text'+-- * 'kseKeyType' @::@ 'KeyType' -- keySchemaElement :: Text -- ^ 'kseAttributeName'-                 -> Text -- ^ 'kseKeyType'+                 -> KeyType -- ^ 'kseKeyType'                  -> KeySchemaElement keySchemaElement p1 p2 = KeySchemaElement     { _kseAttributeName = p1@@ -1959,7 +2003,7 @@  -- | The attribute data, consisting of the data type and the attribute value -- itself.-kseKeyType :: Lens' KeySchemaElement Text+kseKeyType :: Lens' KeySchemaElement KeyType kseKeyType = lens _kseKeyType (\s a -> s { _kseKeyType = a })  instance FromJSON KeySchemaElement where@@ -2080,7 +2124,7 @@  data Condition = Condition     { _cAttributeValueList :: List "AttributeValueList" AttributeValue-    , _cComparisonOperator :: Text+    , _cComparisonOperator :: ComparisonOperator     } deriving (Eq, Show)  -- | 'Condition' constructor.@@ -2089,9 +2133,9 @@ -- -- * 'cAttributeValueList' @::@ ['AttributeValue'] ----- * 'cComparisonOperator' @::@ 'Text'+-- * 'cComparisonOperator' @::@ 'ComparisonOperator' ---condition :: Text -- ^ 'cComparisonOperator'+condition :: ComparisonOperator -- ^ 'cComparisonOperator'           -> Condition condition p1 = Condition     { _cComparisonOperator = p1@@ -2194,7 +2238,7 @@ -- to {"NS":["6", "2", "1"]} For usage examples of AttributeValueList and -- ComparisonOperator, see Legacy Conditional Parameters in the Amazon -- DynamoDB Developer Guide.-cComparisonOperator :: Lens' Condition Text+cComparisonOperator :: Lens' Condition ComparisonOperator cComparisonOperator =     lens _cComparisonOperator (\s a -> s { _cComparisonOperator = a }) @@ -2224,6 +2268,10 @@     toText = \case         And -> "AND"         Or  -> "OR"++instance ToByteString ConditionalOperator+instance ToHeader     ConditionalOperator+instance ToQuery      ConditionalOperator  instance FromJSON ConditionalOperator where     parseJSON = parseJSONText "ConditionalOperator"

@@ -67,14 +67,14 @@ data UpdateItem = UpdateItem     { _uiAttributeUpdates            :: Map Text AttributeValueUpdate     , _uiConditionExpression         :: Maybe Text-    , _uiConditionalOperator         :: Maybe Text+    , _uiConditionalOperator         :: Maybe ConditionalOperator     , _uiExpected                    :: Map Text ExpectedAttributeValue     , _uiExpressionAttributeNames    :: Map Text Text     , _uiExpressionAttributeValues   :: Map Text AttributeValue     , _uiKey                         :: Map Text AttributeValue-    , _uiReturnConsumedCapacity      :: Maybe Text-    , _uiReturnItemCollectionMetrics :: Maybe Text-    , _uiReturnValues                :: Maybe Text+    , _uiReturnConsumedCapacity      :: Maybe ReturnConsumedCapacity+    , _uiReturnItemCollectionMetrics :: Maybe ReturnItemCollectionMetrics+    , _uiReturnValues                :: Maybe ReturnValue     , _uiTableName                   :: Text     , _uiUpdateExpression            :: Maybe Text     } deriving (Eq, Show)@@ -87,7 +87,7 @@ -- -- * 'uiConditionExpression' @::@ 'Maybe' 'Text' ----- * 'uiConditionalOperator' @::@ 'Maybe' 'Text'+-- * 'uiConditionalOperator' @::@ 'Maybe' 'ConditionalOperator' -- -- * 'uiExpected' @::@ 'HashMap' 'Text' 'ExpectedAttributeValue' --@@ -97,11 +97,11 @@ -- -- * 'uiKey' @::@ 'HashMap' 'Text' 'AttributeValue' ----- * 'uiReturnConsumedCapacity' @::@ 'Maybe' 'Text'+-- * 'uiReturnConsumedCapacity' @::@ 'Maybe' 'ReturnConsumedCapacity' ----- * 'uiReturnItemCollectionMetrics' @::@ 'Maybe' 'Text'+-- * 'uiReturnItemCollectionMetrics' @::@ 'Maybe' 'ReturnItemCollectionMetrics' ----- * 'uiReturnValues' @::@ 'Maybe' 'Text'+-- * 'uiReturnValues' @::@ 'Maybe' 'ReturnValue' -- -- * 'uiTableName' @::@ 'Text' --@@ -195,7 +195,7 @@ -- one of the conditions evaluate to true, then the entire map evaluates to -- true. If you omit ConditionalOperator, then AND is the default. The -- operation will succeed only if the entire map evaluates to true.-uiConditionalOperator :: Lens' UpdateItem (Maybe Text)+uiConditionalOperator :: Lens' UpdateItem (Maybe ConditionalOperator) uiConditionalOperator =     lens _uiConditionalOperator (\s a -> s { _uiConditionalOperator = a }) @@ -365,7 +365,7 @@ uiKey :: Lens' UpdateItem (HashMap Text AttributeValue) uiKey = lens _uiKey (\s a -> s { _uiKey = a }) . _Map -uiReturnConsumedCapacity :: Lens' UpdateItem (Maybe Text)+uiReturnConsumedCapacity :: Lens' UpdateItem (Maybe ReturnConsumedCapacity) uiReturnConsumedCapacity =     lens _uiReturnConsumedCapacity         (\s a -> s { _uiReturnConsumedCapacity = a })@@ -374,7 +374,7 @@ -- collections, if any, that were modified during the operation are returned -- in the response. If set to NONE (the default), no statistics are -- returned.-uiReturnItemCollectionMetrics :: Lens' UpdateItem (Maybe Text)+uiReturnItemCollectionMetrics :: Lens' UpdateItem (Maybe ReturnItemCollectionMetrics) uiReturnItemCollectionMetrics =     lens _uiReturnItemCollectionMetrics         (\s a -> s { _uiReturnItemCollectionMetrics = a })@@ -388,7 +388,7 @@ -- versions of only the updated attributes are returned. ALL_NEW - All of -- the attributes of the new version of the item are returned. UPDATED_NEW - -- The new versions of only the updated attributes are returned.-uiReturnValues :: Lens' UpdateItem (Maybe Text)+uiReturnValues :: Lens' UpdateItem (Maybe ReturnValue) uiReturnValues = lens _uiReturnValues (\s a -> s { _uiReturnValues = a })  -- | The name of the table containing the item to update.