diff --git a/README.md b/README.md --- a/README.md +++ b/README.md @@ -8,7 +8,7 @@ ## Version -`0.1.1` +`0.2.0` ## Description diff --git a/gen/Network/Google/BigQuery.hs b/gen/Network/Google/BigQuery.hs --- a/gen/Network/Google/BigQuery.hs +++ b/gen/Network/Google/BigQuery.hs @@ -149,6 +149,7 @@ , tltiFriendlyName , tltiKind , tltiId + , tltiLabels , tltiType -- ** TableSchema @@ -319,6 +320,7 @@ -- ** ExplainQueryStage , ExplainQueryStage , explainQueryStage + , eqsStatus , eqsWaitRatioMax , eqsRecordsWritten , eqsSteps @@ -355,6 +357,7 @@ , jclSourceURIs , jclEncoding , jclFieldDelimiter + , jclNullMarker -- ** JobsListStateFilter , JobsListStateFilter (..) @@ -564,6 +567,7 @@ , jBillingTier , jUndeclaredQueryParameters , jReferencedTables + , jStatementType , jNumDmlAffectedRows , jQueryPlan , jCacheHit @@ -576,6 +580,11 @@ , jsErrorResult , jsErrors + -- ** TableLabels + , TableLabels + , tableLabels + , tlAddtional + -- ** DataSetAccessItem , DataSetAccessItem , dataSetAccessItem @@ -618,6 +627,7 @@ , tabNumRows , tabView , tabId + , tabLabels , tabType , tabNumLongTermBytes , tabExpirationTime @@ -668,6 +678,11 @@ , DataSetListDataSetsItemLabels , dataSetListDataSetsItemLabels , dsldsilAddtional + + -- ** TableListTablesItemLabels + , TableListTablesItemLabels + , tableListTablesItemLabels + , tltilAddtional ) where import Network.Google.BigQuery.Types diff --git a/gen/Network/Google/BigQuery/Types.hs b/gen/Network/Google/BigQuery/Types.hs --- a/gen/Network/Google/BigQuery/Types.hs +++ b/gen/Network/Google/BigQuery/Types.hs @@ -77,6 +77,7 @@ , tltiFriendlyName , tltiKind , tltiId + , tltiLabels , tltiType -- * TableSchema @@ -247,6 +248,7 @@ -- * ExplainQueryStage , ExplainQueryStage , explainQueryStage + , eqsStatus , eqsWaitRatioMax , eqsRecordsWritten , eqsSteps @@ -283,6 +285,7 @@ , jclSourceURIs , jclEncoding , jclFieldDelimiter + , jclNullMarker -- * JobsListStateFilter , JobsListStateFilter (..) @@ -492,6 +495,7 @@ , jBillingTier , jUndeclaredQueryParameters , jReferencedTables + , jStatementType , jNumDmlAffectedRows , jQueryPlan , jCacheHit @@ -504,6 +508,11 @@ , jsErrorResult , jsErrors + -- * TableLabels + , TableLabels + , tableLabels + , tlAddtional + -- * DataSetAccessItem , DataSetAccessItem , dataSetAccessItem @@ -546,6 +555,7 @@ , tabNumRows , tabView , tabId + , tabLabels , tabType , tabNumLongTermBytes , tabExpirationTime @@ -596,6 +606,11 @@ , DataSetListDataSetsItemLabels , dataSetListDataSetsItemLabels , dsldsilAddtional + + -- * TableListTablesItemLabels + , TableListTablesItemLabels + , tableListTablesItemLabels + , tltilAddtional ) where import Network.Google.BigQuery.Types.Product diff --git a/gen/Network/Google/BigQuery/Types/Product.hs b/gen/Network/Google/BigQuery/Types/Product.hs --- a/gen/Network/Google/BigQuery/Types/Product.hs +++ b/gen/Network/Google/BigQuery/Types/Product.hs @@ -420,6 +420,7 @@ , _tltiFriendlyName :: !(Maybe Text) , _tltiKind :: !Text , _tltiId :: !(Maybe Text) + , _tltiLabels :: !(Maybe TableListTablesItemLabels) , _tltiType :: !(Maybe Text) } deriving (Eq,Show,Data,Typeable,Generic) @@ -435,6 +436,8 @@ -- -- * 'tltiId' -- +-- * 'tltiLabels' +-- -- * 'tltiType' tableListTablesItem :: TableListTablesItem @@ -444,6 +447,7 @@ , _tltiFriendlyName = Nothing , _tltiKind = "bigquery#table" , _tltiId = Nothing + , _tltiLabels = Nothing , _tltiType = Nothing } @@ -467,6 +471,12 @@ tltiId :: Lens' TableListTablesItem (Maybe Text) tltiId = lens _tltiId (\ s a -> s{_tltiId = a}) +-- | [Experimental] The labels associated with this table. You can use these +-- to organize and group your tables. +tltiLabels :: Lens' TableListTablesItem (Maybe TableListTablesItemLabels) +tltiLabels + = lens _tltiLabels (\ s a -> s{_tltiLabels = a}) + -- | The type of table. Possible values are: TABLE, VIEW. tltiType :: Lens' TableListTablesItem (Maybe Text) tltiType = lens _tltiType (\ s a -> s{_tltiType = a}) @@ -479,6 +489,7 @@ (o .:? "tableReference") <*> (o .:? "friendlyName") <*> (o .:? "kind" .!= "bigquery#table") <*> (o .:? "id") + <*> (o .:? "labels") <*> (o .:? "type")) instance ToJSON TableListTablesItem where @@ -488,6 +499,7 @@ [("tableReference" .=) <$> _tltiTableReference, ("friendlyName" .=) <$> _tltiFriendlyName, Just ("kind" .= _tltiKind), ("id" .=) <$> _tltiId, + ("labels" .=) <$> _tltiLabels, ("type" .=) <$> _tltiType]) -- @@ -1523,8 +1535,10 @@ tfsName = lens _tfsName (\ s a -> s{_tfsName = a}) -- | [Required] The field data type. Possible values include STRING, BYTES, --- INTEGER, FLOAT, BOOLEAN, TIMESTAMP, DATE, TIME, DATETIME, or RECORD --- (where RECORD indicates that the field contains a nested schema). +-- INTEGER, INT64 (same as INTEGER), FLOAT, FLOAT64 (same as FLOAT), +-- BOOLEAN, BOOL (same as BOOLEAN), TIMESTAMP, DATE, TIME, DATETIME, RECORD +-- (where RECORD indicates that the field contains a nested schema) or +-- STRUCT (same as RECORD). tfsType :: Lens' TableFieldSchema (Maybe Text) tfsType = lens _tfsType (\ s a -> s{_tfsType = a}) @@ -1910,8 +1924,9 @@ qrQuery :: Lens' QueryRequest (Maybe Text) qrQuery = lens _qrQuery (\ s a -> s{_qrQuery = a}) --- | [Experimental] Standard SQL only. Whether to use positional (?) or named --- (\'myparam) query parameters in this query. +-- | [Experimental] Standard SQL only. Set to POSITIONAL to use positional +-- (?) query parameters or to NAMED to use named (\'myparam) query +-- parameters in this query. qrParameterMode :: Lens' QueryRequest (Maybe Text) qrParameterMode = lens _qrParameterMode @@ -1929,9 +1944,9 @@ = lens _qrTimeoutMs (\ s a -> s{_qrTimeoutMs = a}) . mapping _Coerce --- | [Experimental] Specifies whether to use BigQuery\'s legacy SQL dialect --- for this query. The default value is true. If set to false, the query --- will use BigQuery\'s standard SQL: +-- | Specifies whether to use BigQuery\'s legacy SQL dialect for this query. +-- The default value is true. If set to false, the query will use +-- BigQuery\'s standard SQL: -- https:\/\/cloud.google.com\/bigquery\/sql-reference\/ When useLegacySql -- is set to false, the values of allowLargeResults and flattenResults are -- ignored; query will be run as if allowLargeResults is true and @@ -2138,7 +2153,8 @@ -- -- /See:/ 'explainQueryStage' smart constructor. data ExplainQueryStage = ExplainQueryStage' - { _eqsWaitRatioMax :: !(Maybe (Textual Double)) + { _eqsStatus :: !(Maybe Text) + , _eqsWaitRatioMax :: !(Maybe (Textual Double)) , _eqsRecordsWritten :: !(Maybe (Textual Int64)) , _eqsSteps :: !(Maybe [ExplainQueryStep]) , _eqsWriteRatioAvg :: !(Maybe (Textual Double)) @@ -2157,6 +2173,8 @@ -- -- Use one of the following lenses to modify other fields as desired: -- +-- * 'eqsStatus' +-- -- * 'eqsWaitRatioMax' -- -- * 'eqsRecordsWritten' @@ -2186,7 +2204,8 @@ :: ExplainQueryStage explainQueryStage = ExplainQueryStage' - { _eqsWaitRatioMax = Nothing + { _eqsStatus = Nothing + , _eqsWaitRatioMax = Nothing , _eqsRecordsWritten = Nothing , _eqsSteps = Nothing , _eqsWriteRatioAvg = Nothing @@ -2201,6 +2220,11 @@ , _eqsReadRatioAvg = Nothing } +-- | Current status for the stage. +eqsStatus :: Lens' ExplainQueryStage (Maybe Text) +eqsStatus + = lens _eqsStatus (\ s a -> s{_eqsStatus = a}) + -- | Relative amount of time the slowest shard spent waiting to be scheduled. eqsWaitRatioMax :: Lens' ExplainQueryStage (Maybe Double) eqsWaitRatioMax @@ -2294,7 +2318,8 @@ = withObject "ExplainQueryStage" (\ o -> ExplainQueryStage' <$> - (o .:? "waitRatioMax") <*> (o .:? "recordsWritten") + (o .:? "status") <*> (o .:? "waitRatioMax") <*> + (o .:? "recordsWritten") <*> (o .:? "steps" .!= mempty) <*> (o .:? "writeRatioAvg") <*> (o .:? "recordsRead") @@ -2311,7 +2336,8 @@ toJSON ExplainQueryStage'{..} = object (catMaybes - [("waitRatioMax" .=) <$> _eqsWaitRatioMax, + [("status" .=) <$> _eqsStatus, + ("waitRatioMax" .=) <$> _eqsWaitRatioMax, ("recordsWritten" .=) <$> _eqsRecordsWritten, ("steps" .=) <$> _eqsSteps, ("writeRatioAvg" .=) <$> _eqsWriteRatioAvg, @@ -2341,12 +2367,13 @@ , _jclAllowQuotedNewlines :: !(Maybe Bool) , _jclSourceFormat :: !(Maybe Text) , _jclSchema :: !(Maybe TableSchema) - , _jclQuote :: !Text + , _jclQuote :: !(Maybe Text) , _jclMaxBadRecords :: !(Maybe (Textual Int32)) , _jclAutodetect :: !(Maybe Bool) , _jclSourceURIs :: !(Maybe [Text]) , _jclEncoding :: !(Maybe Text) , _jclFieldDelimiter :: !(Maybe Text) + , _jclNullMarker :: !(Maybe Text) } deriving (Eq,Show,Data,Typeable,Generic) -- | Creates a value of 'JobConfigurationLoad' with the minimum fields required to make a request. @@ -2390,6 +2417,8 @@ -- * 'jclEncoding' -- -- * 'jclFieldDelimiter' +-- +-- * 'jclNullMarker' jobConfigurationLoad :: JobConfigurationLoad jobConfigurationLoad = @@ -2407,12 +2436,13 @@ , _jclAllowQuotedNewlines = Nothing , _jclSourceFormat = Nothing , _jclSchema = Nothing - , _jclQuote = "\"" + , _jclQuote = Nothing , _jclMaxBadRecords = Nothing , _jclAutodetect = Nothing , _jclSourceURIs = Nothing , _jclEncoding = Nothing , _jclFieldDelimiter = Nothing + , _jclNullMarker = Nothing } -- | [Optional] The number of rows at the top of a CSV file that BigQuery @@ -2550,7 +2580,7 @@ -- not contain quoted sections, set the property value to an empty string. -- If your data contains quoted newline characters, you must also set the -- allowQuotedNewlines property to true. -jclQuote :: Lens' JobConfigurationLoad Text +jclQuote :: Lens' JobConfigurationLoad (Maybe Text) jclQuote = lens _jclQuote (\ s a -> s{_jclQuote = a}) -- | [Optional] The maximum number of bad records that BigQuery can ignore @@ -2600,6 +2630,18 @@ = lens _jclFieldDelimiter (\ s a -> s{_jclFieldDelimiter = a}) +-- | [Optional] Specifies a string that represents a null value in a CSV +-- file. For example, if you specify \"\\N\", BigQuery interprets \"\\N\" +-- as a null value when loading a CSV file. The default value is the empty +-- string. If you set this property to a custom value, BigQuery still +-- interprets the empty string as a null value for all data types except +-- for STRING and BYTE. For STRING and BYTE columns, BigQuery interprets +-- the empty string as an empty value. +jclNullMarker :: Lens' JobConfigurationLoad (Maybe Text) +jclNullMarker + = lens _jclNullMarker + (\ s a -> s{_jclNullMarker = a}) + instance FromJSON JobConfigurationLoad where parseJSON = withObject "JobConfigurationLoad" @@ -2618,12 +2660,13 @@ <*> (o .:? "allowQuotedNewlines") <*> (o .:? "sourceFormat") <*> (o .:? "schema") - <*> (o .:? "quote" .!= "\"") + <*> (o .:? "quote") <*> (o .:? "maxBadRecords") <*> (o .:? "autodetect") <*> (o .:? "sourceUris" .!= mempty) <*> (o .:? "encoding") - <*> (o .:? "fieldDelimiter")) + <*> (o .:? "fieldDelimiter") + <*> (o .:? "nullMarker")) instance ToJSON JobConfigurationLoad where toJSON JobConfigurationLoad'{..} @@ -2645,12 +2688,13 @@ _jclAllowQuotedNewlines, ("sourceFormat" .=) <$> _jclSourceFormat, ("schema" .=) <$> _jclSchema, - Just ("quote" .= _jclQuote), + ("quote" .=) <$> _jclQuote, ("maxBadRecords" .=) <$> _jclMaxBadRecords, ("autodetect" .=) <$> _jclAutodetect, ("sourceUris" .=) <$> _jclSourceURIs, ("encoding" .=) <$> _jclEncoding, - ("fieldDelimiter" .=) <$> _jclFieldDelimiter]) + ("fieldDelimiter" .=) <$> _jclFieldDelimiter, + ("nullMarker" .=) <$> _jclNullMarker]) -- -- /See:/ 'dataSetReference' smart constructor. @@ -2881,7 +2925,7 @@ -- -- /See:/ 'bigtableColumn' smart constructor. data BigtableColumn = BigtableColumn' - { _bcQualifierEncoded :: !(Maybe Base64) + { _bcQualifierEncoded :: !(Maybe Bytes) , _bcFieldName :: !(Maybe Text) , _bcQualifierString :: !(Maybe Text) , _bcOnlyReadLatest :: !(Maybe Bool) @@ -2928,7 +2972,7 @@ bcQualifierEncoded = lens _bcQualifierEncoded (\ s a -> s{_bcQualifierEncoded = a}) - . mapping _Base64 + . mapping _Bytes -- | [Optional] If the qualifier is not a valid BigQuery field identifier -- i.e. does not match [a-zA-Z][a-zA-Z0-9_]*, a valid identifier must be @@ -4028,16 +4072,17 @@ = lens _jcqFlattenResults (\ s a -> s{_jcqFlattenResults = a}) --- | [Experimental] Standard SQL only. Whether to use positional (?) or named --- (\'myparam) query parameters in this query. +-- | [Experimental] Standard SQL only. Set to POSITIONAL to use positional +-- (?) query parameters or to NAMED to use named (\'myparam) query +-- parameters in this query. jcqParameterMode :: Lens' JobConfigurationQuery (Maybe Text) jcqParameterMode = lens _jcqParameterMode (\ s a -> s{_jcqParameterMode = a}) --- | [Experimental] Specifies whether to use BigQuery\'s legacy SQL dialect --- for this query. The default value is true. If set to false, the query --- will use BigQuery\'s standard SQL: +-- | Specifies whether to use BigQuery\'s legacy SQL dialect for this query. +-- The default value is true. If set to false, the query will use +-- BigQuery\'s standard SQL: -- https:\/\/cloud.google.com\/bigquery\/sql-reference\/ When useLegacySql -- is set to false, the values of allowLargeResults and flattenResults are -- ignored; query will be run as if allowLargeResults is true and @@ -4440,11 +4485,10 @@ vdQuery :: Lens' ViewDefinition (Maybe Text) vdQuery = lens _vdQuery (\ s a -> s{_vdQuery = a}) --- | [Experimental] Specifies whether to use BigQuery\'s legacy SQL for this --- view. The default value is true. If set to false, the view will use --- BigQuery\'s standard SQL: --- https:\/\/cloud.google.com\/bigquery\/sql-reference\/ Queries and views --- that reference this view must use the same flag value. +-- | Specifies whether to use BigQuery\'s legacy SQL for this view. The +-- default value is true. If set to false, the view will use BigQuery\'s +-- standard SQL: https:\/\/cloud.google.com\/bigquery\/sql-reference\/ +-- Queries and views that reference this view must use the same flag value. vdUseLegacySQL :: Lens' ViewDefinition (Maybe Bool) vdUseLegacySQL = lens _vdUseLegacySQL @@ -4527,6 +4571,7 @@ , _jBillingTier :: !(Maybe (Textual Int32)) , _jUndeclaredQueryParameters :: !(Maybe [QueryParameter]) , _jReferencedTables :: !(Maybe [TableReference]) + , _jStatementType :: !(Maybe Text) , _jNumDmlAffectedRows :: !(Maybe (Textual Int64)) , _jQueryPlan :: !(Maybe [ExplainQueryStage]) , _jCacheHit :: !(Maybe Bool) @@ -4547,6 +4592,8 @@ -- -- * 'jReferencedTables' -- +-- * 'jStatementType' +-- -- * 'jNumDmlAffectedRows' -- -- * 'jQueryPlan' @@ -4563,6 +4610,7 @@ , _jBillingTier = Nothing , _jUndeclaredQueryParameters = Nothing , _jReferencedTables = Nothing + , _jStatementType = Nothing , _jNumDmlAffectedRows = Nothing , _jQueryPlan = Nothing , _jCacheHit = Nothing @@ -4605,6 +4653,12 @@ . _Default . _Coerce +-- | [Output-only, Experimental] The type of query statement, if valid. +jStatementType :: Lens' JobStatistics2 (Maybe Text) +jStatementType + = lens _jStatementType + (\ s a -> s{_jStatementType = a}) + -- | [Output-only, Experimental] The number of rows affected by a DML -- statement. Present only for DML statements INSERT, UPDATE or DELETE. jNumDmlAffectedRows :: Lens' JobStatistics2 (Maybe Int64) @@ -4641,6 +4695,7 @@ <*> (o .:? "billingTier") <*> (o .:? "undeclaredQueryParameters" .!= mempty) <*> (o .:? "referencedTables" .!= mempty) + <*> (o .:? "statementType") <*> (o .:? "numDmlAffectedRows") <*> (o .:? "queryPlan" .!= mempty) <*> (o .:? "cacheHit") @@ -4656,6 +4711,7 @@ ("undeclaredQueryParameters" .=) <$> _jUndeclaredQueryParameters, ("referencedTables" .=) <$> _jReferencedTables, + ("statementType" .=) <$> _jStatementType, ("numDmlAffectedRows" .=) <$> _jNumDmlAffectedRows, ("queryPlan" .=) <$> _jQueryPlan, ("cacheHit" .=) <$> _jCacheHit, @@ -4723,7 +4779,46 @@ ("errorResult" .=) <$> _jsErrorResult, ("errors" .=) <$> _jsErrors]) +-- | [Experimental] The labels associated with this table. You can use these +-- to organize and group your tables. Label keys and values can be no +-- longer than 63 characters, can only contain letters, numeric characters, +-- underscores and dashes. International characters are allowed. Label +-- values are optional. Label keys must start with a letter and must be +-- unique within a dataset. Both keys and values are additionally +-- constrained to be \<= 128 bytes in size. -- +-- /See:/ 'tableLabels' smart constructor. +newtype TableLabels = TableLabels' + { _tlAddtional :: HashMap Text Text + } deriving (Eq,Show,Data,Typeable,Generic) + +-- | Creates a value of 'TableLabels' with the minimum fields required to make a request. +-- +-- Use one of the following lenses to modify other fields as desired: +-- +-- * 'tlAddtional' +tableLabels + :: HashMap Text Text -- ^ 'tlAddtional' + -> TableLabels +tableLabels pTlAddtional_ = + TableLabels' + { _tlAddtional = _Coerce # pTlAddtional_ + } + +tlAddtional :: Lens' TableLabels (HashMap Text Text) +tlAddtional + = lens _tlAddtional (\ s a -> s{_tlAddtional = a}) . + _Coerce + +instance FromJSON TableLabels where + parseJSON + = withObject "TableLabels" + (\ o -> TableLabels' <$> (parseJSONObject o)) + +instance ToJSON TableLabels where + toJSON = toJSON . _tlAddtional + +-- -- /See:/ 'dataSetAccessItem' smart constructor. data DataSetAccessItem = DataSetAccessItem' { _dsaiGroupByEmail :: !(Maybe Text) @@ -4954,6 +5049,7 @@ , _tabNumRows :: !(Maybe (Textual Word64)) , _tabView :: !(Maybe ViewDefinition) , _tabId :: !(Maybe Text) + , _tabLabels :: !(Maybe TableLabels) , _tabType :: !(Maybe Text) , _tabNumLongTermBytes :: !(Maybe (Textual Int64)) , _tabExpirationTime :: !(Maybe (Textual Int64)) @@ -4996,6 +5092,8 @@ -- -- * 'tabId' -- +-- * 'tabLabels' +-- -- * 'tabType' -- -- * 'tabNumLongTermBytes' @@ -5023,6 +5121,7 @@ , _tabNumRows = Nothing , _tabView = Nothing , _tabId = Nothing + , _tabLabels = Nothing , _tabType = Nothing , _tabNumLongTermBytes = Nothing , _tabExpirationTime = Nothing @@ -5126,6 +5225,17 @@ tabId :: Lens' Table (Maybe Text) tabId = lens _tabId (\ s a -> s{_tabId = a}) +-- | [Experimental] The labels associated with this table. You can use these +-- to organize and group your tables. Label keys and values can be no +-- longer than 63 characters, can only contain letters, numeric characters, +-- underscores and dashes. International characters are allowed. Label +-- values are optional. Label keys must start with a letter and must be +-- unique within a dataset. Both keys and values are additionally +-- constrained to be \<= 128 bytes in size. +tabLabels :: Lens' Table (Maybe TableLabels) +tabLabels + = lens _tabLabels (\ s a -> s{_tabLabels = a}) + -- | [Output-only] Describes the table type. The following values are -- supported: TABLE: A normal BigQuery table. VIEW: A virtual table defined -- by a SQL query. EXTERNAL: A table that references data stored in an @@ -5177,6 +5287,7 @@ <*> (o .:? "numRows") <*> (o .:? "view") <*> (o .:? "id") + <*> (o .:? "labels") <*> (o .:? "type") <*> (o .:? "numLongTermBytes") <*> (o .:? "expirationTime") @@ -5202,6 +5313,7 @@ ("timePartitioning" .=) <$> _tabTimePartitioning, ("numRows" .=) <$> _tabNumRows, ("view" .=) <$> _tabView, ("id" .=) <$> _tabId, + ("labels" .=) <$> _tabLabels, ("type" .=) <$> _tabType, ("numLongTermBytes" .=) <$> _tabNumLongTermBytes, ("expirationTime" .=) <$> _tabExpirationTime, @@ -5670,3 +5782,39 @@ instance ToJSON DataSetListDataSetsItemLabels where toJSON = toJSON . _dsldsilAddtional + +-- | [Experimental] The labels associated with this table. You can use these +-- to organize and group your tables. +-- +-- /See:/ 'tableListTablesItemLabels' smart constructor. +newtype TableListTablesItemLabels = TableListTablesItemLabels' + { _tltilAddtional :: HashMap Text Text + } deriving (Eq,Show,Data,Typeable,Generic) + +-- | Creates a value of 'TableListTablesItemLabels' with the minimum fields required to make a request. +-- +-- Use one of the following lenses to modify other fields as desired: +-- +-- * 'tltilAddtional' +tableListTablesItemLabels + :: HashMap Text Text -- ^ 'tltilAddtional' + -> TableListTablesItemLabels +tableListTablesItemLabels pTltilAddtional_ = + TableListTablesItemLabels' + { _tltilAddtional = _Coerce # pTltilAddtional_ + } + +tltilAddtional :: Lens' TableListTablesItemLabels (HashMap Text Text) +tltilAddtional + = lens _tltilAddtional + (\ s a -> s{_tltilAddtional = a}) + . _Coerce + +instance FromJSON TableListTablesItemLabels where + parseJSON + = withObject "TableListTablesItemLabels" + (\ o -> + TableListTablesItemLabels' <$> (parseJSONObject o)) + +instance ToJSON TableListTablesItemLabels where + toJSON = toJSON . _tltilAddtional diff --git a/gogol-bigquery.cabal b/gogol-bigquery.cabal --- a/gogol-bigquery.cabal +++ b/gogol-bigquery.cabal @@ -1,5 +1,5 @@ name: gogol-bigquery -version: 0.1.1 +version: 0.2.0 synopsis: Google BigQuery SDK. homepage: https://github.com/brendanhay/gogol bug-reports: https://github.com/brendanhay/gogol/issues @@ -62,5 +62,5 @@ , Network.Google.BigQuery.Types.Sum build-depends: - gogol-core == 0.1.1.* + gogol-core == 0.2.0.* , base >= 4.7 && < 5