@@ -44,7 +44,9 @@ import Network.Google.Prelude
4444-- NormalizeLatLng(-180.0, 10.0) assert (0.0, -170.0) ==
4545-- NormalizeLatLng(180.0, 10.0) assert (-90.0, 10.0) ==
4646-- NormalizeLatLng(270.0, 10.0) assert (90.0, 10.0) ==
47−-- NormalizeLatLng(-270.0, 10.0)
47+-- NormalizeLatLng(-270.0, 10.0) The code in
48+-- logs\/storage\/validator\/logs_validator_traits.cc treats this type as
49+-- if it were annotated as ST_LOCATION.
4850--
4951-- /See:/ 'latLng' smart constructor.
5052data LatLng = LatLng'
@@ -97,7 +99,7 @@ instance ToJSON LatLng where
9799--
98100-- /See:/ 'rollbackRequest' smart constructor.
99101newtype RollbackRequest = RollbackRequest'
100− { _rrTransaction :: Maybe Base64
102+ { _rrTransaction :: Maybe Bytes
101103 } deriving (Eq,Show,Data,Typeable,Generic)
102104
103105-- | Creates a value of 'RollbackRequest' with the minimum fields required to make a request.
@@ -118,7 +120,7 @@ rrTransaction :: Lens' RollbackRequest (Maybe ByteString)
118120rrTransaction
119121 = lens _rrTransaction
120122 (\ s a -> s{_rrTransaction = a})
121− . mapping _Base64
123+ . mapping _Bytes
122124
123125instance FromJSON RollbackRequest where
124126 parseJSON
@@ -193,12 +195,12 @@ instance ToJSON PartitionId where
193195-- /See:/ 'queryResultBatch' smart constructor.
194196data QueryResultBatch = QueryResultBatch'
195197 { _qrbSkippedResults :: !(Maybe (Textual Int32))
196− , _qrbSkippedCursor :: !(Maybe Base64)
198+ , _qrbSkippedCursor :: !(Maybe Bytes)
197199 , _qrbEntityResultType :: !(Maybe QueryResultBatchEntityResultType)
198200 , _qrbSnapshotVersion :: !(Maybe (Textual Int64))
199201 , _qrbEntityResults :: !(Maybe [EntityResult])
200202 , _qrbMoreResults :: !(Maybe QueryResultBatchMoreResults)
201− , _qrbEndCursor :: !(Maybe Base64)
203+ , _qrbEndCursor :: !(Maybe Bytes)
202204 } deriving (Eq,Show,Data,Typeable,Generic)
203205
204206-- | Creates a value of 'QueryResultBatch' with the minimum fields required to make a request.
@@ -244,7 +246,7 @@ qrbSkippedCursor :: Lens' QueryResultBatch (Maybe ByteString)
244246qrbSkippedCursor
245247 = lens _qrbSkippedCursor
246248 (\ s a -> s{_qrbSkippedCursor = a})
247− . mapping _Base64
249+ . mapping _Bytes
248250
249251-- | The result type for every entity in \`entity_results\`.
250252qrbEntityResultType :: Lens' QueryResultBatch (Maybe QueryResultBatchEntityResultType)
@@ -258,7 +260,8 @@ qrbEntityResultType
258260-- \`end_cursor\` (not the query\'s \`end_cursor\`). In a single
259261-- transaction, subsequent query result batches for the same query can have
260262-- a greater snapshot version number. Each batch\'s snapshot version is
261−-- valid for all preceding batches.
263+-- valid for all preceding batches. The value will be zero for eventually
264+-- consistent queries.
262265qrbSnapshotVersion :: Lens' QueryResultBatch (Maybe Int64)
263266qrbSnapshotVersion
264267 = lens _qrbSnapshotVersion
@@ -283,7 +286,7 @@ qrbMoreResults
283286qrbEndCursor :: Lens' QueryResultBatch (Maybe ByteString)
284287qrbEndCursor
285288 = lens _qrbEndCursor (\ s a -> s{_qrbEndCursor = a})
286− . mapping _Base64
289+ . mapping _Bytes
287290
288291instance FromJSON QueryResultBatch where
289292 parseJSON
@@ -525,7 +528,7 @@ instance ToJSON CompositeFilter where
525528--
526529-- /See:/ 'beginTransactionResponse' smart constructor.
527530newtype BeginTransactionResponse = BeginTransactionResponse'
528− { _btrTransaction :: Maybe Base64
531+ { _btrTransaction :: Maybe Bytes
529532 } deriving (Eq,Show,Data,Typeable,Generic)
530533
531534-- | Creates a value of 'BeginTransactionResponse' with the minimum fields required to make a request.
@@ -545,7 +548,7 @@ btrTransaction :: Lens' BeginTransactionResponse (Maybe ByteString)
545548btrTransaction
546549 = lens _btrTransaction
547550 (\ s a -> s{_btrTransaction = a})
548− . mapping _Base64
551+ . mapping _Bytes
549552
550553instance FromJSON BeginTransactionResponse where
551554 parseJSON
@@ -807,7 +810,7 @@ data Value = Value'
807810 , _vMeaning :: !(Maybe (Textual Int32))
808811 , _vArrayValue :: !(Maybe ArrayValue)
809812 , _vNullValue :: !(Maybe ValueNullValue)
810− , _vBlobValue :: !(Maybe Base64)
813+ , _vBlobValue :: !(Maybe Bytes)
811814 } deriving (Eq,Show,Data,Typeable,Generic)
812815
813816-- | Creates a value of 'Value' with the minimum fields required to make a request.
@@ -941,7 +944,7 @@ vNullValue
941944vBlobValue :: Lens' Value (Maybe ByteString)
942945vBlobValue
943946 = lens _vBlobValue (\ s a -> s{_vBlobValue = a}) .
944− mapping _Base64
947+ mapping _Bytes
945948
946949instance FromJSON Value where
947950 parseJSON
@@ -1306,11 +1309,11 @@ instance ToJSON PropertyFilter where
13061309--
13071310-- /See:/ 'query' smart constructor.
13081311data Query = Query'
1309− { _qStartCursor :: !(Maybe Base64)
1312+ { _qStartCursor :: !(Maybe Bytes)
13101313 , _qOffSet :: !(Maybe (Textual Int32))
13111314 , _qKind :: !(Maybe [KindExpression])
13121315 , _qDistinctOn :: !(Maybe [PropertyReference])
1313− , _qEndCursor :: !(Maybe Base64)
1316+ , _qEndCursor :: !(Maybe Bytes)
13141317 , _qLimit :: !(Maybe (Textual Int32))
13151318 , _qProjection :: !(Maybe [Projection])
13161319 , _qFilter :: !(Maybe Filter)
@@ -1359,7 +1362,7 @@ query =
13591362qStartCursor :: Lens' Query (Maybe ByteString)
13601363qStartCursor
13611364 = lens _qStartCursor (\ s a -> s{_qStartCursor = a})
1362− . mapping _Base64
1365+ . mapping _Bytes
13631366
13641367-- | The number of results to skip. Applies before limit, but after all other
13651368-- constraints. Optional. Must be >= 0 if specified.
@@ -1390,7 +1393,7 @@ qDistinctOn
13901393qEndCursor :: Lens' Query (Maybe ByteString)
13911394qEndCursor
13921395 = lens _qEndCursor (\ s a -> s{_qEndCursor = a}) .
1393− mapping _Base64
1396+ mapping _Bytes
13941397
13951398-- | The maximum number of results to return. Applies after all other
13961399-- constraints. Optional. Unspecified is interpreted as no limit. Must be
@@ -1485,7 +1488,7 @@ instance ToJSON ArrayValue where
14851488--
14861489-- /See:/ 'entityResult' smart constructor.
14871490data EntityResult = EntityResult'
1488− { _erCursor :: !(Maybe Base64)
1491+ { _erCursor :: !(Maybe Bytes)
14891492 , _erVersion :: !(Maybe (Textual Int64))
14901493 , _erEntity :: !(Maybe Entity)
14911494 } deriving (Eq,Show,Data,Typeable,Generic)
@@ -1513,7 +1516,7 @@ entityResult =
15131516erCursor :: Lens' EntityResult (Maybe ByteString)
15141517erCursor
15151518 = lens _erCursor (\ s a -> s{_erCursor = a}) .
1516− mapping _Base64
1519+ mapping _Bytes
15171520
15181521-- | The version of the entity, a strictly positive number that monotonically
15191522-- increases with changes to the entity. This field is set for \`FULL\`
@@ -1637,7 +1640,7 @@ instance ToJSON KindExpression where
16371640-- /See:/ 'readOptions' smart constructor.
16381641data ReadOptions = ReadOptions'
16391642 { _roReadConsistency :: !(Maybe ReadOptionsReadConsistency)
1640− , _roTransaction :: !(Maybe Base64)
1643+ , _roTransaction :: !(Maybe Bytes)
16411644 } deriving (Eq,Show,Data,Typeable,Generic)
16421645
16431646-- | Creates a value of 'ReadOptions' with the minimum fields required to make a request.
@@ -1668,7 +1671,7 @@ roTransaction :: Lens' ReadOptions (Maybe ByteString)
16681671roTransaction
16691672 = lens _roTransaction
16701673 (\ s a -> s{_roTransaction = a})
1671− . mapping _Base64
1674+ . mapping _Bytes
16721675
16731676instance FromJSON ReadOptions where
16741677 parseJSON
@@ -1794,7 +1797,7 @@ instance ToJSON Filter where
17941797data CommitRequest = CommitRequest'
17951798 { _crMutations :: !(Maybe [Mutation])
17961799 , _crMode :: !(Maybe CommitRequestMode)
1797− , _crTransaction :: !(Maybe Base64)
1800+ , _crTransaction :: !(Maybe Bytes)
17981801 } deriving (Eq,Show,Data,Typeable,Generic)
17991802
18001803-- | Creates a value of 'CommitRequest' with the minimum fields required to make a request.
@@ -1839,7 +1842,7 @@ crTransaction :: Lens' CommitRequest (Maybe ByteString)
18391842crTransaction
18401843 = lens _crTransaction
18411844 (\ s a -> s{_crTransaction = a})
1842− . mapping _Base64
1845+ . mapping _Bytes
18431846
18441847instance FromJSON CommitRequest where
18451848 parseJSON
@@ -2093,7 +2096,7 @@ instance ToJSON PropertyOrder where
20932096--
20942097-- /See:/ 'gqlQueryParameter' smart constructor.
20952098data GqlQueryParameter = GqlQueryParameter'
2096− { _gqpCursor :: !(Maybe Base64)
2099+ { _gqpCursor :: !(Maybe Bytes)
20972100 , _gqpValue :: !(Maybe Value)
20982101 } deriving (Eq,Show,Data,Typeable,Generic)
20992102
@@ -2116,7 +2119,7 @@ gqlQueryParameter =
21162119gqpCursor :: Lens' GqlQueryParameter (Maybe ByteString)
21172120gqpCursor
21182121 = lens _gqpCursor (\ s a -> s{_gqpCursor = a}) .
2119− mapping _Base64
2122+ mapping _Bytes
21202123
21212124-- | A value parameter.
21222125gqpValue :: Lens' GqlQueryParameter (Maybe Value)