gogol-datastore 0.4.0 → 0.5.0
raw patch · 19 files changed
+667/−444 lines, 19 filesdep ~gogol-corePVP ok
version bump matches the API change (PVP)
Dependency ranges changed: gogol-core
API changes (from Hackage documentation)
Files
- README.md +1/−1
- gen/Network/Google/Datastore/Types.hs +2/−2
- gen/Network/Google/Datastore/Types/Product.hs +557/−394
- gen/Network/Google/Resource/Datastore/Projects/AllocateIds.hs +7/−3
- gen/Network/Google/Resource/Datastore/Projects/BeginTransaction.hs +7/−3
- gen/Network/Google/Resource/Datastore/Projects/Commit.hs +7/−3
- gen/Network/Google/Resource/Datastore/Projects/Export.hs +7/−3
- gen/Network/Google/Resource/Datastore/Projects/Import.hs +7/−3
- gen/Network/Google/Resource/Datastore/Projects/Indexes/Get.hs +7/−3
- gen/Network/Google/Resource/Datastore/Projects/Indexes/List.hs +7/−3
- gen/Network/Google/Resource/Datastore/Projects/Lookup.hs +7/−3
- gen/Network/Google/Resource/Datastore/Projects/Operations/Cancel.hs +7/−3
- gen/Network/Google/Resource/Datastore/Projects/Operations/Delete.hs +7/−3
- gen/Network/Google/Resource/Datastore/Projects/Operations/Get.hs +7/−3
- gen/Network/Google/Resource/Datastore/Projects/Operations/List.hs +7/−3
- gen/Network/Google/Resource/Datastore/Projects/ReserveIds.hs +7/−3
- gen/Network/Google/Resource/Datastore/Projects/Rollback.hs +7/−3
- gen/Network/Google/Resource/Datastore/Projects/RunQuery.hs +7/−3
- gogol-datastore.cabal +2/−2
README.md view
@@ -8,7 +8,7 @@ ## Version -`0.3.0`+`0.5.0` ## Description
gen/Network/Google/Datastore/Types.hs view
@@ -540,8 +540,8 @@ -- | View and manage your data across Google Cloud Platform services cloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]-cloudPlatformScope = Proxy;+cloudPlatformScope = Proxy -- | View and manage your Google Cloud Datastore data datastoreScope :: Proxy '["https://www.googleapis.com/auth/datastore"]-datastoreScope = Proxy;+datastoreScope = Proxy
gen/Network/Google/Datastore/Types/Product.hs view
@@ -27,11 +27,14 @@ -- Values must be within normalized ranges. -- -- /See:/ 'latLng' smart constructor.-data LatLng = LatLng'+data LatLng =+ LatLng' { _llLatitude :: !(Maybe (Textual Double)) , _llLongitude :: !(Maybe (Textual Double))- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'LatLng' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -41,12 +44,9 @@ -- * 'llLongitude' latLng :: LatLng-latLng =- LatLng'- { _llLatitude = Nothing- , _llLongitude = Nothing- }+latLng = LatLng' {_llLatitude = Nothing, _llLongitude = Nothing} + -- | The latitude in degrees. It must be in the range [-90.0, +90.0]. llLatitude :: Lens' LatLng (Maybe Double) llLatitude@@ -78,11 +78,14 @@ -- setting ReadOptions.new_transaction in read requests. -- -- /See:/ 'transactionOptions' smart constructor.-data TransactionOptions = TransactionOptions'+data TransactionOptions =+ TransactionOptions' { _toReadWrite :: !(Maybe ReadWrite) , _toReadOnly :: !(Maybe ReadOnly)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'TransactionOptions' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -93,11 +96,9 @@ transactionOptions :: TransactionOptions transactionOptions =- TransactionOptions'- { _toReadWrite = Nothing- , _toReadOnly = Nothing- }+ TransactionOptions' {_toReadWrite = Nothing, _toReadOnly = Nothing} + -- | The transaction should allow both reads and writes. toReadWrite :: Lens' TransactionOptions (Maybe ReadWrite) toReadWrite@@ -159,12 +160,15 @@ -- security\/privacy reasons. -- -- /See:/ 'status' smart constructor.-data Status = Status'+data Status =+ Status' { _sDetails :: !(Maybe [StatusDetailsItem]) , _sCode :: !(Maybe (Textual Int32)) , _sMessage :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Status' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -176,13 +180,9 @@ -- * 'sMessage' status :: Status-status =- Status'- { _sDetails = Nothing- , _sCode = Nothing- , _sMessage = Nothing- }+status = Status' {_sDetails = Nothing, _sCode = Nothing, _sMessage = Nothing} + -- | A list of messages that carry the error details. There is a common set -- of message types for APIs to use. sDetails :: Lens' Status [StatusDetailsItem]@@ -225,10 +225,13 @@ -- long-running operation should document the metadata type, if any. -- -- /See:/ 'googleLongrunningOperationMetadata' smart constructor.-newtype GoogleLongrunningOperationMetadata = GoogleLongrunningOperationMetadata'+newtype GoogleLongrunningOperationMetadata =+ GoogleLongrunningOperationMetadata' { _glomAddtional :: HashMap Text JSONValue- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GoogleLongrunningOperationMetadata' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -238,10 +241,10 @@ :: HashMap Text JSONValue -- ^ 'glomAddtional' -> GoogleLongrunningOperationMetadata googleLongrunningOperationMetadata pGlomAddtional_ =- GoogleLongrunningOperationMetadata'- { _glomAddtional = _Coerce # pGlomAddtional_- }+ GoogleLongrunningOperationMetadata'+ {_glomAddtional = _Coerce # pGlomAddtional_} + -- | Properties of the object. Contains field \'type with type URL. glomAddtional :: Lens' GoogleLongrunningOperationMetadata (HashMap Text JSONValue) glomAddtional@@ -264,10 +267,13 @@ -- | Options specific to read \/ write transactions. -- -- /See:/ 'readWrite' smart constructor.-newtype ReadWrite = ReadWrite'+newtype ReadWrite =+ ReadWrite' { _rwPreviousTransaction :: Maybe Bytes- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ReadWrite' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -275,11 +281,9 @@ -- * 'rwPreviousTransaction' readWrite :: ReadWrite-readWrite =- ReadWrite'- { _rwPreviousTransaction = Nothing- }+readWrite = ReadWrite' {_rwPreviousTransaction = Nothing} + -- | The transaction identifier of the transaction being retried. rwPreviousTransaction :: Lens' ReadWrite (Maybe ByteString) rwPreviousTransaction@@ -303,10 +307,13 @@ -- google.datastore.admin.v1beta1.DatastoreAdmin.ExportEntities. -- -- /See:/ 'googleDatastoreAdminV1beta1ExportEntitiesResponse' smart constructor.-newtype GoogleDatastoreAdminV1beta1ExportEntitiesResponse = GoogleDatastoreAdminV1beta1ExportEntitiesResponse'+newtype GoogleDatastoreAdminV1beta1ExportEntitiesResponse =+ GoogleDatastoreAdminV1beta1ExportEntitiesResponse' { _gdaveerOutputURL :: Maybe Text- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GoogleDatastoreAdminV1beta1ExportEntitiesResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -315,10 +322,10 @@ googleDatastoreAdminV1beta1ExportEntitiesResponse :: GoogleDatastoreAdminV1beta1ExportEntitiesResponse googleDatastoreAdminV1beta1ExportEntitiesResponse =- GoogleDatastoreAdminV1beta1ExportEntitiesResponse'- { _gdaveerOutputURL = Nothing- }+ GoogleDatastoreAdminV1beta1ExportEntitiesResponse'+ {_gdaveerOutputURL = Nothing} + -- | Location of the output metadata file. This can be used to begin an -- import into Cloud Datastore (this project or another project). See -- google.datastore.admin.v1beta1.ImportEntitiesRequest.input_url. Only@@ -329,7 +336,7 @@ (\ s a -> s{_gdaveerOutputURL = a}) instance FromJSON- GoogleDatastoreAdminV1beta1ExportEntitiesResponse+ GoogleDatastoreAdminV1beta1ExportEntitiesResponse where parseJSON = withObject@@ -339,7 +346,7 @@ <$> (o .:? "outputUrl")) instance ToJSON- GoogleDatastoreAdminV1beta1ExportEntitiesResponse+ GoogleDatastoreAdminV1beta1ExportEntitiesResponse where toJSON GoogleDatastoreAdminV1beta1ExportEntitiesResponse'{..}@@ -349,10 +356,13 @@ -- | The request for Datastore.Rollback. -- -- /See:/ 'rollbackRequest' smart constructor.-newtype RollbackRequest = RollbackRequest'+newtype RollbackRequest =+ RollbackRequest' { _rrTransaction :: Maybe Bytes- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'RollbackRequest' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -360,11 +370,9 @@ -- * 'rrTransaction' rollbackRequest :: RollbackRequest-rollbackRequest =- RollbackRequest'- { _rrTransaction = Nothing- }+rollbackRequest = RollbackRequest' {_rrTransaction = Nothing} + -- | The transaction identifier, returned by a call to -- Datastore.BeginTransaction. rrTransaction :: Lens' RollbackRequest (Maybe ByteString)@@ -386,11 +394,14 @@ -- | The request for Datastore.ReserveIds. -- -- /See:/ 'reserveIdsRequest' smart constructor.-data ReserveIdsRequest = ReserveIdsRequest'+data ReserveIdsRequest =+ ReserveIdsRequest' { _rirKeys :: !(Maybe [Key]) , _rirDatabaseId :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ReserveIdsRequest' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -401,11 +412,9 @@ reserveIdsRequest :: ReserveIdsRequest reserveIdsRequest =- ReserveIdsRequest'- { _rirKeys = Nothing- , _rirDatabaseId = Nothing- }+ ReserveIdsRequest' {_rirKeys = Nothing, _rirDatabaseId = Nothing} + -- | A list of keys with complete key paths whose numeric IDs should not be -- auto-allocated. rirKeys :: Lens' ReserveIdsRequest [Key]@@ -446,11 +455,14 @@ -- active state. -- -- /See:/ 'partitionId' smart constructor.-data PartitionId = PartitionId'+data PartitionId =+ PartitionId' { _piNamespaceId :: !(Maybe Text) , _piProjectId :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'PartitionId' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -460,12 +472,9 @@ -- * 'piProjectId' partitionId :: PartitionId-partitionId =- PartitionId'- { _piNamespaceId = Nothing- , _piProjectId = Nothing- }+partitionId = PartitionId' {_piNamespaceId = Nothing, _piProjectId = Nothing} + -- | If not empty, the ID of the namespace to which the entities belong. piNamespaceId :: Lens' PartitionId (Maybe Text) piNamespaceId@@ -494,11 +503,14 @@ -- | The response for google.datastore.admin.v1.DatastoreAdmin.ListIndexes. -- -- /See:/ 'googleDatastoreAdminV1ListIndexesResponse' smart constructor.-data GoogleDatastoreAdminV1ListIndexesResponse = GoogleDatastoreAdminV1ListIndexesResponse'+data GoogleDatastoreAdminV1ListIndexesResponse =+ GoogleDatastoreAdminV1ListIndexesResponse' { _gdavlirNextPageToken :: !(Maybe Text) , _gdavlirIndexes :: !(Maybe [GoogleDatastoreAdminV1Index])- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GoogleDatastoreAdminV1ListIndexesResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -509,11 +521,10 @@ googleDatastoreAdminV1ListIndexesResponse :: GoogleDatastoreAdminV1ListIndexesResponse googleDatastoreAdminV1ListIndexesResponse =- GoogleDatastoreAdminV1ListIndexesResponse'- { _gdavlirNextPageToken = Nothing- , _gdavlirIndexes = Nothing- }+ GoogleDatastoreAdminV1ListIndexesResponse'+ {_gdavlirNextPageToken = Nothing, _gdavlirIndexes = Nothing} + -- | The standard List next-page token. gdavlirNextPageToken :: Lens' GoogleDatastoreAdminV1ListIndexesResponse (Maybe Text) gdavlirNextPageToken@@ -529,7 +540,8 @@ . _Coerce instance FromJSON- GoogleDatastoreAdminV1ListIndexesResponse where+ GoogleDatastoreAdminV1ListIndexesResponse+ where parseJSON = withObject "GoogleDatastoreAdminV1ListIndexesResponse"@@ -539,7 +551,8 @@ (o .:? "indexes" .!= mempty)) instance ToJSON- GoogleDatastoreAdminV1ListIndexesResponse where+ GoogleDatastoreAdminV1ListIndexesResponse+ where toJSON GoogleDatastoreAdminV1ListIndexesResponse'{..} = object (catMaybes@@ -549,7 +562,8 @@ -- | A batch of results produced by a query. -- -- /See:/ 'queryResultBatch' smart constructor.-data QueryResultBatch = QueryResultBatch'+data QueryResultBatch =+ QueryResultBatch' { _qrbSkippedResults :: !(Maybe (Textual Int32)) , _qrbSkippedCursor :: !(Maybe Bytes) , _qrbEntityResultType :: !(Maybe QueryResultBatchEntityResultType)@@ -557,8 +571,10 @@ , _qrbEntityResults :: !(Maybe [EntityResult]) , _qrbMoreResults :: !(Maybe QueryResultBatchMoreResults) , _qrbEndCursor :: !(Maybe Bytes)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'QueryResultBatch' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -579,7 +595,7 @@ queryResultBatch :: QueryResultBatch queryResultBatch =- QueryResultBatch'+ QueryResultBatch' { _qrbSkippedResults = Nothing , _qrbSkippedCursor = Nothing , _qrbEntityResultType = Nothing@@ -589,6 +605,7 @@ , _qrbEndCursor = Nothing } + -- | The number of results skipped, typically because of an offset. qrbSkippedResults :: Lens' QueryResultBatch (Maybe Int32) qrbSkippedResults@@ -674,10 +691,13 @@ -- than 500 characters. The name cannot be \`\"\"\`. -- -- /See:/ 'entityProperties' smart constructor.-newtype EntityProperties = EntityProperties'+newtype EntityProperties =+ EntityProperties' { _epAddtional :: HashMap Text Value- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'EntityProperties' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -687,10 +707,9 @@ :: HashMap Text Value -- ^ 'epAddtional' -> EntityProperties entityProperties pEpAddtional_ =- EntityProperties'- { _epAddtional = _Coerce # pEpAddtional_- }+ EntityProperties' {_epAddtional = _Coerce # pEpAddtional_} + epAddtional :: Lens' EntityProperties (HashMap Text Value) epAddtional = lens _epAddtional (\ s a -> s{_epAddtional = a}) .@@ -707,10 +726,13 @@ -- | Client-assigned labels. -- -- /See:/ 'googleDatastoreAdminV1ImportEntitiesRequestLabels' smart constructor.-newtype GoogleDatastoreAdminV1ImportEntitiesRequestLabels = GoogleDatastoreAdminV1ImportEntitiesRequestLabels'+newtype GoogleDatastoreAdminV1ImportEntitiesRequestLabels =+ GoogleDatastoreAdminV1ImportEntitiesRequestLabels' { _gdavierlAddtional :: HashMap Text Text- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GoogleDatastoreAdminV1ImportEntitiesRequestLabels' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -720,10 +742,10 @@ :: HashMap Text Text -- ^ 'gdavierlAddtional' -> GoogleDatastoreAdminV1ImportEntitiesRequestLabels googleDatastoreAdminV1ImportEntitiesRequestLabels pGdavierlAddtional_ =- GoogleDatastoreAdminV1ImportEntitiesRequestLabels'- { _gdavierlAddtional = _Coerce # pGdavierlAddtional_- }+ GoogleDatastoreAdminV1ImportEntitiesRequestLabels'+ {_gdavierlAddtional = _Coerce # pGdavierlAddtional_} + gdavierlAddtional :: Lens' GoogleDatastoreAdminV1ImportEntitiesRequestLabels (HashMap Text Text) gdavierlAddtional = lens _gdavierlAddtional@@ -731,7 +753,7 @@ . _Coerce instance FromJSON- GoogleDatastoreAdminV1ImportEntitiesRequestLabels+ GoogleDatastoreAdminV1ImportEntitiesRequestLabels where parseJSON = withObject@@ -741,17 +763,20 @@ <$> (parseJSONObject o)) instance ToJSON- GoogleDatastoreAdminV1ImportEntitiesRequestLabels+ GoogleDatastoreAdminV1ImportEntitiesRequestLabels where toJSON = toJSON . _gdavierlAddtional -- | The request for Datastore.BeginTransaction. -- -- /See:/ 'beginTransactionRequest' smart constructor.-newtype BeginTransactionRequest = BeginTransactionRequest'+newtype BeginTransactionRequest =+ BeginTransactionRequest' { _btrTransactionOptions :: Maybe TransactionOptions- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'BeginTransactionRequest' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -760,10 +785,9 @@ beginTransactionRequest :: BeginTransactionRequest beginTransactionRequest =- BeginTransactionRequest'- { _btrTransactionOptions = Nothing- }+ BeginTransactionRequest' {_btrTransactionOptions = Nothing} + -- | Options for a new transaction. btrTransactionOptions :: Lens' BeginTransactionRequest (Maybe TransactionOptions) btrTransactionOptions@@ -787,13 +811,16 @@ -- | The request for Datastore.RunQuery. -- -- /See:/ 'runQueryRequest' smart constructor.-data RunQueryRequest = RunQueryRequest'+data RunQueryRequest =+ RunQueryRequest' { _rqrPartitionId :: !(Maybe PartitionId) , _rqrGqlQuery :: !(Maybe GqlQuery) , _rqrQuery :: !(Maybe Query) , _rqrReadOptions :: !(Maybe ReadOptions)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'RunQueryRequest' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -808,13 +835,14 @@ runQueryRequest :: RunQueryRequest runQueryRequest =- RunQueryRequest'+ RunQueryRequest' { _rqrPartitionId = Nothing , _rqrGqlQuery = Nothing , _rqrQuery = Nothing , _rqrReadOptions = Nothing } + -- | Entities are partitioned into subsets, identified by a partition ID. -- Queries are scoped to a single partition. This partition ID is -- normalized with the standard default context partition ID.@@ -859,10 +887,13 @@ -- | The request for Datastore.AllocateIds. -- -- /See:/ 'allocateIdsRequest' smart constructor.-newtype AllocateIdsRequest = AllocateIdsRequest'+newtype AllocateIdsRequest =+ AllocateIdsRequest' { _airKeys :: Maybe [Key]- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AllocateIdsRequest' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -870,11 +901,9 @@ -- * 'airKeys' allocateIdsRequest :: AllocateIdsRequest-allocateIdsRequest =- AllocateIdsRequest'- { _airKeys = Nothing- }+allocateIdsRequest = AllocateIdsRequest' {_airKeys = Nothing} + -- | A list of keys with incomplete key paths for which to allocate IDs. No -- key may be reserved\/read-only. airKeys :: Lens' AllocateIdsRequest [Key]@@ -895,14 +924,17 @@ -- | Metadata for ExportEntities operations. -- -- /See:/ 'googleDatastoreAdminV1ExportEntitiesMetadata' smart constructor.-data GoogleDatastoreAdminV1ExportEntitiesMetadata = GoogleDatastoreAdminV1ExportEntitiesMetadata'+data GoogleDatastoreAdminV1ExportEntitiesMetadata =+ GoogleDatastoreAdminV1ExportEntitiesMetadata' { _gdaveemProgressBytes :: !(Maybe GoogleDatastoreAdminV1Progress) , _gdaveemOutputURLPrefix :: !(Maybe Text) , _gdaveemProgressEntities :: !(Maybe GoogleDatastoreAdminV1Progress) , _gdaveemEntityFilter :: !(Maybe GoogleDatastoreAdminV1EntityFilter) , _gdaveemCommon :: !(Maybe GoogleDatastoreAdminV1CommonMetadata)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GoogleDatastoreAdminV1ExportEntitiesMetadata' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -919,7 +951,7 @@ googleDatastoreAdminV1ExportEntitiesMetadata :: GoogleDatastoreAdminV1ExportEntitiesMetadata googleDatastoreAdminV1ExportEntitiesMetadata =- GoogleDatastoreAdminV1ExportEntitiesMetadata'+ GoogleDatastoreAdminV1ExportEntitiesMetadata' { _gdaveemProgressBytes = Nothing , _gdaveemOutputURLPrefix = Nothing , _gdaveemProgressEntities = Nothing@@ -927,6 +959,7 @@ , _gdaveemCommon = Nothing } + -- | An estimate of the number of bytes processed. gdaveemProgressBytes :: Lens' GoogleDatastoreAdminV1ExportEntitiesMetadata (Maybe GoogleDatastoreAdminV1Progress) gdaveemProgressBytes@@ -962,7 +995,8 @@ (\ s a -> s{_gdaveemCommon = a}) instance FromJSON- GoogleDatastoreAdminV1ExportEntitiesMetadata where+ GoogleDatastoreAdminV1ExportEntitiesMetadata+ where parseJSON = withObject "GoogleDatastoreAdminV1ExportEntitiesMetadata"@@ -974,7 +1008,8 @@ <*> (o .:? "common")) instance ToJSON- GoogleDatastoreAdminV1ExportEntitiesMetadata where+ GoogleDatastoreAdminV1ExportEntitiesMetadata+ where toJSON GoogleDatastoreAdminV1ExportEntitiesMetadata'{..} = object@@ -988,14 +1023,17 @@ -- | Metadata common to all Datastore Admin operations. -- -- /See:/ 'googleDatastoreAdminV1beta1CommonMetadata' smart constructor.-data GoogleDatastoreAdminV1beta1CommonMetadata = GoogleDatastoreAdminV1beta1CommonMetadata'+data GoogleDatastoreAdminV1beta1CommonMetadata =+ GoogleDatastoreAdminV1beta1CommonMetadata' { _gdavcmState :: !(Maybe GoogleDatastoreAdminV1beta1CommonMetadataState) , _gdavcmStartTime :: !(Maybe DateTime') , _gdavcmEndTime :: !(Maybe DateTime') , _gdavcmLabels :: !(Maybe GoogleDatastoreAdminV1beta1CommonMetadataLabels) , _gdavcmOperationType :: !(Maybe GoogleDatastoreAdminV1beta1CommonMetadataOperationType)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GoogleDatastoreAdminV1beta1CommonMetadata' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1012,7 +1050,7 @@ googleDatastoreAdminV1beta1CommonMetadata :: GoogleDatastoreAdminV1beta1CommonMetadata googleDatastoreAdminV1beta1CommonMetadata =- GoogleDatastoreAdminV1beta1CommonMetadata'+ GoogleDatastoreAdminV1beta1CommonMetadata' { _gdavcmState = Nothing , _gdavcmStartTime = Nothing , _gdavcmEndTime = Nothing@@ -1020,6 +1058,7 @@ , _gdavcmOperationType = Nothing } + -- | The current state of the Operation. gdavcmState :: Lens' GoogleDatastoreAdminV1beta1CommonMetadata (Maybe GoogleDatastoreAdminV1beta1CommonMetadataState) gdavcmState@@ -1053,7 +1092,8 @@ (\ s a -> s{_gdavcmOperationType = a}) instance FromJSON- GoogleDatastoreAdminV1beta1CommonMetadata where+ GoogleDatastoreAdminV1beta1CommonMetadata+ where parseJSON = withObject "GoogleDatastoreAdminV1beta1CommonMetadata"@@ -1065,7 +1105,8 @@ <*> (o .:? "operationType")) instance ToJSON- GoogleDatastoreAdminV1beta1CommonMetadata where+ GoogleDatastoreAdminV1beta1CommonMetadata+ where toJSON GoogleDatastoreAdminV1beta1CommonMetadata'{..} = object (catMaybes@@ -1083,15 +1124,17 @@ -- -- /See:/ 'empty' smart constructor. data Empty =- Empty'- deriving (Eq,Show,Data,Typeable,Generic)+ Empty'+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Empty' with the minimum fields required to make a request. -- empty :: Empty empty = Empty' + instance FromJSON Empty where parseJSON = withObject "Empty" (\ o -> pure Empty') @@ -1101,11 +1144,14 @@ -- | A filter that merges multiple other filters using the given operator. -- -- /See:/ 'compositeFilter' smart constructor.-data CompositeFilter = CompositeFilter'+data CompositeFilter =+ CompositeFilter' { _cfOp :: !(Maybe CompositeFilterOp) , _cfFilters :: !(Maybe [Filter])- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'CompositeFilter' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1115,12 +1161,9 @@ -- * 'cfFilters' compositeFilter :: CompositeFilter-compositeFilter =- CompositeFilter'- { _cfOp = Nothing- , _cfFilters = Nothing- }+compositeFilter = CompositeFilter' {_cfOp = Nothing, _cfFilters = Nothing} + -- | The operator for combining multiple filters. cfOp :: Lens' CompositeFilter (Maybe CompositeFilterOp) cfOp = lens _cfOp (\ s a -> s{_cfOp = a})@@ -1148,12 +1191,15 @@ -- | Metadata for Index operations. -- -- /See:/ 'googleDatastoreAdminV1IndexOperationMetadata' smart constructor.-data GoogleDatastoreAdminV1IndexOperationMetadata = GoogleDatastoreAdminV1IndexOperationMetadata'+data GoogleDatastoreAdminV1IndexOperationMetadata =+ GoogleDatastoreAdminV1IndexOperationMetadata' { _gdaviomProgressEntities :: !(Maybe GoogleDatastoreAdminV1Progress) , _gdaviomCommon :: !(Maybe GoogleDatastoreAdminV1CommonMetadata) , _gdaviomIndexId :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GoogleDatastoreAdminV1IndexOperationMetadata' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1166,12 +1212,13 @@ googleDatastoreAdminV1IndexOperationMetadata :: GoogleDatastoreAdminV1IndexOperationMetadata googleDatastoreAdminV1IndexOperationMetadata =- GoogleDatastoreAdminV1IndexOperationMetadata'+ GoogleDatastoreAdminV1IndexOperationMetadata' { _gdaviomProgressEntities = Nothing , _gdaviomCommon = Nothing , _gdaviomIndexId = Nothing } + -- | An estimate of the number of entities processed. gdaviomProgressEntities :: Lens' GoogleDatastoreAdminV1IndexOperationMetadata (Maybe GoogleDatastoreAdminV1Progress) gdaviomProgressEntities@@ -1191,7 +1238,8 @@ (\ s a -> s{_gdaviomIndexId = a}) instance FromJSON- GoogleDatastoreAdminV1IndexOperationMetadata where+ GoogleDatastoreAdminV1IndexOperationMetadata+ where parseJSON = withObject "GoogleDatastoreAdminV1IndexOperationMetadata"@@ -1201,7 +1249,8 @@ (o .:? "indexId")) instance ToJSON- GoogleDatastoreAdminV1IndexOperationMetadata where+ GoogleDatastoreAdminV1IndexOperationMetadata+ where toJSON GoogleDatastoreAdminV1IndexOperationMetadata'{..} = object@@ -1214,14 +1263,17 @@ -- | Metadata for ImportEntities operations. -- -- /See:/ 'googleDatastoreAdminV1beta1ImportEntitiesMetadata' smart constructor.-data GoogleDatastoreAdminV1beta1ImportEntitiesMetadata = GoogleDatastoreAdminV1beta1ImportEntitiesMetadata'+data GoogleDatastoreAdminV1beta1ImportEntitiesMetadata =+ GoogleDatastoreAdminV1beta1ImportEntitiesMetadata' { _gdaviemProgressBytes :: !(Maybe GoogleDatastoreAdminV1beta1Progress) , _gdaviemProgressEntities :: !(Maybe GoogleDatastoreAdminV1beta1Progress) , _gdaviemEntityFilter :: !(Maybe GoogleDatastoreAdminV1beta1EntityFilter) , _gdaviemInputURL :: !(Maybe Text) , _gdaviemCommon :: !(Maybe GoogleDatastoreAdminV1beta1CommonMetadata)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GoogleDatastoreAdminV1beta1ImportEntitiesMetadata' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1238,7 +1290,7 @@ googleDatastoreAdminV1beta1ImportEntitiesMetadata :: GoogleDatastoreAdminV1beta1ImportEntitiesMetadata googleDatastoreAdminV1beta1ImportEntitiesMetadata =- GoogleDatastoreAdminV1beta1ImportEntitiesMetadata'+ GoogleDatastoreAdminV1beta1ImportEntitiesMetadata' { _gdaviemProgressBytes = Nothing , _gdaviemProgressEntities = Nothing , _gdaviemEntityFilter = Nothing@@ -1246,6 +1298,7 @@ , _gdaviemCommon = Nothing } + -- | An estimate of the number of bytes processed. gdaviemProgressBytes :: Lens' GoogleDatastoreAdminV1beta1ImportEntitiesMetadata (Maybe GoogleDatastoreAdminV1beta1Progress) gdaviemProgressBytes@@ -1279,7 +1332,7 @@ (\ s a -> s{_gdaviemCommon = a}) instance FromJSON- GoogleDatastoreAdminV1beta1ImportEntitiesMetadata+ GoogleDatastoreAdminV1beta1ImportEntitiesMetadata where parseJSON = withObject@@ -1294,7 +1347,7 @@ <*> (o .:? "common")) instance ToJSON- GoogleDatastoreAdminV1beta1ImportEntitiesMetadata+ GoogleDatastoreAdminV1beta1ImportEntitiesMetadata where toJSON GoogleDatastoreAdminV1beta1ImportEntitiesMetadata'{..}@@ -1309,11 +1362,14 @@ -- | Measures the progress of a particular metric. -- -- /See:/ 'googleDatastoreAdminV1beta1Progress' smart constructor.-data GoogleDatastoreAdminV1beta1Progress = GoogleDatastoreAdminV1beta1Progress'+data GoogleDatastoreAdminV1beta1Progress =+ GoogleDatastoreAdminV1beta1Progress' { _gdavpWorkCompleted :: !(Maybe (Textual Int64)) , _gdavpWorkEstimated :: !(Maybe (Textual Int64))- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GoogleDatastoreAdminV1beta1Progress' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1324,11 +1380,10 @@ googleDatastoreAdminV1beta1Progress :: GoogleDatastoreAdminV1beta1Progress googleDatastoreAdminV1beta1Progress =- GoogleDatastoreAdminV1beta1Progress'- { _gdavpWorkCompleted = Nothing- , _gdavpWorkEstimated = Nothing- }+ GoogleDatastoreAdminV1beta1Progress'+ {_gdavpWorkCompleted = Nothing, _gdavpWorkEstimated = Nothing} + -- | The amount of work that has been completed. Note that this may be -- greater than work_estimated. gdavpWorkCompleted :: Lens' GoogleDatastoreAdminV1beta1Progress (Maybe Int64)@@ -1364,10 +1419,13 @@ -- | The response for Datastore.BeginTransaction. -- -- /See:/ 'beginTransactionResponse' smart constructor.-newtype BeginTransactionResponse = BeginTransactionResponse'+newtype BeginTransactionResponse =+ BeginTransactionResponse' { _btrTransaction :: Maybe Bytes- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'BeginTransactionResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1375,11 +1433,9 @@ -- * 'btrTransaction' beginTransactionResponse :: BeginTransactionResponse-beginTransactionResponse =- BeginTransactionResponse'- { _btrTransaction = Nothing- }+beginTransactionResponse = BeginTransactionResponse' {_btrTransaction = Nothing} + -- | The transaction identifier (always present). btrTransaction :: Lens' BeginTransactionResponse (Maybe ByteString) btrTransaction@@ -1401,12 +1457,15 @@ -- | The result of applying a mutation. -- -- /See:/ 'mutationResult' smart constructor.-data MutationResult = MutationResult'+data MutationResult =+ MutationResult' { _mrConflictDetected :: !(Maybe Bool) , _mrKey :: !(Maybe Key) , _mrVersion :: !(Maybe (Textual Int64))- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'MutationResult' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1419,12 +1478,10 @@ mutationResult :: MutationResult mutationResult =- MutationResult'- { _mrConflictDetected = Nothing- , _mrKey = Nothing- , _mrVersion = Nothing- }+ MutationResult'+ {_mrConflictDetected = Nothing, _mrKey = Nothing, _mrVersion = Nothing} + -- | Whether a conflict was detected for this mutation. Always false when a -- conflict detection strategy field is not set in the mutation. mrConflictDetected :: Lens' MutationResult (Maybe Bool)@@ -1466,10 +1523,13 @@ -- | The response for Datastore.AllocateIds. -- -- /See:/ 'allocateIdsResponse' smart constructor.-newtype AllocateIdsResponse = AllocateIdsResponse'+newtype AllocateIdsResponse =+ AllocateIdsResponse' { _aKeys :: Maybe [Key]- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AllocateIdsResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1477,11 +1537,9 @@ -- * 'aKeys' allocateIdsResponse :: AllocateIdsResponse-allocateIdsResponse =- AllocateIdsResponse'- { _aKeys = Nothing- }+allocateIdsResponse = AllocateIdsResponse' {_aKeys = Nothing} + -- | The keys specified in the request (in the same order), each with its key -- path completed with a newly allocated ID. aKeys :: Lens' AllocateIdsResponse [Key]@@ -1503,13 +1561,16 @@ -- query](https:\/\/cloud.google.com\/datastore\/docs\/apis\/gql\/gql_reference). -- -- /See:/ 'gqlQuery' smart constructor.-data GqlQuery = GqlQuery'+data GqlQuery =+ GqlQuery' { _gqPositionalBindings :: !(Maybe [GqlQueryParameter]) , _gqNamedBindings :: !(Maybe GqlQueryNamedBindings) , _gqQueryString :: !(Maybe Text) , _gqAllowLiterals :: !(Maybe Bool)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GqlQuery' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1524,13 +1585,14 @@ gqlQuery :: GqlQuery gqlQuery =- GqlQuery'+ GqlQuery' { _gqPositionalBindings = Nothing , _gqNamedBindings = Nothing , _gqQueryString = Nothing , _gqAllowLiterals = Nothing } + -- | Numbered binding site \'1 references the first numbered parameter, -- effectively using 1-based indexing, rather than the usual 0. For each -- binding site numbered i in \`query_string\`, there must be an i-th@@ -1589,11 +1651,14 @@ -- | The response for Datastore.RunQuery. -- -- /See:/ 'runQueryResponse' smart constructor.-data RunQueryResponse = RunQueryResponse'+data RunQueryResponse =+ RunQueryResponse' { _rBatch :: !(Maybe QueryResultBatch) , _rQuery :: !(Maybe Query)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'RunQueryResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1603,12 +1668,9 @@ -- * 'rQuery' runQueryResponse :: RunQueryResponse-runQueryResponse =- RunQueryResponse'- { _rBatch = Nothing- , _rQuery = Nothing- }+runQueryResponse = RunQueryResponse' {_rBatch = Nothing, _rQuery = Nothing} + -- | A batch of query results (always present). rBatch :: Lens' RunQueryResponse (Maybe QueryResultBatch) rBatch = lens _rBatch (\ s a -> s{_rBatch = a})@@ -1633,10 +1695,13 @@ -- | Client-assigned labels. -- -- /See:/ 'googleDatastoreAdminV1ExportEntitiesRequestLabels' smart constructor.-newtype GoogleDatastoreAdminV1ExportEntitiesRequestLabels = GoogleDatastoreAdminV1ExportEntitiesRequestLabels'+newtype GoogleDatastoreAdminV1ExportEntitiesRequestLabels =+ GoogleDatastoreAdminV1ExportEntitiesRequestLabels' { _gdaveerlAddtional :: HashMap Text Text- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GoogleDatastoreAdminV1ExportEntitiesRequestLabels' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1646,10 +1711,10 @@ :: HashMap Text Text -- ^ 'gdaveerlAddtional' -> GoogleDatastoreAdminV1ExportEntitiesRequestLabels googleDatastoreAdminV1ExportEntitiesRequestLabels pGdaveerlAddtional_ =- GoogleDatastoreAdminV1ExportEntitiesRequestLabels'- { _gdaveerlAddtional = _Coerce # pGdaveerlAddtional_- }+ GoogleDatastoreAdminV1ExportEntitiesRequestLabels'+ {_gdaveerlAddtional = _Coerce # pGdaveerlAddtional_} + gdaveerlAddtional :: Lens' GoogleDatastoreAdminV1ExportEntitiesRequestLabels (HashMap Text Text) gdaveerlAddtional = lens _gdaveerlAddtional@@ -1657,7 +1722,7 @@ . _Coerce instance FromJSON- GoogleDatastoreAdminV1ExportEntitiesRequestLabels+ GoogleDatastoreAdminV1ExportEntitiesRequestLabels where parseJSON = withObject@@ -1667,7 +1732,7 @@ <$> (parseJSONObject o)) instance ToJSON- GoogleDatastoreAdminV1ExportEntitiesRequestLabels+ GoogleDatastoreAdminV1ExportEntitiesRequestLabels where toJSON = toJSON . _gdaveerlAddtional @@ -1675,7 +1740,8 @@ -- metadata. -- -- /See:/ 'value' smart constructor.-data Value = Value'+data Value =+ Value' { _vKeyValue :: !(Maybe Key) , _vGeoPointValue :: !(Maybe LatLng) , _vIntegerValue :: !(Maybe (Textual Int64))@@ -1689,8 +1755,10 @@ , _vArrayValue :: !(Maybe ArrayValue) , _vNullValue :: !(Maybe ValueNullValue) , _vBlobValue :: !(Maybe Bytes)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Value' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1723,7 +1791,7 @@ value :: Value value =- Value'+ Value' { _vKeyValue = Nothing , _vGeoPointValue = Nothing , _vIntegerValue = Nothing@@ -1739,6 +1807,7 @@ , _vBlobValue = Nothing } + -- | A key value. vKeyValue :: Lens' Value (Maybe Key) vKeyValue@@ -1864,10 +1933,13 @@ -- created. May also include additional labels. -- -- /See:/ 'googleDatastoreAdminV1CommonMetadataLabels' smart constructor.-newtype GoogleDatastoreAdminV1CommonMetadataLabels = GoogleDatastoreAdminV1CommonMetadataLabels'+newtype GoogleDatastoreAdminV1CommonMetadataLabels =+ GoogleDatastoreAdminV1CommonMetadataLabels' { _gdavcmlAddtional :: HashMap Text Text- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GoogleDatastoreAdminV1CommonMetadataLabels' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1877,10 +1949,10 @@ :: HashMap Text Text -- ^ 'gdavcmlAddtional' -> GoogleDatastoreAdminV1CommonMetadataLabels googleDatastoreAdminV1CommonMetadataLabels pGdavcmlAddtional_ =- GoogleDatastoreAdminV1CommonMetadataLabels'- { _gdavcmlAddtional = _Coerce # pGdavcmlAddtional_- }+ GoogleDatastoreAdminV1CommonMetadataLabels'+ {_gdavcmlAddtional = _Coerce # pGdavcmlAddtional_} + gdavcmlAddtional :: Lens' GoogleDatastoreAdminV1CommonMetadataLabels (HashMap Text Text) gdavcmlAddtional = lens _gdavcmlAddtional@@ -1888,7 +1960,8 @@ . _Coerce instance FromJSON- GoogleDatastoreAdminV1CommonMetadataLabels where+ GoogleDatastoreAdminV1CommonMetadataLabels+ where parseJSON = withObject "GoogleDatastoreAdminV1CommonMetadataLabels"@@ -1897,15 +1970,19 @@ (parseJSONObject o)) instance ToJSON- GoogleDatastoreAdminV1CommonMetadataLabels where+ GoogleDatastoreAdminV1CommonMetadataLabels+ where toJSON = toJSON . _gdavcmlAddtional -- -- /See:/ 'statusDetailsItem' smart constructor.-newtype StatusDetailsItem = StatusDetailsItem'+newtype StatusDetailsItem =+ StatusDetailsItem' { _sdiAddtional :: HashMap Text JSONValue- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'StatusDetailsItem' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1915,10 +1992,9 @@ :: HashMap Text JSONValue -- ^ 'sdiAddtional' -> StatusDetailsItem statusDetailsItem pSdiAddtional_ =- StatusDetailsItem'- { _sdiAddtional = _Coerce # pSdiAddtional_- }+ StatusDetailsItem' {_sdiAddtional = _Coerce # pSdiAddtional_} + -- | Properties of the object. Contains field \'type with type URL. sdiAddtional :: Lens' StatusDetailsItem (HashMap Text JSONValue) sdiAddtional@@ -1936,11 +2012,14 @@ -- | The request for Datastore.Lookup. -- -- /See:/ 'lookupRequest' smart constructor.-data LookupRequest = LookupRequest'+data LookupRequest =+ LookupRequest' { _lrKeys :: !(Maybe [Key]) , _lrReadOptions :: !(Maybe ReadOptions)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'LookupRequest' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1950,12 +2029,9 @@ -- * 'lrReadOptions' lookupRequest :: LookupRequest-lookupRequest =- LookupRequest'- { _lrKeys = Nothing- , _lrReadOptions = Nothing- }+lookupRequest = LookupRequest' {_lrKeys = Nothing, _lrReadOptions = Nothing} + -- | Keys of entities to look up. lrKeys :: Lens' LookupRequest [Key] lrKeys@@ -1985,14 +2061,17 @@ -- | Metadata common to all Datastore Admin operations. -- -- /See:/ 'googleDatastoreAdminV1CommonMetadata' smart constructor.-data GoogleDatastoreAdminV1CommonMetadata = GoogleDatastoreAdminV1CommonMetadata'+data GoogleDatastoreAdminV1CommonMetadata =+ GoogleDatastoreAdminV1CommonMetadata' { _gState :: !(Maybe GoogleDatastoreAdminV1CommonMetadataState) , _gStartTime :: !(Maybe DateTime') , _gEndTime :: !(Maybe DateTime') , _gLabels :: !(Maybe GoogleDatastoreAdminV1CommonMetadataLabels) , _gOperationType :: !(Maybe GoogleDatastoreAdminV1CommonMetadataOperationType)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GoogleDatastoreAdminV1CommonMetadata' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2009,7 +2088,7 @@ googleDatastoreAdminV1CommonMetadata :: GoogleDatastoreAdminV1CommonMetadata googleDatastoreAdminV1CommonMetadata =- GoogleDatastoreAdminV1CommonMetadata'+ GoogleDatastoreAdminV1CommonMetadata' { _gState = Nothing , _gStartTime = Nothing , _gEndTime = Nothing@@ -2017,6 +2096,7 @@ , _gOperationType = Nothing } + -- | The current state of the Operation. gState :: Lens' GoogleDatastoreAdminV1CommonMetadata (Maybe GoogleDatastoreAdminV1CommonMetadataState) gState = lens _gState (\ s a -> s{_gState = a})@@ -2046,7 +2126,8 @@ (\ s a -> s{_gOperationType = a}) instance FromJSON- GoogleDatastoreAdminV1CommonMetadata where+ GoogleDatastoreAdminV1CommonMetadata+ where parseJSON = withObject "GoogleDatastoreAdminV1CommonMetadata" (\ o ->@@ -2070,12 +2151,15 @@ -- | The request for google.datastore.admin.v1.DatastoreAdmin.ExportEntities. -- -- /See:/ 'googleDatastoreAdminV1ExportEntitiesRequest' smart constructor.-data GoogleDatastoreAdminV1ExportEntitiesRequest = GoogleDatastoreAdminV1ExportEntitiesRequest'+data GoogleDatastoreAdminV1ExportEntitiesRequest =+ GoogleDatastoreAdminV1ExportEntitiesRequest' { _gdaveerOutputURLPrefix :: !(Maybe Text) , _gdaveerEntityFilter :: !(Maybe GoogleDatastoreAdminV1EntityFilter) , _gdaveerLabels :: !(Maybe GoogleDatastoreAdminV1ExportEntitiesRequestLabels)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GoogleDatastoreAdminV1ExportEntitiesRequest' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2088,12 +2172,13 @@ googleDatastoreAdminV1ExportEntitiesRequest :: GoogleDatastoreAdminV1ExportEntitiesRequest googleDatastoreAdminV1ExportEntitiesRequest =- GoogleDatastoreAdminV1ExportEntitiesRequest'+ GoogleDatastoreAdminV1ExportEntitiesRequest' { _gdaveerOutputURLPrefix = Nothing , _gdaveerEntityFilter = Nothing , _gdaveerLabels = Nothing } + -- | Location for the export metadata and data files. The full resource URL -- of the external storage location. Currently, only Google Cloud Storage -- is supported. So output_url_prefix should be of the form:@@ -2127,7 +2212,8 @@ (\ s a -> s{_gdaveerLabels = a}) instance FromJSON- GoogleDatastoreAdminV1ExportEntitiesRequest where+ GoogleDatastoreAdminV1ExportEntitiesRequest+ where parseJSON = withObject "GoogleDatastoreAdminV1ExportEntitiesRequest"@@ -2137,7 +2223,8 @@ <*> (o .:? "labels")) instance ToJSON- GoogleDatastoreAdminV1ExportEntitiesRequest where+ GoogleDatastoreAdminV1ExportEntitiesRequest+ where toJSON GoogleDatastoreAdminV1ExportEntitiesRequest'{..} = object@@ -2149,14 +2236,17 @@ -- | A mutation to apply to an entity. -- -- /See:/ 'mutation' smart constructor.-data Mutation = Mutation'+data Mutation =+ Mutation' { _mBaseVersion :: !(Maybe (Textual Int64)) , _mInsert :: !(Maybe Entity) , _mUpsert :: !(Maybe Entity) , _mDelete :: !(Maybe Key) , _mUpdate :: !(Maybe Entity)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Mutation' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2173,7 +2263,7 @@ mutation :: Mutation mutation =- Mutation'+ Mutation' { _mBaseVersion = Nothing , _mInsert = Nothing , _mUpsert = Nothing@@ -2181,6 +2271,7 @@ , _mUpdate = Nothing } + -- | The version of the entity that this mutation is being applied to. If -- this does not match the current version on the server, the mutation -- conflicts.@@ -2236,10 +2327,13 @@ -- must not be \`\"\"\`. -- -- /See:/ 'gqlQueryNamedBindings' smart constructor.-newtype GqlQueryNamedBindings = GqlQueryNamedBindings'+newtype GqlQueryNamedBindings =+ GqlQueryNamedBindings' { _gqnbAddtional :: HashMap Text GqlQueryParameter- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GqlQueryNamedBindings' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2249,10 +2343,9 @@ :: HashMap Text GqlQueryParameter -- ^ 'gqnbAddtional' -> GqlQueryNamedBindings gqlQueryNamedBindings pGqnbAddtional_ =- GqlQueryNamedBindings'- { _gqnbAddtional = _Coerce # pGqnbAddtional_- }+ GqlQueryNamedBindings' {_gqnbAddtional = _Coerce # pGqnbAddtional_} + gqnbAddtional :: Lens' GqlQueryNamedBindings (HashMap Text GqlQueryParameter) gqnbAddtional = lens _gqnbAddtional@@ -2272,10 +2365,13 @@ -- google.datastore.admin.v1.DatastoreAdmin.ExportEntities. -- -- /See:/ 'googleDatastoreAdminV1ExportEntitiesResponse' smart constructor.-newtype GoogleDatastoreAdminV1ExportEntitiesResponse = GoogleDatastoreAdminV1ExportEntitiesResponse'+newtype GoogleDatastoreAdminV1ExportEntitiesResponse =+ GoogleDatastoreAdminV1ExportEntitiesResponse' { _gOutputURL :: Maybe Text- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GoogleDatastoreAdminV1ExportEntitiesResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2284,10 +2380,9 @@ googleDatastoreAdminV1ExportEntitiesResponse :: GoogleDatastoreAdminV1ExportEntitiesResponse googleDatastoreAdminV1ExportEntitiesResponse =- GoogleDatastoreAdminV1ExportEntitiesResponse'- { _gOutputURL = Nothing- }+ GoogleDatastoreAdminV1ExportEntitiesResponse' {_gOutputURL = Nothing} + -- | Location of the output metadata file. This can be used to begin an -- import into Cloud Datastore (this project or another project). See -- google.datastore.admin.v1.ImportEntitiesRequest.input_url. Only present@@ -2297,7 +2392,8 @@ = lens _gOutputURL (\ s a -> s{_gOutputURL = a}) instance FromJSON- GoogleDatastoreAdminV1ExportEntitiesResponse where+ GoogleDatastoreAdminV1ExportEntitiesResponse+ where parseJSON = withObject "GoogleDatastoreAdminV1ExportEntitiesResponse"@@ -2306,7 +2402,8 @@ (o .:? "outputUrl")) instance ToJSON- GoogleDatastoreAdminV1ExportEntitiesResponse where+ GoogleDatastoreAdminV1ExportEntitiesResponse+ where toJSON GoogleDatastoreAdminV1ExportEntitiesResponse'{..} = object@@ -2315,10 +2412,13 @@ -- | A reference to a property relative to the kind expressions. -- -- /See:/ 'propertyReference' smart constructor.-newtype PropertyReference = PropertyReference'+newtype PropertyReference =+ PropertyReference' { _prName :: Maybe Text- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'PropertyReference' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2326,11 +2426,9 @@ -- * 'prName' propertyReference :: PropertyReference-propertyReference =- PropertyReference'- { _prName = Nothing- }+propertyReference = PropertyReference' {_prName = Nothing} + -- | The name of the property. If name includes \".\"s, it may be interpreted -- as a property name path. prName :: Lens' PropertyReference (Maybe Text)@@ -2351,11 +2449,14 @@ -- documented contexts. -- -- /See:/ 'key' smart constructor.-data Key = Key'+data Key =+ Key' { _kPartitionId :: !(Maybe PartitionId) , _kPath :: !(Maybe [PathElement])- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Key' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2365,12 +2466,9 @@ -- * 'kPath' key :: Key-key =- Key'- { _kPartitionId = Nothing- , _kPath = Nothing- }+key = Key' {_kPartitionId = Nothing, _kPath = Nothing} + -- | Entities are partitioned into subsets, currently identified by a project -- ID and namespace ID. Queries are scoped to a single partition. kPartitionId :: Lens' Key (Maybe PartitionId)@@ -2412,12 +2510,15 @@ -- | The request for google.datastore.admin.v1.DatastoreAdmin.ImportEntities. -- -- /See:/ 'googleDatastoreAdminV1ImportEntitiesRequest' smart constructor.-data GoogleDatastoreAdminV1ImportEntitiesRequest = GoogleDatastoreAdminV1ImportEntitiesRequest'+data GoogleDatastoreAdminV1ImportEntitiesRequest =+ GoogleDatastoreAdminV1ImportEntitiesRequest' { _gdavierEntityFilter :: !(Maybe GoogleDatastoreAdminV1EntityFilter) , _gdavierInputURL :: !(Maybe Text) , _gdavierLabels :: !(Maybe GoogleDatastoreAdminV1ImportEntitiesRequestLabels)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GoogleDatastoreAdminV1ImportEntitiesRequest' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2430,12 +2531,13 @@ googleDatastoreAdminV1ImportEntitiesRequest :: GoogleDatastoreAdminV1ImportEntitiesRequest googleDatastoreAdminV1ImportEntitiesRequest =- GoogleDatastoreAdminV1ImportEntitiesRequest'+ GoogleDatastoreAdminV1ImportEntitiesRequest' { _gdavierEntityFilter = Nothing , _gdavierInputURL = Nothing , _gdavierLabels = Nothing } + -- | Optionally specify which kinds\/namespaces are to be imported. If -- provided, the list must be a subset of the EntityFilter used in creating -- the export, otherwise a FAILED_PRECONDITION error will be returned. If@@ -2468,7 +2570,8 @@ (\ s a -> s{_gdavierLabels = a}) instance FromJSON- GoogleDatastoreAdminV1ImportEntitiesRequest where+ GoogleDatastoreAdminV1ImportEntitiesRequest+ where parseJSON = withObject "GoogleDatastoreAdminV1ImportEntitiesRequest"@@ -2478,7 +2581,8 @@ (o .:? "labels")) instance ToJSON- GoogleDatastoreAdminV1ImportEntitiesRequest where+ GoogleDatastoreAdminV1ImportEntitiesRequest+ where toJSON GoogleDatastoreAdminV1ImportEntitiesRequest'{..} = object@@ -2490,12 +2594,15 @@ -- | A filter on a specific property. -- -- /See:/ 'propertyFilter' smart constructor.-data PropertyFilter = PropertyFilter'+data PropertyFilter =+ PropertyFilter' { _pfProperty :: !(Maybe PropertyReference) , _pfOp :: !(Maybe PropertyFilterOp) , _pfValue :: !(Maybe Value)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'PropertyFilter' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2508,12 +2615,9 @@ propertyFilter :: PropertyFilter propertyFilter =- PropertyFilter'- { _pfProperty = Nothing- , _pfOp = Nothing- , _pfValue = Nothing- }+ PropertyFilter' {_pfProperty = Nothing, _pfOp = Nothing, _pfValue = Nothing} + -- | The property to filter by. pfProperty :: Lens' PropertyFilter (Maybe PropertyReference) pfProperty@@ -2545,7 +2649,8 @@ -- | A query for entities. -- -- /See:/ 'query' smart constructor.-data Query = Query'+data Query =+ Query' { _qStartCursor :: !(Maybe Bytes) , _qOffSet :: !(Maybe (Textual Int32)) , _qKind :: !(Maybe [KindExpression])@@ -2555,8 +2660,10 @@ , _qProjection :: !(Maybe [Projection]) , _qFilter :: !(Maybe Filter) , _qOrder :: !(Maybe [PropertyOrder])- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Query' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2581,7 +2688,7 @@ query :: Query query =- Query'+ Query' { _qStartCursor = Nothing , _qOffSet = Nothing , _qKind = Nothing@@ -2593,6 +2700,7 @@ , _qOrder = Nothing } + -- | A starting point for the query results. Query cursors are returned in -- query result batches and [can only be used to continue the same -- query](https:\/\/cloud.google.com\/datastore\/docs\/concepts\/queries#cursors_limits_and_offsets).@@ -2688,10 +2796,13 @@ -- | An array value. -- -- /See:/ 'arrayValue' smart constructor.-newtype ArrayValue = ArrayValue'+newtype ArrayValue =+ ArrayValue' { _avValues :: Maybe [Value]- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ArrayValue' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2699,11 +2810,9 @@ -- * 'avValues' arrayValue :: ArrayValue-arrayValue =- ArrayValue'- { _avValues = Nothing- }+arrayValue = ArrayValue' {_avValues = Nothing} + -- | Values in the array. The order of values in an array is preserved as -- long as all values have identical settings for \'exclude_from_indexes\'. avValues :: Lens' ArrayValue [Value]@@ -2724,12 +2833,15 @@ -- | The result of fetching an entity from Datastore. -- -- /See:/ 'entityResult' smart constructor.-data EntityResult = EntityResult'+data EntityResult =+ EntityResult' { _erCursor :: !(Maybe Bytes) , _erVersion :: !(Maybe (Textual Int64)) , _erEntity :: !(Maybe Entity)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'EntityResult' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2742,12 +2854,9 @@ entityResult :: EntityResult entityResult =- EntityResult'- { _erCursor = Nothing- , _erVersion = Nothing- , _erEntity = Nothing- }+ EntityResult' {_erCursor = Nothing, _erVersion = Nothing, _erEntity = Nothing} + -- | A cursor that points to the position after the result entity. Set only -- when the \`EntityResult\` is part of a \`QueryResultBatch\` message. erCursor :: Lens' EntityResult (Maybe ByteString)@@ -2788,11 +2897,14 @@ -- | The response for Datastore.Commit. -- -- /See:/ 'commitResponse' smart constructor.-data CommitResponse = CommitResponse'+data CommitResponse =+ CommitResponse' { _crIndexUpdates :: !(Maybe (Textual Int32)) , _crMutationResults :: !(Maybe [MutationResult])- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'CommitResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2803,11 +2915,9 @@ commitResponse :: CommitResponse commitResponse =- CommitResponse'- { _crIndexUpdates = Nothing- , _crMutationResults = Nothing- }+ CommitResponse' {_crIndexUpdates = Nothing, _crMutationResults = Nothing} + -- | The number of index entries updated during the commit, or zero if none -- were updated. crIndexUpdates :: Lens' CommitResponse (Maybe Int32)@@ -2843,10 +2953,13 @@ -- | A representation of a kind. -- -- /See:/ 'kindExpression' smart constructor.-newtype KindExpression = KindExpression'+newtype KindExpression =+ KindExpression' { _keName :: Maybe Text- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'KindExpression' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2854,11 +2967,9 @@ -- * 'keName' kindExpression :: KindExpression-kindExpression =- KindExpression'- { _keName = Nothing- }+kindExpression = KindExpression' {_keName = Nothing} + -- | The name of the kind. keName :: Lens' KindExpression (Maybe Text) keName = lens _keName (\ s a -> s{_keName = a})@@ -2882,10 +2993,13 @@ -- \`TakeSnapshotResponse\`. -- -- /See:/ 'googleLongrunningOperationResponse' smart constructor.-newtype GoogleLongrunningOperationResponse = GoogleLongrunningOperationResponse'+newtype GoogleLongrunningOperationResponse =+ GoogleLongrunningOperationResponse' { _glorAddtional :: HashMap Text JSONValue- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GoogleLongrunningOperationResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2895,10 +3009,10 @@ :: HashMap Text JSONValue -- ^ 'glorAddtional' -> GoogleLongrunningOperationResponse googleLongrunningOperationResponse pGlorAddtional_ =- GoogleLongrunningOperationResponse'- { _glorAddtional = _Coerce # pGlorAddtional_- }+ GoogleLongrunningOperationResponse'+ {_glorAddtional = _Coerce # pGlorAddtional_} + -- | Properties of the object. Contains field \'type with type URL. glorAddtional :: Lens' GoogleLongrunningOperationResponse (HashMap Text JSONValue) glorAddtional@@ -2921,11 +3035,14 @@ -- | The options shared by read requests. -- -- /See:/ 'readOptions' smart constructor.-data ReadOptions = ReadOptions'+data ReadOptions =+ ReadOptions' { _roReadConsistency :: !(Maybe ReadOptionsReadConsistency) , _roTransaction :: !(Maybe Bytes)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ReadOptions' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2936,11 +3053,9 @@ readOptions :: ReadOptions readOptions =- ReadOptions'- { _roReadConsistency = Nothing- , _roTransaction = Nothing- }+ ReadOptions' {_roReadConsistency = Nothing, _roTransaction = Nothing} + -- | The non-transactional read consistency to use. Cannot be set to -- \`STRONG\` for global queries. roReadConsistency :: Lens' ReadOptions (Maybe ReadOptionsReadConsistency)@@ -2981,11 +3096,14 @@ -- kinds=[], namespace_ids=[\'Baz\'] -- -- /See:/ 'googleDatastoreAdminV1EntityFilter' smart constructor.-data GoogleDatastoreAdminV1EntityFilter = GoogleDatastoreAdminV1EntityFilter'+data GoogleDatastoreAdminV1EntityFilter =+ GoogleDatastoreAdminV1EntityFilter' { _gdavefNamespaceIds :: !(Maybe [Text]) , _gdavefKinds :: !(Maybe [Text])- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GoogleDatastoreAdminV1EntityFilter' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2996,11 +3114,10 @@ googleDatastoreAdminV1EntityFilter :: GoogleDatastoreAdminV1EntityFilter googleDatastoreAdminV1EntityFilter =- GoogleDatastoreAdminV1EntityFilter'- { _gdavefNamespaceIds = Nothing- , _gdavefKinds = Nothing- }+ GoogleDatastoreAdminV1EntityFilter'+ {_gdavefNamespaceIds = Nothing, _gdavefKinds = Nothing} + -- | An empty list represents all namespaces. This is the preferred usage for -- projects that don\'t use namespaces. An empty string element represents -- the default namespace. This should be used if the project has data in@@ -3041,15 +3158,17 @@ -- -- /See:/ 'rollbackResponse' smart constructor. data RollbackResponse =- RollbackResponse'- deriving (Eq,Show,Data,Typeable,Generic)+ RollbackResponse'+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'RollbackResponse' with the minimum fields required to make a request. -- rollbackResponse :: RollbackResponse rollbackResponse = RollbackResponse' + instance FromJSON RollbackResponse where parseJSON = withObject "RollbackResponse"@@ -3061,10 +3180,13 @@ -- | A representation of a property in a projection. -- -- /See:/ 'projection' smart constructor.-newtype Projection = Projection'+newtype Projection =+ Projection' { _pProperty :: Maybe PropertyReference- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Projection' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -3072,11 +3194,9 @@ -- * 'pProperty' projection :: Projection-projection =- Projection'- { _pProperty = Nothing- }+projection = Projection' {_pProperty = Nothing} + -- | The property to project. pProperty :: Lens' Projection (Maybe PropertyReference) pProperty@@ -3095,15 +3215,17 @@ -- -- /See:/ 'reserveIdsResponse' smart constructor. data ReserveIdsResponse =- ReserveIdsResponse'- deriving (Eq,Show,Data,Typeable,Generic)+ ReserveIdsResponse'+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ReserveIdsResponse' with the minimum fields required to make a request. -- reserveIdsResponse :: ReserveIdsResponse reserveIdsResponse = ReserveIdsResponse' + instance FromJSON ReserveIdsResponse where parseJSON = withObject "ReserveIdsResponse"@@ -3115,11 +3237,14 @@ -- | A holder for any type of filter. -- -- /See:/ 'filter'' smart constructor.-data Filter = Filter'+data Filter =+ Filter' { _fCompositeFilter :: !(Maybe CompositeFilter) , _fPropertyFilter :: !(Maybe PropertyFilter)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Filter' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -3129,12 +3254,9 @@ -- * 'fPropertyFilter' filter' :: Filter-filter' =- Filter'- { _fCompositeFilter = Nothing- , _fPropertyFilter = Nothing- }+filter' = Filter' {_fCompositeFilter = Nothing, _fPropertyFilter = Nothing} + -- | A composite filter. fCompositeFilter :: Lens' Filter (Maybe CompositeFilter) fCompositeFilter@@ -3165,15 +3287,18 @@ -- | A minimal index definition. -- -- /See:/ 'googleDatastoreAdminV1Index' smart constructor.-data GoogleDatastoreAdminV1Index = GoogleDatastoreAdminV1Index'+data GoogleDatastoreAdminV1Index =+ GoogleDatastoreAdminV1Index' { _gdaviState :: !(Maybe GoogleDatastoreAdminV1IndexState) , _gdaviKind :: !(Maybe Text) , _gdaviProjectId :: !(Maybe Text) , _gdaviIndexId :: !(Maybe Text) , _gdaviAncestor :: !(Maybe GoogleDatastoreAdminV1IndexAncestor) , _gdaviProperties :: !(Maybe [GoogleDatastoreAdminV1IndexedProperty])- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GoogleDatastoreAdminV1Index' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -3192,7 +3317,7 @@ googleDatastoreAdminV1Index :: GoogleDatastoreAdminV1Index googleDatastoreAdminV1Index =- GoogleDatastoreAdminV1Index'+ GoogleDatastoreAdminV1Index' { _gdaviState = Nothing , _gdaviKind = Nothing , _gdaviProjectId = Nothing@@ -3201,6 +3326,7 @@ , _gdaviProperties = Nothing } + -- | The state of the index. Output only. gdaviState :: Lens' GoogleDatastoreAdminV1Index (Maybe GoogleDatastoreAdminV1IndexState) gdaviState@@ -3264,10 +3390,13 @@ -- created. May also include additional labels. -- -- /See:/ 'googleDatastoreAdminV1beta1CommonMetadataLabels' smart constructor.-newtype GoogleDatastoreAdminV1beta1CommonMetadataLabels = GoogleDatastoreAdminV1beta1CommonMetadataLabels'+newtype GoogleDatastoreAdminV1beta1CommonMetadataLabels =+ GoogleDatastoreAdminV1beta1CommonMetadataLabels' { _gAddtional :: HashMap Text Text- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GoogleDatastoreAdminV1beta1CommonMetadataLabels' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -3277,17 +3406,18 @@ :: HashMap Text Text -- ^ 'gAddtional' -> GoogleDatastoreAdminV1beta1CommonMetadataLabels googleDatastoreAdminV1beta1CommonMetadataLabels pGAddtional_ =- GoogleDatastoreAdminV1beta1CommonMetadataLabels'- { _gAddtional = _Coerce # pGAddtional_- }+ GoogleDatastoreAdminV1beta1CommonMetadataLabels'+ {_gAddtional = _Coerce # pGAddtional_} + gAddtional :: Lens' GoogleDatastoreAdminV1beta1CommonMetadataLabels (HashMap Text Text) gAddtional = lens _gAddtional (\ s a -> s{_gAddtional = a}) . _Coerce instance FromJSON- GoogleDatastoreAdminV1beta1CommonMetadataLabels where+ GoogleDatastoreAdminV1beta1CommonMetadataLabels+ where parseJSON = withObject "GoogleDatastoreAdminV1beta1CommonMetadataLabels"@@ -3296,18 +3426,22 @@ (parseJSONObject o)) instance ToJSON- GoogleDatastoreAdminV1beta1CommonMetadataLabels where+ GoogleDatastoreAdminV1beta1CommonMetadataLabels+ where toJSON = toJSON . _gAddtional -- | The request for Datastore.Commit. -- -- /See:/ 'commitRequest' smart constructor.-data CommitRequest = CommitRequest'+data CommitRequest =+ CommitRequest' { _crMutations :: !(Maybe [Mutation]) , _crMode :: !(Maybe CommitRequestMode) , _crTransaction :: !(Maybe Bytes)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'CommitRequest' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -3320,12 +3454,10 @@ commitRequest :: CommitRequest commitRequest =- CommitRequest'- { _crMutations = Nothing- , _crMode = Nothing- , _crTransaction = Nothing- }+ CommitRequest'+ {_crMutations = Nothing, _crMode = Nothing, _crTransaction = Nothing} + -- | The mutations to perform. When mode is \`TRANSACTIONAL\`, mutations -- affecting a single entity are applied in order. The following sequences -- of mutations affecting a single entity are not permitted in a single@@ -3371,11 +3503,14 @@ -- | The response message for Operations.ListOperations. -- -- /See:/ 'googleLongrunningListOperationsResponse' smart constructor.-data GoogleLongrunningListOperationsResponse = GoogleLongrunningListOperationsResponse'+data GoogleLongrunningListOperationsResponse =+ GoogleLongrunningListOperationsResponse' { _gllorNextPageToken :: !(Maybe Text) , _gllorOperations :: !(Maybe [GoogleLongrunningOperation])- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GoogleLongrunningListOperationsResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -3386,11 +3521,10 @@ googleLongrunningListOperationsResponse :: GoogleLongrunningListOperationsResponse googleLongrunningListOperationsResponse =- GoogleLongrunningListOperationsResponse'- { _gllorNextPageToken = Nothing- , _gllorOperations = Nothing- }+ GoogleLongrunningListOperationsResponse'+ {_gllorNextPageToken = Nothing, _gllorOperations = Nothing} + -- | The standard List next-page token. gllorNextPageToken :: Lens' GoogleLongrunningListOperationsResponse (Maybe Text) gllorNextPageToken@@ -3406,7 +3540,8 @@ . _Coerce instance FromJSON- GoogleLongrunningListOperationsResponse where+ GoogleLongrunningListOperationsResponse+ where parseJSON = withObject "GoogleLongrunningListOperationsResponse"@@ -3416,7 +3551,8 @@ (o .:? "operations" .!= mempty)) instance ToJSON- GoogleLongrunningListOperationsResponse where+ GoogleLongrunningListOperationsResponse+ where toJSON GoogleLongrunningListOperationsResponse'{..} = object (catMaybes@@ -3426,14 +3562,17 @@ -- | Metadata for ImportEntities operations. -- -- /See:/ 'googleDatastoreAdminV1ImportEntitiesMetadata' smart constructor.-data GoogleDatastoreAdminV1ImportEntitiesMetadata = GoogleDatastoreAdminV1ImportEntitiesMetadata'+data GoogleDatastoreAdminV1ImportEntitiesMetadata =+ GoogleDatastoreAdminV1ImportEntitiesMetadata' { _gProgressBytes :: !(Maybe GoogleDatastoreAdminV1Progress) , _gProgressEntities :: !(Maybe GoogleDatastoreAdminV1Progress) , _gEntityFilter :: !(Maybe GoogleDatastoreAdminV1EntityFilter) , _gInputURL :: !(Maybe Text) , _gCommon :: !(Maybe GoogleDatastoreAdminV1CommonMetadata)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GoogleDatastoreAdminV1ImportEntitiesMetadata' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -3450,7 +3589,7 @@ googleDatastoreAdminV1ImportEntitiesMetadata :: GoogleDatastoreAdminV1ImportEntitiesMetadata googleDatastoreAdminV1ImportEntitiesMetadata =- GoogleDatastoreAdminV1ImportEntitiesMetadata'+ GoogleDatastoreAdminV1ImportEntitiesMetadata' { _gProgressBytes = Nothing , _gProgressEntities = Nothing , _gEntityFilter = Nothing@@ -3458,6 +3597,7 @@ , _gCommon = Nothing } + -- | An estimate of the number of bytes processed. gProgressBytes :: Lens' GoogleDatastoreAdminV1ImportEntitiesMetadata (Maybe GoogleDatastoreAdminV1Progress) gProgressBytes@@ -3487,7 +3627,8 @@ gCommon = lens _gCommon (\ s a -> s{_gCommon = a}) instance FromJSON- GoogleDatastoreAdminV1ImportEntitiesMetadata where+ GoogleDatastoreAdminV1ImportEntitiesMetadata+ where parseJSON = withObject "GoogleDatastoreAdminV1ImportEntitiesMetadata"@@ -3500,7 +3641,8 @@ <*> (o .:? "common")) instance ToJSON- GoogleDatastoreAdminV1ImportEntitiesMetadata where+ GoogleDatastoreAdminV1ImportEntitiesMetadata+ where toJSON GoogleDatastoreAdminV1ImportEntitiesMetadata'{..} = object@@ -3514,11 +3656,14 @@ -- | Measures the progress of a particular metric. -- -- /See:/ 'googleDatastoreAdminV1Progress' smart constructor.-data GoogleDatastoreAdminV1Progress = GoogleDatastoreAdminV1Progress'+data GoogleDatastoreAdminV1Progress =+ GoogleDatastoreAdminV1Progress' { _gWorkCompleted :: !(Maybe (Textual Int64)) , _gWorkEstimated :: !(Maybe (Textual Int64))- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GoogleDatastoreAdminV1Progress' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -3529,11 +3674,10 @@ googleDatastoreAdminV1Progress :: GoogleDatastoreAdminV1Progress googleDatastoreAdminV1Progress =- GoogleDatastoreAdminV1Progress'- { _gWorkCompleted = Nothing- , _gWorkEstimated = Nothing- }+ GoogleDatastoreAdminV1Progress'+ {_gWorkCompleted = Nothing, _gWorkEstimated = Nothing} + -- | The amount of work that has been completed. Note that this may be -- greater than work_estimated. gWorkCompleted :: Lens' GoogleDatastoreAdminV1Progress (Maybe Int64)@@ -3570,12 +3714,15 @@ -- incomplete. -- -- /See:/ 'pathElement' smart constructor.-data PathElement = PathElement'+data PathElement =+ PathElement' { _peKind :: !(Maybe Text) , _peName :: !(Maybe Text) , _peId :: !(Maybe (Textual Int64))- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'PathElement' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -3588,12 +3735,9 @@ pathElement :: PathElement pathElement =- PathElement'- { _peKind = Nothing- , _peName = Nothing- , _peId = Nothing- }+ PathElement' {_peKind = Nothing, _peName = Nothing, _peId = Nothing} + -- | The kind of the entity. A kind matching regex \`__.*__\` is -- reserved\/read-only. A kind must not contain more than 1500 bytes when -- UTF-8 encoded. Cannot be \`\"\"\`.@@ -3632,11 +3776,14 @@ -- form of this message. -- -- /See:/ 'entity' smart constructor.-data Entity = Entity'+data Entity =+ Entity' { _eKey :: !(Maybe Key) , _eProperties :: !(Maybe EntityProperties)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Entity' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -3646,12 +3793,9 @@ -- * 'eProperties' entity :: Entity-entity =- Entity'- { _eKey = Nothing- , _eProperties = Nothing- }+entity = Entity' {_eKey = Nothing, _eProperties = Nothing} + -- | The entity\'s key. An entity must have a key, unless otherwise -- documented (for example, an entity in \`Value.entity_value\` may have no -- key). An entity\'s kind is its key path\'s last element\'s kind, or null@@ -3691,11 +3835,14 @@ -- kinds=[], namespace_ids=[\'Baz\'] -- -- /See:/ 'googleDatastoreAdminV1beta1EntityFilter' smart constructor.-data GoogleDatastoreAdminV1beta1EntityFilter = GoogleDatastoreAdminV1beta1EntityFilter'+data GoogleDatastoreAdminV1beta1EntityFilter =+ GoogleDatastoreAdminV1beta1EntityFilter' { _gNamespaceIds :: !(Maybe [Text]) , _gKinds :: !(Maybe [Text])- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GoogleDatastoreAdminV1beta1EntityFilter' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -3706,11 +3853,10 @@ googleDatastoreAdminV1beta1EntityFilter :: GoogleDatastoreAdminV1beta1EntityFilter googleDatastoreAdminV1beta1EntityFilter =- GoogleDatastoreAdminV1beta1EntityFilter'- { _gNamespaceIds = Nothing- , _gKinds = Nothing- }+ GoogleDatastoreAdminV1beta1EntityFilter'+ {_gNamespaceIds = Nothing, _gKinds = Nothing} + -- | An empty list represents all namespaces. This is the preferred usage for -- projects that don\'t use namespaces. An empty string element represents -- the default namespace. This should be used if the project has data in@@ -3730,7 +3876,8 @@ _Coerce instance FromJSON- GoogleDatastoreAdminV1beta1EntityFilter where+ GoogleDatastoreAdminV1beta1EntityFilter+ where parseJSON = withObject "GoogleDatastoreAdminV1beta1EntityFilter"@@ -3740,7 +3887,8 @@ (o .:? "kinds" .!= mempty)) instance ToJSON- GoogleDatastoreAdminV1beta1EntityFilter where+ GoogleDatastoreAdminV1beta1EntityFilter+ where toJSON GoogleDatastoreAdminV1beta1EntityFilter'{..} = object (catMaybes@@ -3751,15 +3899,17 @@ -- -- /See:/ 'readOnly' smart constructor. data ReadOnly =- ReadOnly'- deriving (Eq,Show,Data,Typeable,Generic)+ ReadOnly'+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ReadOnly' with the minimum fields required to make a request. -- readOnly :: ReadOnly readOnly = ReadOnly' + instance FromJSON ReadOnly where parseJSON = withObject "ReadOnly" (\ o -> pure ReadOnly')@@ -3770,11 +3920,14 @@ -- | A property of an index. -- -- /See:/ 'googleDatastoreAdminV1IndexedProperty' smart constructor.-data GoogleDatastoreAdminV1IndexedProperty = GoogleDatastoreAdminV1IndexedProperty'+data GoogleDatastoreAdminV1IndexedProperty =+ GoogleDatastoreAdminV1IndexedProperty' { _gdavipDirection :: !(Maybe GoogleDatastoreAdminV1IndexedPropertyDirection) , _gdavipName :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GoogleDatastoreAdminV1IndexedProperty' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -3785,11 +3938,10 @@ googleDatastoreAdminV1IndexedProperty :: GoogleDatastoreAdminV1IndexedProperty googleDatastoreAdminV1IndexedProperty =- GoogleDatastoreAdminV1IndexedProperty'- { _gdavipDirection = Nothing- , _gdavipName = Nothing- }+ GoogleDatastoreAdminV1IndexedProperty'+ {_gdavipDirection = Nothing, _gdavipName = Nothing} + -- | The indexed property\'s direction. Must not be DIRECTION_UNSPECIFIED. -- Required. gdavipDirection :: Lens' GoogleDatastoreAdminV1IndexedProperty (Maybe GoogleDatastoreAdminV1IndexedPropertyDirection)@@ -3803,7 +3955,8 @@ = lens _gdavipName (\ s a -> s{_gdavipName = a}) instance FromJSON- GoogleDatastoreAdminV1IndexedProperty where+ GoogleDatastoreAdminV1IndexedProperty+ where parseJSON = withObject "GoogleDatastoreAdminV1IndexedProperty" (\ o ->@@ -3821,12 +3974,15 @@ -- | The response for Datastore.Lookup. -- -- /See:/ 'lookupResponse' smart constructor.-data LookupResponse = LookupResponse'+data LookupResponse =+ LookupResponse' { _lrDeferred :: !(Maybe [Key]) , _lrFound :: !(Maybe [EntityResult]) , _lrMissing :: !(Maybe [EntityResult])- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'LookupResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -3839,12 +3995,10 @@ lookupResponse :: LookupResponse lookupResponse =- LookupResponse'- { _lrDeferred = Nothing- , _lrFound = Nothing- , _lrMissing = Nothing- }+ LookupResponse'+ {_lrDeferred = Nothing, _lrFound = Nothing, _lrMissing = Nothing} + -- | A list of keys that were not looked up due to resource constraints. The -- order of results in this field is undefined and has no relation to the -- order of the keys in the input.@@ -3892,14 +4046,17 @@ -- a network API call. -- -- /See:/ 'googleLongrunningOperation' smart constructor.-data GoogleLongrunningOperation = GoogleLongrunningOperation'+data GoogleLongrunningOperation =+ GoogleLongrunningOperation' { _gloDone :: !(Maybe Bool) , _gloError :: !(Maybe Status) , _gloResponse :: !(Maybe GoogleLongrunningOperationResponse) , _gloName :: !(Maybe Text) , _gloMetadata :: !(Maybe GoogleLongrunningOperationMetadata)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GoogleLongrunningOperation' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -3916,7 +4073,7 @@ googleLongrunningOperation :: GoogleLongrunningOperation googleLongrunningOperation =- GoogleLongrunningOperation'+ GoogleLongrunningOperation' { _gloDone = Nothing , _gloError = Nothing , _gloResponse = Nothing@@ -3924,6 +4081,7 @@ , _gloMetadata = Nothing } + -- | If the value is \`false\`, it means the operation is still in progress. -- If \`true\`, the operation is completed, and either \`error\` or -- \`response\` is available.@@ -3983,11 +4141,14 @@ -- | The desired order for a specific property. -- -- /See:/ 'propertyOrder' smart constructor.-data PropertyOrder = PropertyOrder'+data PropertyOrder =+ PropertyOrder' { _poProperty :: !(Maybe PropertyReference) , _poDirection :: !(Maybe PropertyOrderDirection)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'PropertyOrder' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -3997,12 +4158,9 @@ -- * 'poDirection' propertyOrder :: PropertyOrder-propertyOrder =- PropertyOrder'- { _poProperty = Nothing- , _poDirection = Nothing- }+propertyOrder = PropertyOrder' {_poProperty = Nothing, _poDirection = Nothing} + -- | The property to order by. poProperty :: Lens' PropertyOrder (Maybe PropertyReference) poProperty@@ -4030,14 +4188,17 @@ -- | Metadata for ExportEntities operations. -- -- /See:/ 'googleDatastoreAdminV1beta1ExportEntitiesMetadata' smart constructor.-data GoogleDatastoreAdminV1beta1ExportEntitiesMetadata = GoogleDatastoreAdminV1beta1ExportEntitiesMetadata'+data GoogleDatastoreAdminV1beta1ExportEntitiesMetadata =+ GoogleDatastoreAdminV1beta1ExportEntitiesMetadata' { _gooProgressBytes :: !(Maybe GoogleDatastoreAdminV1beta1Progress) , _gooOutputURLPrefix :: !(Maybe Text) , _gooProgressEntities :: !(Maybe GoogleDatastoreAdminV1beta1Progress) , _gooEntityFilter :: !(Maybe GoogleDatastoreAdminV1beta1EntityFilter) , _gooCommon :: !(Maybe GoogleDatastoreAdminV1beta1CommonMetadata)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GoogleDatastoreAdminV1beta1ExportEntitiesMetadata' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -4054,7 +4215,7 @@ googleDatastoreAdminV1beta1ExportEntitiesMetadata :: GoogleDatastoreAdminV1beta1ExportEntitiesMetadata googleDatastoreAdminV1beta1ExportEntitiesMetadata =- GoogleDatastoreAdminV1beta1ExportEntitiesMetadata'+ GoogleDatastoreAdminV1beta1ExportEntitiesMetadata' { _gooProgressBytes = Nothing , _gooOutputURLPrefix = Nothing , _gooProgressEntities = Nothing@@ -4062,6 +4223,7 @@ , _gooCommon = Nothing } + -- | An estimate of the number of bytes processed. gooProgressBytes :: Lens' GoogleDatastoreAdminV1beta1ExportEntitiesMetadata (Maybe GoogleDatastoreAdminV1beta1Progress) gooProgressBytes@@ -4096,7 +4258,7 @@ = lens _gooCommon (\ s a -> s{_gooCommon = a}) instance FromJSON- GoogleDatastoreAdminV1beta1ExportEntitiesMetadata+ GoogleDatastoreAdminV1beta1ExportEntitiesMetadata where parseJSON = withObject@@ -4110,7 +4272,7 @@ <*> (o .:? "common")) instance ToJSON- GoogleDatastoreAdminV1beta1ExportEntitiesMetadata+ GoogleDatastoreAdminV1beta1ExportEntitiesMetadata where toJSON GoogleDatastoreAdminV1beta1ExportEntitiesMetadata'{..}@@ -4125,11 +4287,14 @@ -- | A binding parameter for a GQL query. -- -- /See:/ 'gqlQueryParameter' smart constructor.-data GqlQueryParameter = GqlQueryParameter'+data GqlQueryParameter =+ GqlQueryParameter' { _gqpCursor :: !(Maybe Bytes) , _gqpValue :: !(Maybe Value)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GqlQueryParameter' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -4140,10 +4305,8 @@ gqlQueryParameter :: GqlQueryParameter gqlQueryParameter =- GqlQueryParameter'- { _gqpCursor = Nothing- , _gqpValue = Nothing- }+ GqlQueryParameter' {_gqpCursor = Nothing, _gqpValue = Nothing}+ -- | A query cursor. Query cursors are returned in query result batches. gqpCursor :: Lens' GqlQueryParameter (Maybe ByteString)
gen/Network/Google/Resource/Datastore/Projects/AllocateIds.hs view
@@ -65,7 +65,8 @@ -- entity before it is inserted. -- -- /See:/ 'projectsAllocateIds' smart constructor.-data ProjectsAllocateIds = ProjectsAllocateIds'+data ProjectsAllocateIds =+ ProjectsAllocateIds' { _paiXgafv :: !(Maybe Xgafv) , _paiUploadProtocol :: !(Maybe Text) , _paiAccessToken :: !(Maybe Text)@@ -73,8 +74,10 @@ , _paiPayload :: !AllocateIdsRequest , _paiProjectId :: !Text , _paiCallback :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsAllocateIds' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -97,7 +100,7 @@ -> Text -- ^ 'paiProjectId' -> ProjectsAllocateIds projectsAllocateIds pPaiPayload_ pPaiProjectId_ =- ProjectsAllocateIds'+ ProjectsAllocateIds' { _paiXgafv = Nothing , _paiUploadProtocol = Nothing , _paiAccessToken = Nothing@@ -106,6 +109,7 @@ , _paiProjectId = pPaiProjectId_ , _paiCallback = Nothing }+ -- | V1 error format. paiXgafv :: Lens' ProjectsAllocateIds (Maybe Xgafv)
gen/Network/Google/Resource/Datastore/Projects/BeginTransaction.hs view
@@ -63,7 +63,8 @@ -- | Begins a new transaction. -- -- /See:/ 'projectsBeginTransaction' smart constructor.-data ProjectsBeginTransaction = ProjectsBeginTransaction'+data ProjectsBeginTransaction =+ ProjectsBeginTransaction' { _pbtXgafv :: !(Maybe Xgafv) , _pbtUploadProtocol :: !(Maybe Text) , _pbtAccessToken :: !(Maybe Text)@@ -71,8 +72,10 @@ , _pbtPayload :: !BeginTransactionRequest , _pbtProjectId :: !Text , _pbtCallback :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsBeginTransaction' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -95,7 +98,7 @@ -> Text -- ^ 'pbtProjectId' -> ProjectsBeginTransaction projectsBeginTransaction pPbtPayload_ pPbtProjectId_ =- ProjectsBeginTransaction'+ ProjectsBeginTransaction' { _pbtXgafv = Nothing , _pbtUploadProtocol = Nothing , _pbtAccessToken = Nothing@@ -104,6 +107,7 @@ , _pbtProjectId = pPbtProjectId_ , _pbtCallback = Nothing }+ -- | V1 error format. pbtXgafv :: Lens' ProjectsBeginTransaction (Maybe Xgafv)
gen/Network/Google/Resource/Datastore/Projects/Commit.hs view
@@ -65,7 +65,8 @@ -- entities. -- -- /See:/ 'projectsCommit' smart constructor.-data ProjectsCommit = ProjectsCommit'+data ProjectsCommit =+ ProjectsCommit' { _pcXgafv :: !(Maybe Xgafv) , _pcUploadProtocol :: !(Maybe Text) , _pcAccessToken :: !(Maybe Text)@@ -73,8 +74,10 @@ , _pcPayload :: !CommitRequest , _pcProjectId :: !Text , _pcCallback :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsCommit' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -97,7 +100,7 @@ -> Text -- ^ 'pcProjectId' -> ProjectsCommit projectsCommit pPcPayload_ pPcProjectId_ =- ProjectsCommit'+ ProjectsCommit' { _pcXgafv = Nothing , _pcUploadProtocol = Nothing , _pcAccessToken = Nothing@@ -106,6 +109,7 @@ , _pcProjectId = pPcProjectId_ , _pcCallback = Nothing }+ -- | V1 error format. pcXgafv :: Lens' ProjectsCommit (Maybe Xgafv)
gen/Network/Google/Resource/Datastore/Projects/Export.hs view
@@ -78,7 +78,8 @@ -- data behind in Google Cloud Storage. -- -- /See:/ 'projectsExport' smart constructor.-data ProjectsExport = ProjectsExport'+data ProjectsExport =+ ProjectsExport' { _peXgafv :: !(Maybe Xgafv) , _peUploadProtocol :: !(Maybe Text) , _peAccessToken :: !(Maybe Text)@@ -86,8 +87,10 @@ , _pePayload :: !GoogleDatastoreAdminV1ExportEntitiesRequest , _peProjectId :: !Text , _peCallback :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsExport' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -110,7 +113,7 @@ -> Text -- ^ 'peProjectId' -> ProjectsExport projectsExport pPePayload_ pPeProjectId_ =- ProjectsExport'+ ProjectsExport' { _peXgafv = Nothing , _peUploadProtocol = Nothing , _peAccessToken = Nothing@@ -119,6 +122,7 @@ , _peProjectId = pPeProjectId_ , _peCallback = Nothing }+ -- | V1 error format. peXgafv :: Lens' ProjectsExport (Maybe Xgafv)
gen/Network/Google/Resource/Datastore/Projects/Import.hs view
@@ -72,7 +72,8 @@ -- that a subset of the data has already been imported to Cloud Datastore. -- -- /See:/ 'projectsImport' smart constructor.-data ProjectsImport = ProjectsImport'+data ProjectsImport =+ ProjectsImport' { _pXgafv :: !(Maybe Xgafv) , _pUploadProtocol :: !(Maybe Text) , _pAccessToken :: !(Maybe Text)@@ -80,8 +81,10 @@ , _pPayload :: !GoogleDatastoreAdminV1ImportEntitiesRequest , _pProjectId :: !Text , _pCallback :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsImport' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -104,7 +107,7 @@ -> Text -- ^ 'pProjectId' -> ProjectsImport projectsImport pPPayload_ pPProjectId_ =- ProjectsImport'+ ProjectsImport' { _pXgafv = Nothing , _pUploadProtocol = Nothing , _pAccessToken = Nothing@@ -113,6 +116,7 @@ , _pProjectId = pPProjectId_ , _pCallback = Nothing }+ -- | V1 error format. pXgafv :: Lens' ProjectsImport (Maybe Xgafv)
gen/Network/Google/Resource/Datastore/Projects/Indexes/Get.hs view
@@ -64,7 +64,8 @@ -- | Gets an index. -- -- /See:/ 'projectsIndexesGet' smart constructor.-data ProjectsIndexesGet = ProjectsIndexesGet'+data ProjectsIndexesGet =+ ProjectsIndexesGet' { _pigXgafv :: !(Maybe Xgafv) , _pigUploadProtocol :: !(Maybe Text) , _pigAccessToken :: !(Maybe Text)@@ -72,8 +73,10 @@ , _pigProjectId :: !Text , _pigIndexId :: !Text , _pigCallback :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsIndexesGet' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -96,7 +99,7 @@ -> Text -- ^ 'pigIndexId' -> ProjectsIndexesGet projectsIndexesGet pPigProjectId_ pPigIndexId_ =- ProjectsIndexesGet'+ ProjectsIndexesGet' { _pigXgafv = Nothing , _pigUploadProtocol = Nothing , _pigAccessToken = Nothing@@ -105,6 +108,7 @@ , _pigIndexId = pPigIndexId_ , _pigCallback = Nothing }+ -- | V1 error format. pigXgafv :: Lens' ProjectsIndexesGet (Maybe Xgafv)
gen/Network/Google/Resource/Datastore/Projects/Indexes/List.hs view
@@ -73,7 +73,8 @@ -- occasionally return stale results. -- -- /See:/ 'projectsIndexesList' smart constructor.-data ProjectsIndexesList = ProjectsIndexesList'+data ProjectsIndexesList =+ ProjectsIndexesList' { _pilXgafv :: !(Maybe Xgafv) , _pilUploadProtocol :: !(Maybe Text) , _pilAccessToken :: !(Maybe Text)@@ -83,8 +84,10 @@ , _pilProjectId :: !Text , _pilPageSize :: !(Maybe (Textual Int32)) , _pilCallback :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsIndexesList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -110,7 +113,7 @@ :: Text -- ^ 'pilProjectId' -> ProjectsIndexesList projectsIndexesList pPilProjectId_ =- ProjectsIndexesList'+ ProjectsIndexesList' { _pilXgafv = Nothing , _pilUploadProtocol = Nothing , _pilAccessToken = Nothing@@ -121,6 +124,7 @@ , _pilPageSize = Nothing , _pilCallback = Nothing }+ -- | V1 error format. pilXgafv :: Lens' ProjectsIndexesList (Maybe Xgafv)
gen/Network/Google/Resource/Datastore/Projects/Lookup.hs view
@@ -63,7 +63,8 @@ -- | Looks up entities by key. -- -- /See:/ 'projectsLookup' smart constructor.-data ProjectsLookup = ProjectsLookup'+data ProjectsLookup =+ ProjectsLookup' { _plXgafv :: !(Maybe Xgafv) , _plUploadProtocol :: !(Maybe Text) , _plAccessToken :: !(Maybe Text)@@ -71,8 +72,10 @@ , _plPayload :: !LookupRequest , _plProjectId :: !Text , _plCallback :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsLookup' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -95,7 +98,7 @@ -> Text -- ^ 'plProjectId' -> ProjectsLookup projectsLookup pPlPayload_ pPlProjectId_ =- ProjectsLookup'+ ProjectsLookup' { _plXgafv = Nothing , _plUploadProtocol = Nothing , _plAccessToken = Nothing@@ -104,6 +107,7 @@ , _plProjectId = pPlProjectId_ , _plCallback = Nothing }+ -- | V1 error format. plXgafv :: Lens' ProjectsLookup (Maybe Xgafv)
gen/Network/Google/Resource/Datastore/Projects/Operations/Cancel.hs view
@@ -75,15 +75,18 @@ -- google.rpc.Status.code of 1, corresponding to \`Code.CANCELLED\`. -- -- /See:/ 'projectsOperationsCancel' smart constructor.-data ProjectsOperationsCancel = ProjectsOperationsCancel'+data ProjectsOperationsCancel =+ ProjectsOperationsCancel' { _pocXgafv :: !(Maybe Xgafv) , _pocUploadProtocol :: !(Maybe Text) , _pocAccessToken :: !(Maybe Text) , _pocUploadType :: !(Maybe Text) , _pocName :: !Text , _pocCallback :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsOperationsCancel' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -103,7 +106,7 @@ :: Text -- ^ 'pocName' -> ProjectsOperationsCancel projectsOperationsCancel pPocName_ =- ProjectsOperationsCancel'+ ProjectsOperationsCancel' { _pocXgafv = Nothing , _pocUploadProtocol = Nothing , _pocAccessToken = Nothing@@ -111,6 +114,7 @@ , _pocName = pPocName_ , _pocCallback = Nothing }+ -- | V1 error format. pocXgafv :: Lens' ProjectsOperationsCancel (Maybe Xgafv)
gen/Network/Google/Resource/Datastore/Projects/Operations/Delete.hs view
@@ -65,15 +65,18 @@ -- \`google.rpc.Code.UNIMPLEMENTED\`. -- -- /See:/ 'projectsOperationsDelete' smart constructor.-data ProjectsOperationsDelete = ProjectsOperationsDelete'+data ProjectsOperationsDelete =+ ProjectsOperationsDelete' { _podXgafv :: !(Maybe Xgafv) , _podUploadProtocol :: !(Maybe Text) , _podAccessToken :: !(Maybe Text) , _podUploadType :: !(Maybe Text) , _podName :: !Text , _podCallback :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsOperationsDelete' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -93,7 +96,7 @@ :: Text -- ^ 'podName' -> ProjectsOperationsDelete projectsOperationsDelete pPodName_ =- ProjectsOperationsDelete'+ ProjectsOperationsDelete' { _podXgafv = Nothing , _podUploadProtocol = Nothing , _podAccessToken = Nothing@@ -101,6 +104,7 @@ , _podName = pPodName_ , _podCallback = Nothing }+ -- | V1 error format. podXgafv :: Lens' ProjectsOperationsDelete (Maybe Xgafv)
gen/Network/Google/Resource/Datastore/Projects/Operations/Get.hs view
@@ -64,15 +64,18 @@ -- API service. -- -- /See:/ 'projectsOperationsGet' smart constructor.-data ProjectsOperationsGet = ProjectsOperationsGet'+data ProjectsOperationsGet =+ ProjectsOperationsGet' { _pogXgafv :: !(Maybe Xgafv) , _pogUploadProtocol :: !(Maybe Text) , _pogAccessToken :: !(Maybe Text) , _pogUploadType :: !(Maybe Text) , _pogName :: !Text , _pogCallback :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsOperationsGet' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -92,7 +95,7 @@ :: Text -- ^ 'pogName' -> ProjectsOperationsGet projectsOperationsGet pPogName_ =- ProjectsOperationsGet'+ ProjectsOperationsGet' { _pogXgafv = Nothing , _pogUploadProtocol = Nothing , _pogAccessToken = Nothing@@ -100,6 +103,7 @@ , _pogName = pPogName_ , _pogCallback = Nothing }+ -- | V1 error format. pogXgafv :: Lens' ProjectsOperationsGet (Maybe Xgafv)
gen/Network/Google/Resource/Datastore/Projects/Operations/List.hs view
@@ -85,7 +85,8 @@ -- id. -- -- /See:/ 'projectsOperationsList' smart constructor.-data ProjectsOperationsList = ProjectsOperationsList'+data ProjectsOperationsList =+ ProjectsOperationsList' { _polXgafv :: !(Maybe Xgafv) , _polUploadProtocol :: !(Maybe Text) , _polAccessToken :: !(Maybe Text)@@ -95,8 +96,10 @@ , _polPageToken :: !(Maybe Text) , _polPageSize :: !(Maybe (Textual Int32)) , _polCallback :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsOperationsList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -122,7 +125,7 @@ :: Text -- ^ 'polName' -> ProjectsOperationsList projectsOperationsList pPolName_ =- ProjectsOperationsList'+ ProjectsOperationsList' { _polXgafv = Nothing , _polUploadProtocol = Nothing , _polAccessToken = Nothing@@ -133,6 +136,7 @@ , _polPageSize = Nothing , _polCallback = Nothing }+ -- | V1 error format. polXgafv :: Lens' ProjectsOperationsList (Maybe Xgafv)
gen/Network/Google/Resource/Datastore/Projects/ReserveIds.hs view
@@ -65,7 +65,8 @@ -- Datastore. -- -- /See:/ 'projectsReserveIds' smart constructor.-data ProjectsReserveIds = ProjectsReserveIds'+data ProjectsReserveIds =+ ProjectsReserveIds' { _priXgafv :: !(Maybe Xgafv) , _priUploadProtocol :: !(Maybe Text) , _priAccessToken :: !(Maybe Text)@@ -73,8 +74,10 @@ , _priPayload :: !ReserveIdsRequest , _priProjectId :: !Text , _priCallback :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsReserveIds' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -97,7 +100,7 @@ -> Text -- ^ 'priProjectId' -> ProjectsReserveIds projectsReserveIds pPriPayload_ pPriProjectId_ =- ProjectsReserveIds'+ ProjectsReserveIds' { _priXgafv = Nothing , _priUploadProtocol = Nothing , _priAccessToken = Nothing@@ -106,6 +109,7 @@ , _priProjectId = pPriProjectId_ , _priCallback = Nothing }+ -- | V1 error format. priXgafv :: Lens' ProjectsReserveIds (Maybe Xgafv)
gen/Network/Google/Resource/Datastore/Projects/Rollback.hs view
@@ -63,7 +63,8 @@ -- | Rolls back a transaction. -- -- /See:/ 'projectsRollback' smart constructor.-data ProjectsRollback = ProjectsRollback'+data ProjectsRollback =+ ProjectsRollback' { _prXgafv :: !(Maybe Xgafv) , _prUploadProtocol :: !(Maybe Text) , _prAccessToken :: !(Maybe Text)@@ -71,8 +72,10 @@ , _prPayload :: !RollbackRequest , _prProjectId :: !Text , _prCallback :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsRollback' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -95,7 +98,7 @@ -> Text -- ^ 'prProjectId' -> ProjectsRollback projectsRollback pPrPayload_ pPrProjectId_ =- ProjectsRollback'+ ProjectsRollback' { _prXgafv = Nothing , _prUploadProtocol = Nothing , _prAccessToken = Nothing@@ -104,6 +107,7 @@ , _prProjectId = pPrProjectId_ , _prCallback = Nothing }+ -- | V1 error format. prXgafv :: Lens' ProjectsRollback (Maybe Xgafv)
gen/Network/Google/Resource/Datastore/Projects/RunQuery.hs view
@@ -63,7 +63,8 @@ -- | Queries for entities. -- -- /See:/ 'projectsRunQuery' smart constructor.-data ProjectsRunQuery = ProjectsRunQuery'+data ProjectsRunQuery =+ ProjectsRunQuery' { _prqXgafv :: !(Maybe Xgafv) , _prqUploadProtocol :: !(Maybe Text) , _prqAccessToken :: !(Maybe Text)@@ -71,8 +72,10 @@ , _prqPayload :: !RunQueryRequest , _prqProjectId :: !Text , _prqCallback :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsRunQuery' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -95,7 +98,7 @@ -> Text -- ^ 'prqProjectId' -> ProjectsRunQuery projectsRunQuery pPrqPayload_ pPrqProjectId_ =- ProjectsRunQuery'+ ProjectsRunQuery' { _prqXgafv = Nothing , _prqUploadProtocol = Nothing , _prqAccessToken = Nothing@@ -104,6 +107,7 @@ , _prqProjectId = pPrqProjectId_ , _prqCallback = Nothing }+ -- | V1 error format. prqXgafv :: Lens' ProjectsRunQuery (Maybe Xgafv)
gogol-datastore.cabal view
@@ -1,5 +1,5 @@ name: gogol-datastore-version: 0.4.0+version: 0.5.0 synopsis: Google Cloud Datastore SDK. homepage: https://github.com/brendanhay/gogol bug-reports: https://github.com/brendanhay/gogol/issues@@ -57,5 +57,5 @@ , Network.Google.Datastore.Types.Sum build-depends:- gogol-core == 0.4.0.*+ gogol-core == 0.5.0.* , base >= 4.7 && < 5