on develop help sign in
Coercing collection type values
commit318e79a63a5aea581aed7b6aa9a284f5c516e321 authorBrendan Hay <brendan.g.hay@gmail.com> dateFri 23 Oct 2015, 21:11 (11 years ago) parentf4a7737
33 files changed+292−165
gen/src/Gen/Syntax.hs+1−2 gogol-admin-directory/gen/Network/Google/Directory/Types/Product.hs+7−4 gogol-admin-reports/gen/Network/Google/Reports/Types/Product.hs+5−3 gogol-analytics/gen/Network/Google/Analytics/Types/Product.hs+9−5 gogol-android-publisher/gen/Network/Google/AndroidPublisher/Types/Product.hs+4−2 gogol-appengine/gen/Network/Google/AppEngine/Types/Product.hs+21−12 gogol-apps-calendar/gen/Network/Google/AppsCalendar/Types/Product.hs+19−11 gogol-bigquery/gen/Network/Google/BigQuery/Types/Product.hs+5−3 gogol-civicinfo/gen/Network/Google/CivicInfo/Types/Product.hs+4−2 gogol-cloudtrace/gen/Network/Google/CloudTrace/Types/Product.hs+2−1 gogol-compute/gen/Network/Google/Compute/Types/Product.hs+29−15 gogol-customsearch/gen/Network/Google/CustomSearch/Types/Product.hs+8−5 gogol-dataflow/gen/Network/Google/Dataflow/Types/Product.hs+53−29 gogol-datastore/gen/Network/Google/Datastore/Types/Product.hs+3−2 gogol-debugger/gen/Network/Google/Debugger/Types/Product.hs+3−2 gogol-discovery/gen/Network/Google/Discovery/Types/Product.hs+18−9 gogol-doubleclick-search/gen/Network/Google/DoubleClickSearch/Types/Product.hs+3−2 gogol-drive/gen/Network/Google/Drive/Types/Product.hs+9−5 gogol-fonts/gen/Network/Google/Fonts/Types/Product.hs+3−2 gogol-genomics/gen/Network/Google/Genomics/Types/Product.hs+26−15 gogol-identity-toolkit/gen/Network/Google/IdentityToolkit/Types/Product.hs+2−1 gogol-maps-engine/gen/Network/Google/MapsEngine/Types/Product.hs+2−1 gogol-monitoring/gen/Network/Google/Monitoring/Types/Product.hs+4−2 gogol-pagespeed/gen/Network/Google/PageSpeed/Types/Product.hs+4−2 gogol-partners/gen/Network/Google/Partners/Types/Product.hs+2−1 gogol-prediction/gen/Network/Google/Prediction/Types/Product.hs+10−5 gogol-proximitybeacon/gen/Network/Google/ProximityBeacon/Types/Product.hs+3−2 gogol-pubsub/gen/Network/Google/PubSub/Types/Product.hs+4−2 gogol-resourcemanager/gen/Network/Google/ResourceManager/Types/Product.hs+3−2 gogol-resourceviews/gen/Network/Google/ResourceViews/Types/Product.hs+2−1 gogol-storage-transfer/gen/Network/Google/StorageTransfer/Types/Product.hs+8−5 gogol-storage/gen/Network/Google/Storage/Types/Product.hs+6−4 gogol-youtube/gen/Network/Google/YouTube/Types/Product.hs+10−6
gen/src/Gen/Syntax.hs+1−2
@@ -548,7 +548,6 @@ externalLit = \case
548548 UInt64 -> TyCon "Word64"
549549 Int32 -> TyCon "Int32"
550550 Int64 -> TyCon "Int64"
551−
552551 Alt t -> TyCon (unqual (Text.unpack t))
553552 RqBody -> TyCon "RequestBody"
554553 RsBody -> TyCon "Stream"
@@ -569,7 +568,6 @@ internalLit = \case
569568 UInt64 -> TyApp (TyCon "JSONText") (TyCon "Word64")
570569 Int32 -> TyApp (TyCon "JSONText") (TyCon "Int32")
571570 Int64 -> TyApp (TyCon "JSONText") (TyCon "Int64")
572−
573571 Alt t -> TyCon (unqual (Text.unpack t))
574572 RqBody -> TyCon "RequestBody"
575573 RsBody -> TyCon "Stream"
@@ -589,6 +587,7 @@ mapping t e = infixE e "." (go t)
589587iso :: TType -> Maybe Exp
590588iso = \case
591589 TList {} -> Just (var "_Coerce")
590+ TMap {} -> Just (var "_Coerce")
592591 TLit Nat -> Just (var "_Nat")
593592 TLit Time -> Just (var "_Time")
594593 TLit Date -> Just (var "_Date")
gogol-admin-directory/gen/Network/Google/Directory/Types/Product.hs+7−4
@@ -2065,12 +2065,13 @@ userCustomSchemas
20652065 -> UserCustomSchemas
20662066userCustomSchemas pUcsAddtional_ =
20672067 UserCustomSchemas
2068− { _ucsAddtional = pUcsAddtional_
2068+ { _ucsAddtional = _Coerce # pUcsAddtional_
20692069 }
20702070
20712071ucsAddtional :: Lens' UserCustomSchemas (HashMap Text UserCustomProperties)
20722072ucsAddtional
20732073 = lens _ucsAddtional (\ s a -> s{_ucsAddtional = a})
2074+ . _Coerce
20742075
20752076instance FromJSON UserCustomSchemas where
20762077 parseJSON
@@ -3925,13 +3926,14 @@ channelParams
39253926 -> ChannelParams
39263927channelParams pCpAddtional_ =
39273928 ChannelParams
3928− { _cpAddtional = pCpAddtional_
3929+ { _cpAddtional = _Coerce # pCpAddtional_
39293930 }
39303931
39313932-- | Declares a new parameter by name.
39323933cpAddtional :: Lens' ChannelParams (HashMap Text Text)
39333934cpAddtional
3934− = lens _cpAddtional (\ s a -> s{_cpAddtional = a})
3935+ = lens _cpAddtional (\ s a -> s{_cpAddtional = a}) .
3936+ _Coerce
39353937
39363938instance FromJSON ChannelParams where
39373939 parseJSON
@@ -4955,12 +4957,13 @@ userCustomProperties
49554957 -> UserCustomProperties
49564958userCustomProperties pUcpAddtional_ =
49574959 UserCustomProperties
4958− { _ucpAddtional = pUcpAddtional_
4960+ { _ucpAddtional = _Coerce # pUcpAddtional_
49594961 }
49604962
49614963ucpAddtional :: Lens' UserCustomProperties (HashMap Text JSONValue)
49624964ucpAddtional
49634965 = lens _ucpAddtional (\ s a -> s{_ucpAddtional = a})
4966+ . _Coerce
49644967
49654968instance FromJSON UserCustomProperties where
49664969 parseJSON
gogol-admin-reports/gen/Network/Google/Reports/Types/Product.hs+5−3
@@ -289,13 +289,14 @@ usageReportParametersItemMsgValueItem
289289 -> UsageReportParametersItemMsgValueItem
290290usageReportParametersItemMsgValueItem pUrpimviAddtional_ =
291291 UsageReportParametersItemMsgValueItem
292− { _urpimviAddtional = pUrpimviAddtional_
292+ { _urpimviAddtional = _Coerce # pUrpimviAddtional_
293293 }
294294
295295urpimviAddtional :: Lens' UsageReportParametersItemMsgValueItem (HashMap Text JSONValue)
296296urpimviAddtional
297297 = lens _urpimviAddtional
298298 (\ s a -> s{_urpimviAddtional = a})
299+ . _Coerce
299300
300301instance FromJSON
301302 UsageReportParametersItemMsgValueItem where
@@ -770,13 +771,14 @@ channelParams
770771 -> ChannelParams
771772channelParams pCpAddtional_ =
772773 ChannelParams
773− { _cpAddtional = pCpAddtional_
774+ { _cpAddtional = _Coerce # pCpAddtional_
774775 }
775776
776777-- | Declares a new parameter by name.
777778cpAddtional :: Lens' ChannelParams (HashMap Text Text)
778779cpAddtional
779− = lens _cpAddtional (\ s a -> s{_cpAddtional = a})
780+ = lens _cpAddtional (\ s a -> s{_cpAddtional = a}) .
781+ _Coerce
780782
781783instance FromJSON ChannelParams where
782784 parseJSON
gogol-analytics/gen/Network/Google/Analytics/Types/Product.hs+9−5
@@ -711,7 +711,7 @@ gaDataTotalsForAllResults
711711 -> GaDataTotalsForAllResults
712712gaDataTotalsForAllResults pGdtfarAddtional_ =
713713 GaDataTotalsForAllResults
714− { _gdtfarAddtional = pGdtfarAddtional_
714+ { _gdtfarAddtional = _Coerce # pGdtfarAddtional_
715715 }
716716
717717-- | Key-value pair for the total value of a metric. Key is the metric name
@@ -720,6 +720,7 @@ gdtfarAddtional :: Lens' GaDataTotalsForAllResults (HashMap Text Text)
720720gdtfarAddtional
721721 = lens _gdtfarAddtional
722722 (\ s a -> s{_gdtfarAddtional = a})
723+ . _Coerce
723724
724725instance FromJSON GaDataTotalsForAllResults where
725726 parseJSON
@@ -3784,7 +3785,7 @@ realtimeDataTotalsForAllResults
37843785 -> RealtimeDataTotalsForAllResults
37853786realtimeDataTotalsForAllResults pRdtfarAddtional_ =
37863787 RealtimeDataTotalsForAllResults
3787− { _rdtfarAddtional = pRdtfarAddtional_
3788+ { _rdtfarAddtional = _Coerce # pRdtfarAddtional_
37883789 }
37893790
37903791-- | Key-value pair for the total value of a metric. Key is the metric name
@@ -3793,6 +3794,7 @@ rdtfarAddtional :: Lens' RealtimeDataTotalsForAllResults (HashMap Text Text)
37933794rdtfarAddtional
37943795 = lens _rdtfarAddtional
37953796 (\ s a -> s{_rdtfarAddtional = a})
3797+ . _Coerce
37963798
37973799instance FromJSON RealtimeDataTotalsForAllResults
37983800 where
@@ -9269,7 +9271,7 @@ mcfDataTotalsForAllResults
92699271 -> McfDataTotalsForAllResults
92709272mcfDataTotalsForAllResults pMdtfarAddtional_ =
92719273 McfDataTotalsForAllResults
9272− { _mdtfarAddtional = pMdtfarAddtional_
9274+ { _mdtfarAddtional = _Coerce # pMdtfarAddtional_
92739275 }
92749276
92759277-- | Key-value pair for the total value of a metric. Key is the metric name
@@ -9278,6 +9280,7 @@ mdtfarAddtional :: Lens' McfDataTotalsForAllResults (HashMap Text Text)
92789280mdtfarAddtional
92799281 = lens _mdtfarAddtional
92809282 (\ s a -> s{_mdtfarAddtional = a})
9283+ . _Coerce
92819284
92829285instance FromJSON McfDataTotalsForAllResults where
92839286 parseJSON
@@ -9512,13 +9515,14 @@ columnAttributes
95129515 -> ColumnAttributes
95139516columnAttributes pCaAddtional_ =
95149517 ColumnAttributes
9515− { _caAddtional = pCaAddtional_
9518+ { _caAddtional = _Coerce # pCaAddtional_
95169519 }
95179520
95189521-- | The name of the attribute.
95199522caAddtional :: Lens' ColumnAttributes (HashMap Text Text)
95209523caAddtional
9521− = lens _caAddtional (\ s a -> s{_caAddtional = a})
9524+ = lens _caAddtional (\ s a -> s{_caAddtional = a}) .
9525+ _Coerce
95229526
95239527instance FromJSON ColumnAttributes where
95249528 parseJSON
gogol-android-publisher/gen/Network/Google/AndroidPublisher/Types/Product.hs+4−2
@@ -37,7 +37,7 @@ inAppProductListings
3737 -> InAppProductListings
3838inAppProductListings pIaplAddtional_ =
3939 InAppProductListings
40− { _iaplAddtional = pIaplAddtional_
40+ { _iaplAddtional = _Coerce # pIaplAddtional_
4141 }
4242
4343-- | The language of the localized data, as defined by BCP 47. i.e.:
@@ -46,6 +46,7 @@ iaplAddtional :: Lens' InAppProductListings (HashMap Text InAppProductListing)
4646iaplAddtional
4747 = lens _iaplAddtional
4848 (\ s a -> s{_iaplAddtional = a})
49+ . _Coerce
4950
5051instance FromJSON InAppProductListings where
5152 parseJSON
@@ -1301,7 +1302,7 @@ inAppProductPrices
13011302 -> InAppProductPrices
13021303inAppProductPrices pIAppAddtional_ =
13031304 InAppProductPrices
1304− { _iAppAddtional = pIAppAddtional_
1305+ { _iAppAddtional = _Coerce # pIAppAddtional_
13051306 }
13061307
13071308-- | Region code, as defined by ISO 3166-2.
@@ -1309,6 +1310,7 @@ iAppAddtional :: Lens' InAppProductPrices (HashMap Text Price)
13091310iAppAddtional
13101311 = lens _iAppAddtional
13111312 (\ s a -> s{_iAppAddtional = a})
1313+ . _Coerce
13121314
13131315instance FromJSON InAppProductPrices where
13141316 parseJSON
gogol-appengine/gen/Network/Google/AppEngine/Types/Product.hs+21−12
@@ -140,13 +140,14 @@ operationSchema
140140 -> OperationSchema
141141operationSchema pOsAddtional_ =
142142 OperationSchema
143− { _osAddtional = pOsAddtional_
143+ { _osAddtional = _Coerce # pOsAddtional_
144144 }
145145
146146-- | Properties of the object. Contains field \'ype with type URL.
147147osAddtional :: Lens' OperationSchema (HashMap Text JSONValue)
148148osAddtional
149− = lens _osAddtional (\ s a -> s{_osAddtional = a})
149+ = lens _osAddtional (\ s a -> s{_osAddtional = a}) .
150+ _Coerce
150151
151152instance FromJSON OperationSchema where
152153 parseJSON
@@ -701,12 +702,13 @@ versionEnvVariables
701702 -> VersionEnvVariables
702703versionEnvVariables pVevAddtional_ =
703704 VersionEnvVariables
704− { _vevAddtional = pVevAddtional_
705+ { _vevAddtional = _Coerce # pVevAddtional_
705706 }
706707
707708vevAddtional :: Lens' VersionEnvVariables (HashMap Text Text)
708709vevAddtional
709710 = lens _vevAddtional (\ s a -> s{_vevAddtional = a})
711+ . _Coerce
710712
711713instance FromJSON VersionEnvVariables where
712714 parseJSON
@@ -825,12 +827,13 @@ versionBetaSettings
825827 -> VersionBetaSettings
826828versionBetaSettings pVbsAddtional_ =
827829 VersionBetaSettings
828− { _vbsAddtional = pVbsAddtional_
830+ { _vbsAddtional = _Coerce # pVbsAddtional_
829831 }
830832
831833vbsAddtional :: Lens' VersionBetaSettings (HashMap Text Text)
832834vbsAddtional
833835 = lens _vbsAddtional (\ s a -> s{_vbsAddtional = a})
836+ . _Coerce
834837
835838instance FromJSON VersionBetaSettings where
836839 parseJSON
@@ -1011,13 +1014,14 @@ staticDirectoryHandlerHTTPHeaders
10111014 -> StaticDirectoryHandlerHTTPHeaders
10121015staticDirectoryHandlerHTTPHeaders pSdhhttphAddtional_ =
10131016 StaticDirectoryHandlerHTTPHeaders
1014− { _sdhhttphAddtional = pSdhhttphAddtional_
1017+ { _sdhhttphAddtional = _Coerce # pSdhhttphAddtional_
10151018 }
10161019
10171020sdhhttphAddtional :: Lens' StaticDirectoryHandlerHTTPHeaders (HashMap Text Text)
10181021sdhhttphAddtional
10191022 = lens _sdhhttphAddtional
10201023 (\ s a -> s{_sdhhttphAddtional = a})
1024+ . _Coerce
10211025
10221026instance FromJSON StaticDirectoryHandlerHTTPHeaders
10231027 where
@@ -1396,13 +1400,14 @@ statusDetailsItem
13961400 -> StatusDetailsItem
13971401statusDetailsItem pSdiAddtional_ =
13981402 StatusDetailsItem
1399− { _sdiAddtional = pSdiAddtional_
1403+ { _sdiAddtional = _Coerce # pSdiAddtional_
14001404 }
14011405
14021406-- | Properties of the object. Contains field \'ype with type URL.
14031407sdiAddtional :: Lens' StatusDetailsItem (HashMap Text JSONValue)
14041408sdiAddtional
14051409 = lens _sdiAddtional (\ s a -> s{_sdiAddtional = a})
1410+ . _Coerce
14061411
14071412instance FromJSON StatusDetailsItem where
14081413 parseJSON
@@ -1493,13 +1498,14 @@ staticFilesHandlerHTTPHeaders
14931498 -> StaticFilesHandlerHTTPHeaders
14941499staticFilesHandlerHTTPHeaders pSfhhttphAddtional_ =
14951500 StaticFilesHandlerHTTPHeaders
1496− { _sfhhttphAddtional = pSfhhttphAddtional_
1501+ { _sfhhttphAddtional = _Coerce # pSfhhttphAddtional_
14971502 }
14981503
14991504sfhhttphAddtional :: Lens' StaticFilesHandlerHTTPHeaders (HashMap Text Text)
15001505sfhhttphAddtional
15011506 = lens _sfhhttphAddtional
15021507 (\ s a -> s{_sfhhttphAddtional = a})
1508+ . _Coerce
15031509
15041510instance FromJSON StaticFilesHandlerHTTPHeaders where
15051511 parseJSON
@@ -1590,12 +1596,13 @@ deploymentFiles
15901596 -> DeploymentFiles
15911597deploymentFiles pDfAddtional_ =
15921598 DeploymentFiles
1593− { _dfAddtional = pDfAddtional_
1599+ { _dfAddtional = _Coerce # pDfAddtional_
15941600 }
15951601
15961602dfAddtional :: Lens' DeploymentFiles (HashMap Text FileInfo)
15971603dfAddtional
1598− = lens _dfAddtional (\ s a -> s{_dfAddtional = a})
1604+ = lens _dfAddtional (\ s a -> s{_dfAddtional = a}) .
1605+ _Coerce
15991606
16001607instance FromJSON DeploymentFiles where
16011608 parseJSON
@@ -1681,12 +1688,13 @@ trafficSplitAllocations
16811688 -> TrafficSplitAllocations
16821689trafficSplitAllocations pTsaAddtional_ =
16831690 TrafficSplitAllocations
1684− { _tsaAddtional = pTsaAddtional_
1691+ { _tsaAddtional = _Coerce # pTsaAddtional_
16851692 }
16861693
16871694tsaAddtional :: Lens' TrafficSplitAllocations (HashMap Text Double)
16881695tsaAddtional
16891696 = lens _tsaAddtional (\ s a -> s{_tsaAddtional = a})
1697+ . _Coerce
16901698
16911699instance FromJSON TrafficSplitAllocations where
16921700 parseJSON
@@ -2565,13 +2573,14 @@ operationResponse
25652573 -> OperationResponse
25662574operationResponse pOrAddtional_ =
25672575 OperationResponse
2568− { _orAddtional = pOrAddtional_
2576+ { _orAddtional = _Coerce # pOrAddtional_
25692577 }
25702578
25712579-- | Properties of the object. Contains field \'ype with type URL.
25722580orAddtional :: Lens' OperationResponse (HashMap Text JSONValue)
25732581orAddtional
2574− = lens _orAddtional (\ s a -> s{_orAddtional = a})
2582+ = lens _orAddtional (\ s a -> s{_orAddtional = a}) .
2583+ _Coerce
25752584
25762585instance FromJSON OperationResponse where
25772586 parseJSON
gogol-apps-calendar/gen/Network/Google/AppsCalendar/Types/Product.hs+19−11
@@ -887,13 +887,14 @@ colorsEvent
887887 -> ColorsEvent
888888colorsEvent pCeAddtional_ =
889889 ColorsEvent
890− { _ceAddtional = pCeAddtional_
890+ { _ceAddtional = _Coerce # pCeAddtional_
891891 }
892892
893893-- | An event color definition.
894894ceAddtional :: Lens' ColorsEvent (HashMap Text ColorDefinition)
895895ceAddtional
896− = lens _ceAddtional (\ s a -> s{_ceAddtional = a})
896+ = lens _ceAddtional (\ s a -> s{_ceAddtional = a}) .
897+ _Coerce
897898
898899instance FromJSON ColorsEvent where
899900 parseJSON
@@ -1571,7 +1572,7 @@ freeBusyResponseGroups
15711572 -> FreeBusyResponseGroups
15721573freeBusyResponseGroups pFbrgAddtional_ =
15731574 FreeBusyResponseGroups
1574− { _fbrgAddtional = pFbrgAddtional_
1575+ { _fbrgAddtional = _Coerce # pFbrgAddtional_
15751576 }
15761577
15771578-- | List of calendars that are members of this group.
@@ -1579,6 +1580,7 @@ fbrgAddtional :: Lens' FreeBusyResponseGroups (HashMap Text FreeBusyGroup)
15791580fbrgAddtional
15801581 = lens _fbrgAddtional
15811582 (\ s a -> s{_fbrgAddtional = a})
1583+ . _Coerce
15821584
15831585instance FromJSON FreeBusyResponseGroups where
15841586 parseJSON
@@ -1661,13 +1663,14 @@ colorsCalendar
16611663 -> ColorsCalendar
16621664colorsCalendar pCcAddtional_ =
16631665 ColorsCalendar
1664− { _ccAddtional = pCcAddtional_
1666+ { _ccAddtional = _Coerce # pCcAddtional_
16651667 }
16661668
16671669-- | A calendar color defintion.
16681670ccAddtional :: Lens' ColorsCalendar (HashMap Text ColorDefinition)
16691671ccAddtional
1670− = lens _ccAddtional (\ s a -> s{_ccAddtional = a})
1672+ = lens _ccAddtional (\ s a -> s{_ccAddtional = a}) .
1673+ _Coerce
16711674
16721675instance FromJSON ColorsCalendar where
16731676 parseJSON
@@ -1749,7 +1752,7 @@ eventExtendedPropertiesPrivate
17491752 -> EventExtendedPropertiesPrivate
17501753eventExtendedPropertiesPrivate pEeppAddtional_ =
17511754 EventExtendedPropertiesPrivate
1752− { _eeppAddtional = pEeppAddtional_
1755+ { _eeppAddtional = _Coerce # pEeppAddtional_
17531756 }
17541757
17551758-- | The name of the private property and the corresponding value.
@@ -1757,6 +1760,7 @@ eeppAddtional :: Lens' EventExtendedPropertiesPrivate (HashMap Text Text)
17571760eeppAddtional
17581761 = lens _eeppAddtional
17591762 (\ s a -> s{_eeppAddtional = a})
1763+ . _Coerce
17601764
17611765instance FromJSON EventExtendedPropertiesPrivate
17621766 where
@@ -1786,13 +1790,14 @@ channelParams
17861790 -> ChannelParams
17871791channelParams pCpAddtional_ =
17881792 ChannelParams
1789− { _cpAddtional = pCpAddtional_
1793+ { _cpAddtional = _Coerce # pCpAddtional_
17901794 }
17911795
17921796-- | Declares a new parameter by name.
17931797cpAddtional :: Lens' ChannelParams (HashMap Text Text)
17941798cpAddtional
1795− = lens _cpAddtional (\ s a -> s{_cpAddtional = a})
1799+ = lens _cpAddtional (\ s a -> s{_cpAddtional = a}) .
1800+ _Coerce
17961801
17971802instance FromJSON ChannelParams where
17981803 parseJSON
@@ -2745,13 +2750,14 @@ eventGadgetPreferences
27452750 -> EventGadgetPreferences
27462751eventGadgetPreferences pEgpAddtional_ =
27472752 EventGadgetPreferences
2748− { _egpAddtional = pEgpAddtional_
2753+ { _egpAddtional = _Coerce # pEgpAddtional_
27492754 }
27502755
27512756-- | The preference name and corresponding value.
27522757egpAddtional :: Lens' EventGadgetPreferences (HashMap Text Text)
27532758egpAddtional
27542759 = lens _egpAddtional (\ s a -> s{_egpAddtional = a})
2760+ . _Coerce
27552761
27562762instance FromJSON EventGadgetPreferences where
27572763 parseJSON
@@ -2962,7 +2968,7 @@ eventExtendedPropertiesShared
29622968 -> EventExtendedPropertiesShared
29632969eventExtendedPropertiesShared pEepsAddtional_ =
29642970 EventExtendedPropertiesShared
2965− { _eepsAddtional = pEepsAddtional_
2971+ { _eepsAddtional = _Coerce # pEepsAddtional_
29662972 }
29672973
29682974-- | The name of the shared property and the corresponding value.
@@ -2970,6 +2976,7 @@ eepsAddtional :: Lens' EventExtendedPropertiesShared (HashMap Text Text)
29702976eepsAddtional
29712977 = lens _eepsAddtional
29722978 (\ s a -> s{_eepsAddtional = a})
2979+ . _Coerce
29732980
29742981instance FromJSON EventExtendedPropertiesShared where
29752982 parseJSON
@@ -2998,7 +3005,7 @@ freeBusyResponseCalendars
29983005 -> FreeBusyResponseCalendars
29993006freeBusyResponseCalendars pFbrcAddtional_ =
30003007 FreeBusyResponseCalendars
3001− { _fbrcAddtional = pFbrcAddtional_
3008+ { _fbrcAddtional = _Coerce # pFbrcAddtional_
30023009 }
30033010
30043011-- | Free\/busy expansions for a single calendar.
@@ -3006,6 +3013,7 @@ fbrcAddtional :: Lens' FreeBusyResponseCalendars (HashMap Text FreeBusyCalendar)
30063013fbrcAddtional
30073014 = lens _fbrcAddtional
30083015 (\ s a -> s{_fbrcAddtional = a})
3016+ . _Coerce
30093017
30103018instance FromJSON FreeBusyResponseCalendars where
30113019 parseJSON
gogol-bigquery/gen/Network/Google/BigQuery/Types/Product.hs+5−3
@@ -2869,12 +2869,13 @@ jsonObject
28692869 -> JSONObject
28702870jsonObject pJoAddtional_ =
28712871 JSONObject
2872− { _joAddtional = pJoAddtional_
2872+ { _joAddtional = _Coerce # pJoAddtional_
28732873 }
28742874
28752875joAddtional :: Lens' JSONObject (HashMap Text JSONValue)
28762876joAddtional
2877− = lens _joAddtional (\ s a -> s{_joAddtional = a})
2877+ = lens _joAddtional (\ s a -> s{_joAddtional = a}) .
2878+ _Coerce
28782879
28792880instance FromJSON JSONObject where
28802881 parseJSON
@@ -3218,13 +3219,14 @@ jobConfigurationQueryTableDefinitions
32183219 -> JobConfigurationQueryTableDefinitions
32193220jobConfigurationQueryTableDefinitions pJcqtdAddtional_ =
32203221 JobConfigurationQueryTableDefinitions
3221− { _jcqtdAddtional = pJcqtdAddtional_
3222+ { _jcqtdAddtional = _Coerce # pJcqtdAddtional_
32223223 }
32233224
32243225jcqtdAddtional :: Lens' JobConfigurationQueryTableDefinitions (HashMap Text ExternalDataConfiguration)
32253226jcqtdAddtional
32263227 = lens _jcqtdAddtional
32273228 (\ s a -> s{_jcqtdAddtional = a})
3229+ . _Coerce
32283230
32293231instance FromJSON
32303232 JobConfigurationQueryTableDefinitions where
gogol-civicinfo/gen/Network/Google/CivicInfo/Types/Product.hs+4−2
@@ -37,7 +37,7 @@ representativeInfoResponseDivisions
3737 -> RepresentativeInfoResponseDivisions
3838representativeInfoResponseDivisions pRirdAddtional_ =
3939 RepresentativeInfoResponseDivisions
40− { _rirdAddtional = pRirdAddtional_
40+ { _rirdAddtional = _Coerce # pRirdAddtional_
4141 }
4242
4343-- | The unique Open Civic Data identifier for this division.
@@ -45,6 +45,7 @@ rirdAddtional :: Lens' RepresentativeInfoResponseDivisions (HashMap Text Geograp
4545rirdAddtional
4646 = lens _rirdAddtional
4747 (\ s a -> s{_rirdAddtional = a})
48+ . _Coerce
4849
4950instance FromJSON RepresentativeInfoResponseDivisions
5051 where
@@ -1538,7 +1539,7 @@ representativeInfoDataDivisions
15381539 -> RepresentativeInfoDataDivisions
15391540representativeInfoDataDivisions pRiddAddtional_ =
15401541 RepresentativeInfoDataDivisions
1541− { _riddAddtional = pRiddAddtional_
1542+ { _riddAddtional = _Coerce # pRiddAddtional_
15421543 }
15431544
15441545-- | The unique Open Civic Data identifier for this division.
@@ -1546,6 +1547,7 @@ riddAddtional :: Lens' RepresentativeInfoDataDivisions (HashMap Text GeographicD
15461547riddAddtional
15471548 = lens _riddAddtional
15481549 (\ s a -> s{_riddAddtional = a})
1550+ . _Coerce
15491551
15501552instance FromJSON RepresentativeInfoDataDivisions
15511553 where
gogol-cloudtrace/gen/Network/Google/CloudTrace/Types/Product.hs+2−1
@@ -60,12 +60,13 @@ traceSpanLabels
6060 -> TraceSpanLabels
6161traceSpanLabels pTslAddtional_ =
6262 TraceSpanLabels
63− { _tslAddtional = pTslAddtional_
63+ { _tslAddtional = _Coerce # pTslAddtional_
6464 }
6565
6666tslAddtional :: Lens' TraceSpanLabels (HashMap Text Text)
6767tslAddtional
6868 = lens _tslAddtional (\ s a -> s{_tslAddtional = a})
69+ . _Coerce
6970
7071instance FromJSON TraceSpanLabels where
7172 parseJSON
gogol-compute/gen/Network/Google/Compute/Types/Product.hs+29−15
@@ -256,7 +256,7 @@ machineTypeAggregatedListItems
256256 -> MachineTypeAggregatedListItems
257257machineTypeAggregatedListItems pMtaliAddtional_ =
258258 MachineTypeAggregatedListItems
259− { _mtaliAddtional = pMtaliAddtional_
259+ { _mtaliAddtional = _Coerce # pMtaliAddtional_
260260 }
261261
262262-- | [Output Only] Name of the scope containing this set of machine types.
@@ -264,6 +264,7 @@ mtaliAddtional :: Lens' MachineTypeAggregatedListItems (HashMap Text MachineType
264264mtaliAddtional
265265 = lens _mtaliAddtional
266266 (\ s a -> s{_mtaliAddtional = a})
267+ . _Coerce
267268
268269instance FromJSON MachineTypeAggregatedListItems
269270 where
@@ -293,7 +294,7 @@ diskTypeAggregatedListItems
293294 -> DiskTypeAggregatedListItems
294295diskTypeAggregatedListItems pDtaliAddtional_ =
295296 DiskTypeAggregatedListItems
296− { _dtaliAddtional = pDtaliAddtional_
297+ { _dtaliAddtional = _Coerce # pDtaliAddtional_
297298 }
298299
299300-- | [Output Only] Name of the scope containing this set of disk types.
@@ -301,6 +302,7 @@ dtaliAddtional :: Lens' DiskTypeAggregatedListItems (HashMap Text DiskTypesScope
301302dtaliAddtional
302303 = lens _dtaliAddtional
303304 (\ s a -> s{_dtaliAddtional = a})
305+ . _Coerce
304306
305307instance FromJSON DiskTypeAggregatedListItems where
306308 parseJSON
@@ -554,7 +556,7 @@ autoscalerAggregatedListItems
554556 -> AutoscalerAggregatedListItems
555557autoscalerAggregatedListItems pAaliAddtional_ =
556558 AutoscalerAggregatedListItems
557− { _aaliAddtional = pAaliAddtional_
559+ { _aaliAddtional = _Coerce # pAaliAddtional_
558560 }
559561
560562-- | Name of the scope containing this set of autoscalers.
@@ -562,6 +564,7 @@ aaliAddtional :: Lens' AutoscalerAggregatedListItems (HashMap Text AutoscalersSc
562564aaliAddtional
563565 = lens _aaliAddtional
564566 (\ s a -> s{_aaliAddtional = a})
567+ . _Coerce
565568
566569instance FromJSON AutoscalerAggregatedListItems where
567570 parseJSON
@@ -1877,7 +1880,7 @@ instanceGroupAggregatedListItems
18771880 -> InstanceGroupAggregatedListItems
18781881instanceGroupAggregatedListItems pIgaliAddtional_ =
18791882 InstanceGroupAggregatedListItems
1880− { _igaliAddtional = pIgaliAddtional_
1883+ { _igaliAddtional = _Coerce # pIgaliAddtional_
18811884 }
18821885
18831886-- | The name of the scope that contains this set of instance groups.
@@ -1885,6 +1888,7 @@ igaliAddtional :: Lens' InstanceGroupAggregatedListItems (HashMap Text InstanceG
18851888igaliAddtional
18861889 = lens _igaliAddtional
18871890 (\ s a -> s{_igaliAddtional = a})
1891+ . _Coerce
18881892
18891893instance FromJSON InstanceGroupAggregatedListItems
18901894 where
@@ -4928,7 +4932,7 @@ instanceAggregatedListItems
49284932 -> InstanceAggregatedListItems
49294933instanceAggregatedListItems pIaliAddtional_ =
49304934 InstanceAggregatedListItems
4931− { _ialiAddtional = pIaliAddtional_
4935+ { _ialiAddtional = _Coerce # pIaliAddtional_
49324936 }
49334937
49344938-- | Name of the scope containing this set of instances.
@@ -4936,6 +4940,7 @@ ialiAddtional :: Lens' InstanceAggregatedListItems (HashMap Text InstancesScoped
49364940ialiAddtional
49374941 = lens _ialiAddtional
49384942 (\ s a -> s{_ialiAddtional = a})
4943+ . _Coerce
49394944
49404945instance FromJSON InstanceAggregatedListItems where
49414946 parseJSON
@@ -7034,7 +7039,7 @@ targetInstanceAggregatedListItems
70347039 -> TargetInstanceAggregatedListItems
70357040targetInstanceAggregatedListItems pTialiAddtional_ =
70367041 TargetInstanceAggregatedListItems
7037− { _tialiAddtional = pTialiAddtional_
7042+ { _tialiAddtional = _Coerce # pTialiAddtional_
70387043 }
70397044
70407045-- | Name of the scope containing this set of target instances.
@@ -7042,6 +7047,7 @@ tialiAddtional :: Lens' TargetInstanceAggregatedListItems (HashMap Text TargetIn
70427047tialiAddtional
70437048 = lens _tialiAddtional
70447049 (\ s a -> s{_tialiAddtional = a})
7050+ . _Coerce
70457051
70467052instance FromJSON TargetInstanceAggregatedListItems
70477053 where
@@ -8067,7 +8073,7 @@ diskAggregatedListItems
80678073 -> DiskAggregatedListItems
80688074diskAggregatedListItems pDaliAddtional_ =
80698075 DiskAggregatedListItems
8070− { _daliAddtional = pDaliAddtional_
8076+ { _daliAddtional = _Coerce # pDaliAddtional_
80718077 }
80728078
80738079-- | [Output Only] Name of the scope containing this set of disks.
@@ -8075,6 +8081,7 @@ daliAddtional :: Lens' DiskAggregatedListItems (HashMap Text DisksScopedList)
80758081daliAddtional
80768082 = lens _daliAddtional
80778083 (\ s a -> s{_daliAddtional = a})
8084+ . _Coerce
80788085
80798086instance FromJSON DiskAggregatedListItems where
80808087 parseJSON
@@ -8339,7 +8346,7 @@ instanceGroupManagerAggregatedListItems
83398346 -> InstanceGroupManagerAggregatedListItems
83408347instanceGroupManagerAggregatedListItems pIgmaliAddtional_ =
83418348 InstanceGroupManagerAggregatedListItems
8342− { _igmaliAddtional = pIgmaliAddtional_
8349+ { _igmaliAddtional = _Coerce # pIgmaliAddtional_
83438350 }
83448351
83458352-- | [Output Only] The name of the scope that contains this set of managed
@@ -8348,6 +8355,7 @@ igmaliAddtional :: Lens' InstanceGroupManagerAggregatedListItems (HashMap Text I
83488355igmaliAddtional
83498356 = lens _igmaliAddtional
83508357 (\ s a -> s{_igmaliAddtional = a})
8358+ . _Coerce
83518359
83528360instance FromJSON
83538361 InstanceGroupManagerAggregatedListItems where
@@ -8694,7 +8702,7 @@ forwardingRuleAggregatedListItems
86948702 -> ForwardingRuleAggregatedListItems
86958703forwardingRuleAggregatedListItems pFraliAddtional_ =
86968704 ForwardingRuleAggregatedListItems
8697− { _fraliAddtional = pFraliAddtional_
8705+ { _fraliAddtional = _Coerce # pFraliAddtional_
86988706 }
86998707
87008708-- | Name of the scope containing this set of addresses.
@@ -8702,6 +8710,7 @@ fraliAddtional :: Lens' ForwardingRuleAggregatedListItems (HashMap Text Forwardi
87028710fraliAddtional
87038711 = lens _fraliAddtional
87048712 (\ s a -> s{_fraliAddtional = a})
8713+ . _Coerce
87058714
87068715instance FromJSON ForwardingRuleAggregatedListItems
87078716 where
@@ -8732,7 +8741,7 @@ operationAggregatedListItems
87328741 -> OperationAggregatedListItems
87338742operationAggregatedListItems pOaliAddtional_ =
87348743 OperationAggregatedListItems
8735− { _oaliAddtional = pOaliAddtional_
8744+ { _oaliAddtional = _Coerce # pOaliAddtional_
87368745 }
87378746
87388747-- | [Output Only] Name of the scope containing this set of operations.
@@ -8740,6 +8749,7 @@ oaliAddtional :: Lens' OperationAggregatedListItems (HashMap Text OperationsScop
87408749oaliAddtional
87418750 = lens _oaliAddtional
87428751 (\ s a -> s{_oaliAddtional = a})
8752+ . _Coerce
87438753
87448754instance FromJSON OperationAggregatedListItems where
87458755 parseJSON
@@ -9066,7 +9076,7 @@ targetPoolAggregatedListItems
90669076 -> TargetPoolAggregatedListItems
90679077targetPoolAggregatedListItems pTpaliAddtional_ =
90689078 TargetPoolAggregatedListItems
9069− { _tpaliAddtional = pTpaliAddtional_
9079+ { _tpaliAddtional = _Coerce # pTpaliAddtional_
90709080 }
90719081
90729082-- | Name of the scope containing this set of target pools.
@@ -9074,6 +9084,7 @@ tpaliAddtional :: Lens' TargetPoolAggregatedListItems (HashMap Text TargetPoolsS
90749084tpaliAddtional
90759085 = lens _tpaliAddtional
90769086 (\ s a -> s{_tpaliAddtional = a})
9087+ . _Coerce
90779088
90789089instance FromJSON TargetPoolAggregatedListItems where
90799090 parseJSON
@@ -9153,13 +9164,14 @@ addressAggregatedListItems
91539164 -> AddressAggregatedListItems
91549165addressAggregatedListItems pAAddtional_ =
91559166 AddressAggregatedListItems
9156− { _aAddtional = pAAddtional_
9167+ { _aAddtional = _Coerce # pAAddtional_
91579168 }
91589169
91599170-- | [Output Only] Name of the scope containing this set of addresses.
91609171aAddtional :: Lens' AddressAggregatedListItems (HashMap Text AddressesScopedList)
91619172aAddtional
9162− = lens _aAddtional (\ s a -> s{_aAddtional = a})
9173+ = lens _aAddtional (\ s a -> s{_aAddtional = a}) .
9174+ _Coerce
91639175
91649176instance FromJSON AddressAggregatedListItems where
91659177 parseJSON
@@ -11894,7 +11906,7 @@ targetVPNGatewayAggregatedListItems
1189411906 -> TargetVPNGatewayAggregatedListItems
1189511907targetVPNGatewayAggregatedListItems pTvgaliAddtional_ =
1189611908 TargetVPNGatewayAggregatedListItems
11897− { _tvgaliAddtional = pTvgaliAddtional_
11909+ { _tvgaliAddtional = _Coerce # pTvgaliAddtional_
1189811910 }
1189911911
1190011912-- | [Output Only] Name of the scope containing this set of target vpn
@@ -11903,6 +11915,7 @@ tvgaliAddtional :: Lens' TargetVPNGatewayAggregatedListItems (HashMap Text Targe
1190311915tvgaliAddtional
1190411916 = lens _tvgaliAddtional
1190511917 (\ s a -> s{_tvgaliAddtional = a})
11918+ . _Coerce
1190611919
1190711920instance FromJSON TargetVPNGatewayAggregatedListItems
1190811921 where
@@ -15190,7 +15203,7 @@ vpnTunnelAggregatedListItems
1519015203 -> VPNTunnelAggregatedListItems
1519115204vpnTunnelAggregatedListItems pVtaliAddtional_ =
1519215205 VPNTunnelAggregatedListItems
15193− { _vtaliAddtional = pVtaliAddtional_
15206+ { _vtaliAddtional = _Coerce # pVtaliAddtional_
1519415207 }
1519515208
1519615209-- | Name of the scope containing this set of vpn tunnels.
@@ -15198,6 +15211,7 @@ vtaliAddtional :: Lens' VPNTunnelAggregatedListItems (HashMap Text VPNTunnelsSco
1519815211vtaliAddtional
1519915212 = lens _vtaliAddtional
1520015213 (\ s a -> s{_vtaliAddtional = a})
15214+ . _Coerce
1520115215
1520215216instance FromJSON VPNTunnelAggregatedListItems where
1520315217 parseJSON
gogol-customsearch/gen/Network/Google/CustomSearch/Types/Product.hs+8−5
@@ -135,12 +135,13 @@ searchQueries
135135 -> SearchQueries
136136searchQueries pSqAddtional_ =
137137 SearchQueries
138− { _sqAddtional = pSqAddtional_
138+ { _sqAddtional = _Coerce # pSqAddtional_
139139 }
140140
141141sqAddtional :: Lens' SearchQueries (HashMap Text [Query])
142142sqAddtional
143− = lens _sqAddtional (\ s a -> s{_sqAddtional = a})
143+ = lens _sqAddtional (\ s a -> s{_sqAddtional = a}) .
144+ _Coerce
144145
145146instance FromJSON SearchQueries where
146147 parseJSON
@@ -166,13 +167,14 @@ resultPagemapAdditionalItem
166167 -> ResultPagemapAdditionalItem
167168resultPagemapAdditionalItem pRpaiAddtional_ =
168169 ResultPagemapAdditionalItem
169− { _rpaiAddtional = pRpaiAddtional_
170+ { _rpaiAddtional = _Coerce # pRpaiAddtional_
170171 }
171172
172173rpaiAddtional :: Lens' ResultPagemapAdditionalItem (HashMap Text JSONValue)
173174rpaiAddtional
174175 = lens _rpaiAddtional
175176 (\ s a -> s{_rpaiAddtional = a})
177+ . _Coerce
176178
177179instance FromJSON ResultPagemapAdditionalItem where
178180 parseJSON
@@ -394,12 +396,13 @@ resultPagemap
394396 -> ResultPagemap
395397resultPagemap pRpAddtional_ =
396398 ResultPagemap
397− { _rpAddtional = pRpAddtional_
399+ { _rpAddtional = _Coerce # pRpAddtional_
398400 }
399401
400402rpAddtional :: Lens' ResultPagemap (HashMap Text [ResultPagemapAdditionalItem])
401403rpAddtional
402− = lens _rpAddtional (\ s a -> s{_rpAddtional = a})
404+ = lens _rpAddtional (\ s a -> s{_rpAddtional = a}) .
405+ _Coerce
403406
404407instance FromJSON ResultPagemap where
405408 parseJSON
gogol-dataflow/gen/Network/Google/Dataflow/Types/Product.hs+53−29
@@ -37,13 +37,14 @@ jobExecutionInfoStages
3737 -> JobExecutionInfoStages
3838jobExecutionInfoStages pJeisAddtional_ =
3939 JobExecutionInfoStages
40− { _jeisAddtional = pJeisAddtional_
40+ { _jeisAddtional = _Coerce # pJeisAddtional_
4141 }
4242
4343jeisAddtional :: Lens' JobExecutionInfoStages (HashMap Text JobExecutionStageInfo)
4444jeisAddtional
4545 = lens _jeisAddtional
4646 (\ s a -> s{_jeisAddtional = a})
47+ . _Coerce
4748
4849instance FromJSON JobExecutionInfoStages where
4950 parseJSON
@@ -603,12 +604,13 @@ workerPoolMetadata
603604 -> WorkerPoolMetadata
604605workerPoolMetadata pWpmAddtional_ =
605606 WorkerPoolMetadata
606− { _wpmAddtional = pWpmAddtional_
607+ { _wpmAddtional = _Coerce # pWpmAddtional_
607608 }
608609
609610wpmAddtional :: Lens' WorkerPoolMetadata (HashMap Text Text)
610611wpmAddtional
611612 = lens _wpmAddtional (\ s a -> s{_wpmAddtional = a})
613+ . _Coerce
612614
613615instance FromJSON WorkerPoolMetadata where
614616 parseJSON
@@ -852,13 +854,14 @@ environmentVersion
852854 -> EnvironmentVersion
853855environmentVersion pEvAddtional_ =
854856 EnvironmentVersion
855− { _evAddtional = pEvAddtional_
857+ { _evAddtional = _Coerce # pEvAddtional_
856858 }
857859
858860-- | Properties of the object.
859861evAddtional :: Lens' EnvironmentVersion (HashMap Text JSONValue)
860862evAddtional
861− = lens _evAddtional (\ s a -> s{_evAddtional = a})
863+ = lens _evAddtional (\ s a -> s{_evAddtional = a}) .
864+ _Coerce
862865
863866instance FromJSON EnvironmentVersion where
864867 parseJSON
@@ -1035,13 +1038,14 @@ environmentUserAgent
10351038 -> EnvironmentUserAgent
10361039environmentUserAgent pEuaAddtional_ =
10371040 EnvironmentUserAgent
1038− { _euaAddtional = pEuaAddtional_
1041+ { _euaAddtional = _Coerce # pEuaAddtional_
10391042 }
10401043
10411044-- | Properties of the object.
10421045euaAddtional :: Lens' EnvironmentUserAgent (HashMap Text JSONValue)
10431046euaAddtional
10441047 = lens _euaAddtional (\ s a -> s{_euaAddtional = a})
1048+ . _Coerce
10451049
10461050instance FromJSON EnvironmentUserAgent where
10471051 parseJSON
@@ -1518,13 +1522,14 @@ metricStructuredNameContext
15181522 -> MetricStructuredNameContext
15191523metricStructuredNameContext pMsncAddtional_ =
15201524 MetricStructuredNameContext
1521− { _msncAddtional = pMsncAddtional_
1525+ { _msncAddtional = _Coerce # pMsncAddtional_
15221526 }
15231527
15241528msncAddtional :: Lens' MetricStructuredNameContext (HashMap Text Text)
15251529msncAddtional
15261530 = lens _msncAddtional
15271531 (\ s a -> s{_msncAddtional = a})
1532+ . _Coerce
15281533
15291534instance FromJSON MetricStructuredNameContext where
15301535 parseJSON
@@ -1927,13 +1932,14 @@ jobTransformNameMApping
19271932 -> JobTransformNameMApping
19281933jobTransformNameMApping pJtnmaAddtional_ =
19291934 JobTransformNameMApping
1930− { _jtnmaAddtional = pJtnmaAddtional_
1935+ { _jtnmaAddtional = _Coerce # pJtnmaAddtional_
19311936 }
19321937
19331938jtnmaAddtional :: Lens' JobTransformNameMApping (HashMap Text Text)
19341939jtnmaAddtional
19351940 = lens _jtnmaAddtional
19361941 (\ s a -> s{_jtnmaAddtional = a})
1942+ . _Coerce
19371943
19381944instance FromJSON JobTransformNameMApping where
19391945 parseJSON
@@ -1961,13 +1967,14 @@ sourceSpec
19611967 -> SourceSpec
19621968sourceSpec pSsAddtional_ =
19631969 SourceSpec
1964− { _ssAddtional = pSsAddtional_
1970+ { _ssAddtional = _Coerce # pSsAddtional_
19651971 }
19661972
19671973-- | Properties of the object.
19681974ssAddtional :: Lens' SourceSpec (HashMap Text JSONValue)
19691975ssAddtional
1970− = lens _ssAddtional (\ s a -> s{_ssAddtional = a})
1976+ = lens _ssAddtional (\ s a -> s{_ssAddtional = a}) .
1977+ _Coerce
19711978
19721979instance FromJSON SourceSpec where
19731980 parseJSON
@@ -2061,13 +2068,14 @@ environmentInternalExperiments
20612068 -> EnvironmentInternalExperiments
20622069environmentInternalExperiments pEieAddtional_ =
20632070 EnvironmentInternalExperiments
2064− { _eieAddtional = pEieAddtional_
2071+ { _eieAddtional = _Coerce # pEieAddtional_
20652072 }
20662073
20672074-- | Properties of the object. Contains field \'ype with type URL.
20682075eieAddtional :: Lens' EnvironmentInternalExperiments (HashMap Text JSONValue)
20692076eieAddtional
20702077 = lens _eieAddtional (\ s a -> s{_eieAddtional = a})
2078+ . _Coerce
20712079
20722080instance FromJSON EnvironmentInternalExperiments
20732081 where
@@ -2368,7 +2376,7 @@ environmentSdkPipelineOptions
23682376 -> EnvironmentSdkPipelineOptions
23692377environmentSdkPipelineOptions pEspoAddtional_ =
23702378 EnvironmentSdkPipelineOptions
2371− { _espoAddtional = pEspoAddtional_
2379+ { _espoAddtional = _Coerce # pEspoAddtional_
23722380 }
23732381
23742382-- | Properties of the object.
@@ -2376,6 +2384,7 @@ espoAddtional :: Lens' EnvironmentSdkPipelineOptions (HashMap Text JSONValue)
23762384espoAddtional
23772385 = lens _espoAddtional
23782386 (\ s a -> s{_espoAddtional = a})
2387+ . _Coerce
23792388
23802389instance FromJSON EnvironmentSdkPipelineOptions where
23812390 parseJSON
@@ -2546,13 +2555,14 @@ topologyConfigUserStageToComputationNameMap
25462555 -> TopologyConfigUserStageToComputationNameMap
25472556topologyConfigUserStageToComputationNameMap pTcustcnmAddtional_ =
25482557 TopologyConfigUserStageToComputationNameMap
2549− { _tcustcnmAddtional = pTcustcnmAddtional_
2558+ { _tcustcnmAddtional = _Coerce # pTcustcnmAddtional_
25502559 }
25512560
25522561tcustcnmAddtional :: Lens' TopologyConfigUserStageToComputationNameMap (HashMap Text Text)
25532562tcustcnmAddtional
25542563 = lens _tcustcnmAddtional
25552564 (\ s a -> s{_tcustcnmAddtional = a})
2565+ . _Coerce
25562566
25572567instance FromJSON
25582568 TopologyConfigUserStageToComputationNameMap where
@@ -2631,13 +2641,14 @@ statusDetailsItem
26312641 -> StatusDetailsItem
26322642statusDetailsItem pSdiAddtional_ =
26332643 StatusDetailsItem
2634− { _sdiAddtional = pSdiAddtional_
2644+ { _sdiAddtional = _Coerce # pSdiAddtional_
26352645 }
26362646
26372647-- | Properties of the object. Contains field \'ype with type URL.
26382648sdiAddtional :: Lens' StatusDetailsItem (HashMap Text JSONValue)
26392649sdiAddtional
26402650 = lens _sdiAddtional (\ s a -> s{_sdiAddtional = a})
2651+ . _Coerce
26412652
26422653instance FromJSON StatusDetailsItem where
26432654 parseJSON
@@ -2665,13 +2676,14 @@ stepProperties
26652676 -> StepProperties
26662677stepProperties pSpAddtional_ =
26672678 StepProperties
2668− { _spAddtional = pSpAddtional_
2679+ { _spAddtional = _Coerce # pSpAddtional_
26692680 }
26702681
26712682-- | Properties of the object.
26722683spAddtional :: Lens' StepProperties (HashMap Text JSONValue)
26732684spAddtional
2674− = lens _spAddtional (\ s a -> s{_spAddtional = a})
2685+ = lens _spAddtional (\ s a -> s{_spAddtional = a}) .
2686+ _Coerce
26752687
26762688instance FromJSON StepProperties where
26772689 parseJSON
@@ -2873,7 +2885,7 @@ workItemServiceStateHarnessData
28732885 -> WorkItemServiceStateHarnessData
28742886workItemServiceStateHarnessData pWisshdAddtional_ =
28752887 WorkItemServiceStateHarnessData
2876− { _wisshdAddtional = pWisshdAddtional_
2888+ { _wisshdAddtional = _Coerce # pWisshdAddtional_
28772889 }
28782890
28792891-- | Properties of the object.
@@ -2881,6 +2893,7 @@ wisshdAddtional :: Lens' WorkItemServiceStateHarnessData (HashMap Text JSONValue
28812893wisshdAddtional
28822894 = lens _wisshdAddtional
28832895 (\ s a -> s{_wisshdAddtional = a})
2896+ . _Coerce
28842897
28852898instance FromJSON WorkItemServiceStateHarnessData
28862899 where
@@ -3139,7 +3152,7 @@ partialGroupByKeyInstructionInputElementCodec
31393152 -> PartialGroupByKeyInstructionInputElementCodec
31403153partialGroupByKeyInstructionInputElementCodec pPgbkiiecAddtional_ =
31413154 PartialGroupByKeyInstructionInputElementCodec
3142− { _pgbkiiecAddtional = pPgbkiiecAddtional_
3155+ { _pgbkiiecAddtional = _Coerce # pPgbkiiecAddtional_
31433156 }
31443157
31453158-- | Properties of the object.
@@ -3147,6 +3160,7 @@ pgbkiiecAddtional :: Lens' PartialGroupByKeyInstructionInputElementCodec (HashMa
31473160pgbkiiecAddtional
31483161 = lens _pgbkiiecAddtional
31493162 (\ s a -> s{_pgbkiiecAddtional = a})
3163+ . _Coerce
31503164
31513165instance FromJSON
31523166 PartialGroupByKeyInstructionInputElementCodec where
@@ -3280,13 +3294,14 @@ sinkCodec
32803294 -> SinkCodec
32813295sinkCodec pScAddtional_ =
32823296 SinkCodec
3283− { _scAddtional = pScAddtional_
3297+ { _scAddtional = _Coerce # pScAddtional_
32843298 }
32853299
32863300-- | Properties of the object.
32873301scAddtional :: Lens' SinkCodec (HashMap Text JSONValue)
32883302scAddtional
3289− = lens _scAddtional (\ s a -> s{_scAddtional = a})
3303+ = lens _scAddtional (\ s a -> s{_scAddtional = a}) .
3304+ _Coerce
32903305
32913306instance FromJSON SinkCodec where
32923307 parseJSON
@@ -3313,7 +3328,7 @@ parDoInstructionUserFn
33133328 -> ParDoInstructionUserFn
33143329parDoInstructionUserFn pPdiufAddtional_ =
33153330 ParDoInstructionUserFn
3316− { _pdiufAddtional = pPdiufAddtional_
3331+ { _pdiufAddtional = _Coerce # pPdiufAddtional_
33173332 }
33183333
33193334-- | Properties of the object.
@@ -3321,6 +3336,7 @@ pdiufAddtional :: Lens' ParDoInstructionUserFn (HashMap Text JSONValue)
33213336pdiufAddtional
33223337 = lens _pdiufAddtional
33233338 (\ s a -> s{_pdiufAddtional = a})
3339+ . _Coerce
33243340
33253341instance FromJSON ParDoInstructionUserFn where
33263342 parseJSON
@@ -3348,13 +3364,14 @@ instructionOutputCodec
33483364 -> InstructionOutputCodec
33493365instructionOutputCodec pIocAddtional_ =
33503366 InstructionOutputCodec
3351− { _iocAddtional = pIocAddtional_
3367+ { _iocAddtional = _Coerce # pIocAddtional_
33523368 }
33533369
33543370-- | Properties of the object.
33553371iocAddtional :: Lens' InstructionOutputCodec (HashMap Text JSONValue)
33563372iocAddtional
33573373 = lens _iocAddtional (\ s a -> s{_iocAddtional = a})
3374+ . _Coerce
33583375
33593376instance FromJSON InstructionOutputCodec where
33603377 parseJSON
@@ -3460,7 +3477,7 @@ workerPoolPoolArgs
34603477 -> WorkerPoolPoolArgs
34613478workerPoolPoolArgs pWppaAddtional_ =
34623479 WorkerPoolPoolArgs
3463− { _wppaAddtional = pWppaAddtional_
3480+ { _wppaAddtional = _Coerce # pWppaAddtional_
34643481 }
34653482
34663483-- | Properties of the object. Contains field \'ype with type URL.
@@ -3468,6 +3485,7 @@ wppaAddtional :: Lens' WorkerPoolPoolArgs (HashMap Text JSONValue)
34683485wppaAddtional
34693486 = lens _wppaAddtional
34703487 (\ s a -> s{_wppaAddtional = a})
3488+ . _Coerce
34713489
34723490instance FromJSON WorkerPoolPoolArgs where
34733491 parseJSON
@@ -3755,7 +3773,7 @@ seqMapTaskUserFn
37553773 -> SeqMapTaskUserFn
37563774seqMapTaskUserFn pSmtufAddtional_ =
37573775 SeqMapTaskUserFn
3758− { _smtufAddtional = pSmtufAddtional_
3776+ { _smtufAddtional = _Coerce # pSmtufAddtional_
37593777 }
37603778
37613779-- | Properties of the object.
@@ -3763,6 +3781,7 @@ smtufAddtional :: Lens' SeqMapTaskUserFn (HashMap Text JSONValue)
37633781smtufAddtional
37643782 = lens _smtufAddtional
37653783 (\ s a -> s{_smtufAddtional = a})
3784+ . _Coerce
37663785
37673786instance FromJSON SeqMapTaskUserFn where
37683787 parseJSON
@@ -3789,7 +3808,7 @@ partialGroupByKeyInstructionValueCombiningFn
37893808 -> PartialGroupByKeyInstructionValueCombiningFn
37903809partialGroupByKeyInstructionValueCombiningFn pPgbkivcfAddtional_ =
37913810 PartialGroupByKeyInstructionValueCombiningFn
3792− { _pgbkivcfAddtional = pPgbkivcfAddtional_
3811+ { _pgbkivcfAddtional = _Coerce # pPgbkivcfAddtional_
37933812 }
37943813
37953814-- | Properties of the object.
@@ -3797,6 +3816,7 @@ pgbkivcfAddtional :: Lens' PartialGroupByKeyInstructionValueCombiningFn (HashMap
37973816pgbkivcfAddtional
37983817 = lens _pgbkivcfAddtional
37993818 (\ s a -> s{_pgbkivcfAddtional = a})
3819+ . _Coerce
38003820
38013821instance FromJSON
38023822 PartialGroupByKeyInstructionValueCombiningFn where
@@ -4081,13 +4101,14 @@ sinkSpec
40814101 -> SinkSpec
40824102sinkSpec pSAddtional_ =
40834103 SinkSpec
4084− { _sAddtional = pSAddtional_
4104+ { _sAddtional = _Coerce # pSAddtional_
40854105 }
40864106
40874107-- | Properties of the object.
40884108sAddtional :: Lens' SinkSpec (HashMap Text JSONValue)
40894109sAddtional
4090− = lens _sAddtional (\ s a -> s{_sAddtional = a})
4110+ = lens _sAddtional (\ s a -> s{_sAddtional = a}) .
4111+ _Coerce
40914112
40924113instance FromJSON SinkSpec where
40934114 parseJSON
@@ -5226,7 +5247,7 @@ sourceBaseSpecsItem
52265247 -> SourceBaseSpecsItem
52275248sourceBaseSpecsItem pSbsiAddtional_ =
52285249 SourceBaseSpecsItem
5229− { _sbsiAddtional = pSbsiAddtional_
5250+ { _sbsiAddtional = _Coerce # pSbsiAddtional_
52305251 }
52315252
52325253-- | Properties of the object.
@@ -5234,6 +5255,7 @@ sbsiAddtional :: Lens' SourceBaseSpecsItem (HashMap Text JSONValue)
52345255sbsiAddtional
52355256 = lens _sbsiAddtional
52365257 (\ s a -> s{_sbsiAddtional = a})
5258+ . _Coerce
52375259
52385260instance FromJSON SourceBaseSpecsItem where
52395261 parseJSON
@@ -5371,7 +5393,7 @@ sideInputInfoKind
53715393 -> SideInputInfoKind
53725394sideInputInfoKind pSiikAddtional_ =
53735395 SideInputInfoKind
5374− { _siikAddtional = pSiikAddtional_
5396+ { _siikAddtional = _Coerce # pSiikAddtional_
53755397 }
53765398
53775399-- | Properties of the object.
@@ -5379,6 +5401,7 @@ siikAddtional :: Lens' SideInputInfoKind (HashMap Text JSONValue)
53795401siikAddtional
53805402 = lens _siikAddtional
53815403 (\ s a -> s{_siikAddtional = a})
5404+ . _Coerce
53825405
53835406instance FromJSON SideInputInfoKind where
53845407 parseJSON
@@ -5548,13 +5571,14 @@ sourceCodec
55485571 -> SourceCodec
55495572sourceCodec pSouAddtional_ =
55505573 SourceCodec
5551− { _souAddtional = pSouAddtional_
5574+ { _souAddtional = _Coerce # pSouAddtional_
55525575 }
55535576
55545577-- | Properties of the object.
55555578souAddtional :: Lens' SourceCodec (HashMap Text JSONValue)
55565579souAddtional
55575580 = lens _souAddtional (\ s a -> s{_souAddtional = a})
5581+ . _Coerce
55585582
55595583instance FromJSON SourceCodec where
55605584 parseJSON
gogol-datastore/gen/Network/Google/Datastore/Types/Product.hs+3−2
@@ -392,7 +392,7 @@ entityProperties
392392 -> EntityProperties
393393entityProperties pEpAddtional_ =
394394 EntityProperties
395− { _epAddtional = pEpAddtional_
395+ { _epAddtional = _Coerce # pEpAddtional_
396396 }
397397
398398-- | The name of the property. A property name matching regex \"__.*__\" is
@@ -401,7 +401,8 @@ entityProperties pEpAddtional_ =
401401-- \"\".
402402epAddtional :: Lens' EntityProperties (HashMap Text Property)
403403epAddtional
404− = lens _epAddtional (\ s a -> s{_epAddtional = a})
404+ = lens _epAddtional (\ s a -> s{_epAddtional = a}) .
405+ _Coerce
405406
406407instance FromJSON EntityProperties where
407408 parseJSON
gogol-debugger/gen/Network/Google/Debugger/Types/Product.hs+3−2
@@ -1317,12 +1317,13 @@ debuggeeLabels
13171317 -> DebuggeeLabels
13181318debuggeeLabels pDlAddtional_ =
13191319 DebuggeeLabels
1320− { _dlAddtional = pDlAddtional_
1320+ { _dlAddtional = _Coerce # pDlAddtional_
13211321 }
13221322
13231323dlAddtional :: Lens' DebuggeeLabels (HashMap Text Text)
13241324dlAddtional
1325− = lens _dlAddtional (\ s a -> s{_dlAddtional = a})
1325+ = lens _dlAddtional (\ s a -> s{_dlAddtional = a}) .
1326+ _Coerce
13261327
13271328instance FromJSON DebuggeeLabels where
13281329 parseJSON
gogol-discovery/gen/Network/Google/Discovery/Types/Product.hs+18−9
@@ -69,13 +69,14 @@ restDescriptionParameters
6969 -> RestDescriptionParameters
7070restDescriptionParameters pRdpAddtional_ =
7171 RestDescriptionParameters
72− { _rdpAddtional = pRdpAddtional_
72+ { _rdpAddtional = _Coerce # pRdpAddtional_
7373 }
7474
7575-- | Description of a single parameter.
7676rdpAddtional :: Lens' RestDescriptionParameters (HashMap Text JSONSchema)
7777rdpAddtional
7878 = lens _rdpAddtional (\ s a -> s{_rdpAddtional = a})
79+ . _Coerce
7980
8081instance FromJSON RestDescriptionParameters where
8182 parseJSON
@@ -360,7 +361,7 @@ restDescriptionAuthOAuth2Scopes
360361 -> RestDescriptionAuthOAuth2Scopes
361362restDescriptionAuthOAuth2Scopes pRdaoasAddtional_ =
362363 RestDescriptionAuthOAuth2Scopes
363− { _rdaoasAddtional = pRdaoasAddtional_
364+ { _rdaoasAddtional = _Coerce # pRdaoasAddtional_
364365 }
365366
366367-- | The scope value.
@@ -368,6 +369,7 @@ rdaoasAddtional :: Lens' RestDescriptionAuthOAuth2Scopes (HashMap Text RestDescr
368369rdaoasAddtional
369370 = lens _rdaoasAddtional
370371 (\ s a -> s{_rdaoasAddtional = a})
372+ . _Coerce
371373
372374instance FromJSON RestDescriptionAuthOAuth2Scopes
373375 where
@@ -397,13 +399,14 @@ restDescriptionMethods
397399 -> RestDescriptionMethods
398400restDescriptionMethods pRdmAddtional_ =
399401 RestDescriptionMethods
400− { _rdmAddtional = pRdmAddtional_
402+ { _rdmAddtional = _Coerce # pRdmAddtional_
401403 }
402404
403405-- | An individual method description.
404406rdmAddtional :: Lens' RestDescriptionMethods (HashMap Text RestMethod)
405407rdmAddtional
406408 = lens _rdmAddtional (\ s a -> s{_rdmAddtional = a})
409+ . _Coerce
407410
408411instance FromJSON RestDescriptionMethods where
409412 parseJSON
@@ -634,13 +637,14 @@ restResourceResources
634637 -> RestResourceResources
635638restResourceResources pRrrAddtional_ =
636639 RestResourceResources
637− { _rrrAddtional = pRrrAddtional_
640+ { _rrrAddtional = _Coerce # pRrrAddtional_
638641 }
639642
640643-- | Description for any sub-resources on this resource.
641644rrrAddtional :: Lens' RestResourceResources (HashMap Text RestResource)
642645rrrAddtional
643646 = lens _rrrAddtional (\ s a -> s{_rrrAddtional = a})
647+ . _Coerce
644648
645649instance FromJSON RestResourceResources where
646650 parseJSON
@@ -889,13 +893,14 @@ restResourceMethods
889893 -> RestResourceMethods
890894restResourceMethods pRrmAddtional_ =
891895 RestResourceMethods
892− { _rrmAddtional = pRrmAddtional_
896+ { _rrmAddtional = _Coerce # pRrmAddtional_
893897 }
894898
895899-- | Description for any methods on this resource.
896900rrmAddtional :: Lens' RestResourceMethods (HashMap Text RestMethod)
897901rrmAddtional
898902 = lens _rrmAddtional (\ s a -> s{_rrmAddtional = a})
903+ . _Coerce
899904
900905instance FromJSON RestResourceMethods where
901906 parseJSON
@@ -1565,13 +1570,14 @@ restDescriptionSchemas
15651570 -> RestDescriptionSchemas
15661571restDescriptionSchemas pRdsAddtional_ =
15671572 RestDescriptionSchemas
1568− { _rdsAddtional = pRdsAddtional_
1573+ { _rdsAddtional = _Coerce # pRdsAddtional_
15691574 }
15701575
15711576-- | An individual schema description.
15721577rdsAddtional :: Lens' RestDescriptionSchemas (HashMap Text JSONSchema)
15731578rdsAddtional
15741579 = lens _rdsAddtional (\ s a -> s{_rdsAddtional = a})
1580+ . _Coerce
15751581
15761582instance FromJSON RestDescriptionSchemas where
15771583 parseJSON
@@ -1643,7 +1649,7 @@ restDescriptionResources
16431649 -> RestDescriptionResources
16441650restDescriptionResources pRdrAddtional_ =
16451651 RestDescriptionResources
1646− { _rdrAddtional = pRdrAddtional_
1652+ { _rdrAddtional = _Coerce # pRdrAddtional_
16471653 }
16481654
16491655-- | An individual resource description. Contains methods and sub-resources
@@ -1651,6 +1657,7 @@ restDescriptionResources pRdrAddtional_ =
16511657rdrAddtional :: Lens' RestDescriptionResources (HashMap Text RestResource)
16521658rdrAddtional
16531659 = lens _rdrAddtional (\ s a -> s{_rdrAddtional = a})
1660+ . _Coerce
16541661
16551662instance FromJSON RestDescriptionResources where
16561663 parseJSON
@@ -1765,13 +1772,14 @@ restMethodParameters
17651772 -> RestMethodParameters
17661773restMethodParameters pRmpAddtional_ =
17671774 RestMethodParameters
1768− { _rmpAddtional = pRmpAddtional_
1775+ { _rmpAddtional = _Coerce # pRmpAddtional_
17691776 }
17701777
17711778-- | Details for a single parameter in this method.
17721779rmpAddtional :: Lens' RestMethodParameters (HashMap Text JSONSchema)
17731780rmpAddtional
17741781 = lens _rmpAddtional (\ s a -> s{_rmpAddtional = a})
1782+ . _Coerce
17751783
17761784instance FromJSON RestMethodParameters where
17771785 parseJSON
@@ -1860,7 +1868,7 @@ jsonSchemaProperties
18601868 -> JSONSchemaProperties
18611869jsonSchemaProperties pJspAddtional_ =
18621870 JSONSchemaProperties
1863− { _jspAddtional = pJspAddtional_
1871+ { _jspAddtional = _Coerce # pJspAddtional_
18641872 }
18651873
18661874-- | A single property of this object. The value is itself a JSON Schema
@@ -1868,6 +1876,7 @@ jsonSchemaProperties pJspAddtional_ =
18681876jspAddtional :: Lens' JSONSchemaProperties (HashMap Text JSONSchema)
18691877jspAddtional
18701878 = lens _jspAddtional (\ s a -> s{_jspAddtional = a})
1879+ . _Coerce
18711880
18721881instance FromJSON JSONSchemaProperties where
18731882 parseJSON
gogol-doubleclick-search/gen/Network/Google/DoubleClickSearch/Types/Product.hs+3−2
@@ -37,14 +37,15 @@ reportRow
3737 -> ReportRow
3838reportRow pRrAddtional_ =
3939 ReportRow
40− { _rrAddtional = pRrAddtional_
40+ { _rrAddtional = _Coerce # pRrAddtional_
4141 }
4242
4343-- | Indicates the columns that are represented in this row. That is, each
4444-- key corresponds to a column with a non-empty cell in this row.
4545rrAddtional :: Lens' ReportRow (HashMap Text JSONValue)
4646rrAddtional
47− = lens _rrAddtional (\ s a -> s{_rrAddtional = a})
47+ = lens _rrAddtional (\ s a -> s{_rrAddtional = a}) .
48+ _Coerce
4849
4950instance FromJSON ReportRow where
5051 parseJSON
gogol-drive/gen/Network/Google/Drive/Types/Product.hs+9−5
@@ -727,13 +727,14 @@ fileOpenWithLinks
727727 -> FileOpenWithLinks
728728fileOpenWithLinks pFowlAddtional_ =
729729 FileOpenWithLinks
730− { _fowlAddtional = pFowlAddtional_
730+ { _fowlAddtional = _Coerce # pFowlAddtional_
731731 }
732732
733733fowlAddtional :: Lens' FileOpenWithLinks (HashMap Text Text)
734734fowlAddtional
735735 = lens _fowlAddtional
736736 (\ s a -> s{_fowlAddtional = a})
737+ . _Coerce
737738
738739instance FromJSON FileOpenWithLinks where
739740 parseJSON
@@ -2063,13 +2064,14 @@ revisionExportLinks
20632064 -> RevisionExportLinks
20642065revisionExportLinks pRelAddtional_ =
20652066 RevisionExportLinks
2066− { _relAddtional = pRelAddtional_
2067+ { _relAddtional = _Coerce # pRelAddtional_
20672068 }
20682069
20692070-- | A mapping from export format to URL
20702071relAddtional :: Lens' RevisionExportLinks (HashMap Text Text)
20712072relAddtional
20722073 = lens _relAddtional (\ s a -> s{_relAddtional = a})
2074+ . _Coerce
20732075
20742076instance FromJSON RevisionExportLinks where
20752077 parseJSON
@@ -2177,13 +2179,14 @@ channelParams
21772179 -> ChannelParams
21782180channelParams pCpAddtional_ =
21792181 ChannelParams
2180− { _cpAddtional = pCpAddtional_
2182+ { _cpAddtional = _Coerce # pCpAddtional_
21812183 }
21822184
21832185-- | Declares a new parameter by name.
21842186cpAddtional :: Lens' ChannelParams (HashMap Text Text)
21852187cpAddtional
2186− = lens _cpAddtional (\ s a -> s{_cpAddtional = a})
2188+ = lens _cpAddtional (\ s a -> s{_cpAddtional = a}) .
2189+ _Coerce
21872190
21882191instance FromJSON ChannelParams where
21892192 parseJSON
@@ -4591,13 +4594,14 @@ fileExportLinks
45914594 -> FileExportLinks
45924595fileExportLinks pFelAddtional_ =
45934596 FileExportLinks
4594− { _felAddtional = pFelAddtional_
4597+ { _felAddtional = _Coerce # pFelAddtional_
45954598 }
45964599
45974600-- | A mapping from export format to URL
45984601felAddtional :: Lens' FileExportLinks (HashMap Text Text)
45994602felAddtional
46004603 = lens _felAddtional (\ s a -> s{_felAddtional = a})
4604+ . _Coerce
46014605
46024606instance FromJSON FileExportLinks where
46034607 parseJSON
gogol-fonts/gen/Network/Google/Fonts/Types/Product.hs+3−2
@@ -202,13 +202,14 @@ webfontFiles
202202 -> WebfontFiles
203203webfontFiles pWfAddtional_ =
204204 WebfontFiles
205− { _wfAddtional = pWfAddtional_
205+ { _wfAddtional = _Coerce # pWfAddtional_
206206 }
207207
208208-- | The font file URL (value) for an specific variant (key).
209209wfAddtional :: Lens' WebfontFiles (HashMap Text Text)
210210wfAddtional
211− = lens _wfAddtional (\ s a -> s{_wfAddtional = a})
211+ = lens _wfAddtional (\ s a -> s{_wfAddtional = a}) .
212+ _Coerce
212213
213214instance FromJSON WebfontFiles where
214215 parseJSON
gogol-genomics/gen/Network/Google/Genomics/Types/Product.hs+26−15
@@ -38,12 +38,13 @@ readInfo
3838 -> ReadInfo
3939readInfo pRiAddtional_ =
4040 ReadInfo
41− { _riAddtional = pRiAddtional_
41+ { _riAddtional = _Coerce # pRiAddtional_
4242 }
4343
4444riAddtional :: Lens' ReadInfo (HashMap Text [JSONValue])
4545riAddtional
46− = lens _riAddtional (\ s a -> s{_riAddtional = a})
46+ = lens _riAddtional (\ s a -> s{_riAddtional = a}) .
47+ _Coerce
4748
4849instance FromJSON ReadInfo where
4950 parseJSON
@@ -168,13 +169,14 @@ operationSchema
168169 -> OperationSchema
169170operationSchema pOsAddtional_ =
170171 OperationSchema
171− { _osAddtional = pOsAddtional_
172+ { _osAddtional = _Coerce # pOsAddtional_
172173 }
173174
174175-- | Properties of the object. Contains field \'ype with type URL.
175176osAddtional :: Lens' OperationSchema (HashMap Text JSONValue)
176177osAddtional
177− = lens _osAddtional (\ s a -> s{_osAddtional = a})
178+ = lens _osAddtional (\ s a -> s{_osAddtional = a}) .
179+ _Coerce
178180
179181instance FromJSON OperationSchema where
180182 parseJSON
@@ -1880,12 +1882,13 @@ variantCallInfo
18801882 -> VariantCallInfo
18811883variantCallInfo pVciAddtional_ =
18821884 VariantCallInfo
1883− { _vciAddtional = pVciAddtional_
1885+ { _vciAddtional = _Coerce # pVciAddtional_
18841886 }
18851887
18861888vciAddtional :: Lens' VariantCallInfo (HashMap Text [JSONValue])
18871889vciAddtional
18881890 = lens _vciAddtional (\ s a -> s{_vciAddtional = a})
1891+ . _Coerce
18891892
18901893instance FromJSON VariantCallInfo where
18911894 parseJSON
@@ -1913,12 +1916,13 @@ readGroupInfo
19131916 -> ReadGroupInfo
19141917readGroupInfo pRgiAddtional_ =
19151918 ReadGroupInfo
1916− { _rgiAddtional = pRgiAddtional_
1919+ { _rgiAddtional = _Coerce # pRgiAddtional_
19171920 }
19181921
19191922rgiAddtional :: Lens' ReadGroupInfo (HashMap Text [JSONValue])
19201923rgiAddtional
19211924 = lens _rgiAddtional (\ s a -> s{_rgiAddtional = a})
1925+ . _Coerce
19221926
19231927instance FromJSON ReadGroupInfo where
19241928 parseJSON
@@ -1944,13 +1948,14 @@ statusDetailsItem
19441948 -> StatusDetailsItem
19451949statusDetailsItem pSdiAddtional_ =
19461950 StatusDetailsItem
1947− { _sdiAddtional = pSdiAddtional_
1951+ { _sdiAddtional = _Coerce # pSdiAddtional_
19481952 }
19491953
19501954-- | Properties of the object. Contains field \'ype with type URL.
19511955sdiAddtional :: Lens' StatusDetailsItem (HashMap Text JSONValue)
19521956sdiAddtional
19531957 = lens _sdiAddtional (\ s a -> s{_sdiAddtional = a})
1958+ . _Coerce
19541959
19551960instance FromJSON StatusDetailsItem where
19561961 parseJSON
@@ -2193,13 +2198,14 @@ operationMetadataRequest
21932198 -> OperationMetadataRequest
21942199operationMetadataRequest pOmrAddtional_ =
21952200 OperationMetadataRequest
2196− { _omrAddtional = pOmrAddtional_
2201+ { _omrAddtional = _Coerce # pOmrAddtional_
21972202 }
21982203
21992204-- | Properties of the object. Contains field \'ype with type URL.
22002205omrAddtional :: Lens' OperationMetadataRequest (HashMap Text JSONValue)
22012206omrAddtional
22022207 = lens _omrAddtional (\ s a -> s{_omrAddtional = a})
2208+ . _Coerce
22032209
22042210instance FromJSON OperationMetadataRequest where
22052211 parseJSON
@@ -2228,12 +2234,13 @@ variantInfo
22282234 -> VariantInfo
22292235variantInfo pViAddtional_ =
22302236 VariantInfo
2231− { _viAddtional = pViAddtional_
2237+ { _viAddtional = _Coerce # pViAddtional_
22322238 }
22332239
22342240viAddtional :: Lens' VariantInfo (HashMap Text [JSONValue])
22352241viAddtional
2236− = lens _viAddtional (\ s a -> s{_viAddtional = a})
2242+ = lens _viAddtional (\ s a -> s{_viAddtional = a}) .
2243+ _Coerce
22372244
22382245instance FromJSON VariantInfo where
22392246 parseJSON
@@ -4168,12 +4175,13 @@ callSetInfo
41684175 -> CallSetInfo
41694176callSetInfo pCsiAddtional_ =
41704177 CallSetInfo
4171− { _csiAddtional = pCsiAddtional_
4178+ { _csiAddtional = _Coerce # pCsiAddtional_
41724179 }
41734180
41744181csiAddtional :: Lens' CallSetInfo (HashMap Text [JSONValue])
41754182csiAddtional
41764183 = lens _csiAddtional (\ s a -> s{_csiAddtional = a})
4184+ . _Coerce
41774185
41784186instance FromJSON CallSetInfo where
41794187 parseJSON
@@ -4201,13 +4209,14 @@ variantSetMetadataInfo
42014209 -> VariantSetMetadataInfo
42024210variantSetMetadataInfo pVsmiAddtional_ =
42034211 VariantSetMetadataInfo
4204− { _vsmiAddtional = pVsmiAddtional_
4212+ { _vsmiAddtional = _Coerce # pVsmiAddtional_
42054213 }
42064214
42074215vsmiAddtional :: Lens' VariantSetMetadataInfo (HashMap Text [JSONValue])
42084216vsmiAddtional
42094217 = lens _vsmiAddtional
42104218 (\ s a -> s{_vsmiAddtional = a})
4219+ . _Coerce
42114220
42124221instance FromJSON VariantSetMetadataInfo where
42134222 parseJSON
@@ -4237,13 +4246,14 @@ operationResponse
42374246 -> OperationResponse
42384247operationResponse pOrAddtional_ =
42394248 OperationResponse
4240− { _orAddtional = pOrAddtional_
4249+ { _orAddtional = _Coerce # pOrAddtional_
42414250 }
42424251
42434252-- | Properties of the object. Contains field \'ype with type URL.
42444253orAddtional :: Lens' OperationResponse (HashMap Text JSONValue)
42454254orAddtional
4246− = lens _orAddtional (\ s a -> s{_orAddtional = a})
4255+ = lens _orAddtional (\ s a -> s{_orAddtional = a}) .
4256+ _Coerce
42474257
42484258instance FromJSON OperationResponse where
42494259 parseJSON
@@ -4559,13 +4569,14 @@ readGroupSetInfo
45594569 -> ReadGroupSetInfo
45604570readGroupSetInfo pRgsiAddtional_ =
45614571 ReadGroupSetInfo
4562− { _rgsiAddtional = pRgsiAddtional_
4572+ { _rgsiAddtional = _Coerce # pRgsiAddtional_
45634573 }
45644574
45654575rgsiAddtional :: Lens' ReadGroupSetInfo (HashMap Text [JSONValue])
45664576rgsiAddtional
45674577 = lens _rgsiAddtional
45684578 (\ s a -> s{_rgsiAddtional = a})
4579+ . _Coerce
45694580
45704581instance FromJSON ReadGroupSetInfo where
45714582 parseJSON
gogol-identity-toolkit/gen/Network/Google/IdentityToolkit/Types/Product.hs+2−1
@@ -1046,13 +1046,14 @@ identitytoolkitRelyingPartyGetPublicKeysResponse
10461046 -> IdentitytoolkitRelyingPartyGetPublicKeysResponse
10471047identitytoolkitRelyingPartyGetPublicKeysResponse pIrpgpkrAddtional_ =
10481048 IdentitytoolkitRelyingPartyGetPublicKeysResponse
1049− { _irpgpkrAddtional = pIrpgpkrAddtional_
1049+ { _irpgpkrAddtional = _Coerce # pIrpgpkrAddtional_
10501050 }
10511051
10521052irpgpkrAddtional :: Lens' IdentitytoolkitRelyingPartyGetPublicKeysResponse (HashMap Text Text)
10531053irpgpkrAddtional
10541054 = lens _irpgpkrAddtional
10551055 (\ s a -> s{_irpgpkrAddtional = a})
1056+ . _Coerce
10561057
10571058instance FromJSON
10581059 IdentitytoolkitRelyingPartyGetPublicKeysResponse
gogol-maps-engine/gen/Network/Google/MapsEngine/Types/Product.hs+2−1
@@ -85,7 +85,7 @@ geoJSONProperties
8585 -> GeoJSONProperties
8686geoJSONProperties pGjpAddtional_ =
8787 GeoJSONProperties
88− { _gjpAddtional = pGjpAddtional_
88+ { _gjpAddtional = _Coerce # pGjpAddtional_
8989 }
9090
9191-- | An arbitrary key-value pair. The key must be the name of a column in the
@@ -94,6 +94,7 @@ geoJSONProperties pGjpAddtional_ =
9494gjpAddtional :: Lens' GeoJSONProperties (HashMap Text JSONValue)
9595gjpAddtional
9696 = lens _gjpAddtional (\ s a -> s{_gjpAddtional = a})
97+ . _Coerce
9798
9899instance FromJSON GeoJSONProperties where
99100 parseJSON
gogol-monitoring/gen/Network/Google/Monitoring/Types/Product.hs+4−2
@@ -320,7 +320,7 @@ writeTimeseriesRequestCommonLabels
320320 -> WriteTimeseriesRequestCommonLabels
321321writeTimeseriesRequestCommonLabels pWtrclAddtional_ =
322322 WriteTimeseriesRequestCommonLabels
323− { _wtrclAddtional = pWtrclAddtional_
323+ { _wtrclAddtional = _Coerce # pWtrclAddtional_
324324 }
325325
326326-- | The label\'s name.
@@ -328,6 +328,7 @@ wtrclAddtional :: Lens' WriteTimeseriesRequestCommonLabels (HashMap Text Text)
328328wtrclAddtional
329329 = lens _wtrclAddtional
330330 (\ s a -> s{_wtrclAddtional = a})
331+ . _Coerce
331332
332333instance FromJSON WriteTimeseriesRequestCommonLabels
333334 where
@@ -567,13 +568,14 @@ timeseriesDescriptorLabels
567568 -> TimeseriesDescriptorLabels
568569timeseriesDescriptorLabels pTdlAddtional_ =
569570 TimeseriesDescriptorLabels
570− { _tdlAddtional = pTdlAddtional_
571+ { _tdlAddtional = _Coerce # pTdlAddtional_
571572 }
572573
573574-- | The label\'s name.
574575tdlAddtional :: Lens' TimeseriesDescriptorLabels (HashMap Text Text)
575576tdlAddtional
576577 = lens _tdlAddtional (\ s a -> s{_tdlAddtional = a})
578+ . _Coerce
577579
578580instance FromJSON TimeseriesDescriptorLabels where
579581 parseJSON
gogol-pagespeed/gen/Network/Google/PageSpeed/Types/Product.hs+4−2
@@ -1097,13 +1097,14 @@ resultRuleGroups
10971097 -> ResultRuleGroups
10981098resultRuleGroups pRrgAddtional_ =
10991099 ResultRuleGroups
1100− { _rrgAddtional = pRrgAddtional_
1100+ { _rrgAddtional = _Coerce # pRrgAddtional_
11011101 }
11021102
11031103-- | The name of this rule group: one of \"SPEED\" or \"USABILITY\".
11041104rrgAddtional :: Lens' ResultRuleGroups (HashMap Text ResultRuleGroupsAdditional)
11051105rrgAddtional
11061106 = lens _rrgAddtional (\ s a -> s{_rrgAddtional = a})
1107+ . _Coerce
11071108
11081109instance FromJSON ResultRuleGroups where
11091110 parseJSON
@@ -1182,7 +1183,7 @@ resultFormattedResultsRuleResults
11821183 -> ResultFormattedResultsRuleResults
11831184resultFormattedResultsRuleResults pRfrrrAddtional_ =
11841185 ResultFormattedResultsRuleResults
1185− { _rfrrrAddtional = pRfrrrAddtional_
1186+ { _rfrrrAddtional = _Coerce # pRfrrrAddtional_
11861187 }
11871188
11881189-- | The enum-like identifier for this rule. For instance \"EnableKeepAlive\"
@@ -1191,6 +1192,7 @@ rfrrrAddtional :: Lens' ResultFormattedResultsRuleResults (HashMap Text ResultFo
11911192rfrrrAddtional
11921193 = lens _rfrrrAddtional
11931194 (\ s a -> s{_rfrrrAddtional = a})
1195+ . _Coerce
11941196
11951197instance FromJSON ResultFormattedResultsRuleResults
11961198 where
gogol-partners/gen/Network/Google/Partners/Types/Product.hs+2−1
@@ -1142,13 +1142,14 @@ logMessageRequestClientInfo
11421142 -> LogMessageRequestClientInfo
11431143logMessageRequestClientInfo pLmrciAddtional_ =
11441144 LogMessageRequestClientInfo
1145− { _lmrciAddtional = pLmrciAddtional_
1145+ { _lmrciAddtional = _Coerce # pLmrciAddtional_
11461146 }
11471147
11481148lmrciAddtional :: Lens' LogMessageRequestClientInfo (HashMap Text Text)
11491149lmrciAddtional
11501150 = lens _lmrciAddtional
11511151 (\ s a -> s{_lmrciAddtional = a})
1152+ . _Coerce
11521153
11531154instance FromJSON LogMessageRequestClientInfo where
11541155 parseJSON
gogol-prediction/gen/Network/Google/Prediction/Types/Product.hs+10−5
@@ -145,13 +145,14 @@ analyzeModelDescriptionConfusionMatrixRowTotals
145145 -> AnalyzeModelDescriptionConfusionMatrixRowTotals
146146analyzeModelDescriptionConfusionMatrixRowTotals pAmdcmrtAddtional_ =
147147 AnalyzeModelDescriptionConfusionMatrixRowTotals
148− { _amdcmrtAddtional = pAmdcmrtAddtional_
148+ { _amdcmrtAddtional = _Coerce # pAmdcmrtAddtional_
149149 }
150150
151151amdcmrtAddtional :: Lens' AnalyzeModelDescriptionConfusionMatrixRowTotals (HashMap Text Text)
152152amdcmrtAddtional
153153 = lens _amdcmrtAddtional
154154 (\ s a -> s{_amdcmrtAddtional = a})
155+ . _Coerce
155156
156157instance FromJSON
157158 AnalyzeModelDescriptionConfusionMatrixRowTotals where
@@ -375,12 +376,13 @@ insertUtilityItem
375376 -> InsertUtilityItem
376377insertUtilityItem pIuiAddtional_ =
377378 InsertUtilityItem
378− { _iuiAddtional = pIuiAddtional_
379+ { _iuiAddtional = _Coerce # pIuiAddtional_
379380 }
380381
381382iuiAddtional :: Lens' InsertUtilityItem (HashMap Text Double)
382383iuiAddtional
383384 = lens _iuiAddtional (\ s a -> s{_iuiAddtional = a})
385+ . _Coerce
384386
385387instance FromJSON InsertUtilityItem where
386388 parseJSON
@@ -1045,7 +1047,7 @@ analyzeModelDescriptionConfusionMatrix
10451047 -> AnalyzeModelDescriptionConfusionMatrix
10461048analyzeModelDescriptionConfusionMatrix pAmdcmAddtional_ =
10471049 AnalyzeModelDescriptionConfusionMatrix
1048− { _amdcmAddtional = pAmdcmAddtional_
1050+ { _amdcmAddtional = _Coerce # pAmdcmAddtional_
10491051 }
10501052
10511053-- | Confusion matrix information for the true class label.
@@ -1053,6 +1055,7 @@ amdcmAddtional :: Lens' AnalyzeModelDescriptionConfusionMatrix (HashMap Text Ana
10531055amdcmAddtional
10541056 = lens _amdcmAddtional
10551057 (\ s a -> s{_amdcmAddtional = a})
1058+ . _Coerce
10561059
10571060instance FromJSON
10581061 AnalyzeModelDescriptionConfusionMatrix where
@@ -1236,13 +1239,14 @@ analyzeErrorsItem
12361239 -> AnalyzeErrorsItem
12371240analyzeErrorsItem pAeiAddtional_ =
12381241 AnalyzeErrorsItem
1239− { _aeiAddtional = pAeiAddtional_
1242+ { _aeiAddtional = _Coerce # pAeiAddtional_
12401243 }
12411244
12421245-- | Error level followed by a detailed error message.
12431246aeiAddtional :: Lens' AnalyzeErrorsItem (HashMap Text Text)
12441247aeiAddtional
12451248 = lens _aeiAddtional (\ s a -> s{_aeiAddtional = a})
1249+ . _Coerce
12461250
12471251instance FromJSON AnalyzeErrorsItem where
12481252 parseJSON
@@ -1425,7 +1429,7 @@ analyzeModelDescriptionConfusionMatrixAdditional
14251429 -> AnalyzeModelDescriptionConfusionMatrixAdditional
14261430analyzeModelDescriptionConfusionMatrixAdditional pAmdcmaAddtional_ =
14271431 AnalyzeModelDescriptionConfusionMatrixAdditional
1428− { _amdcmaAddtional = pAmdcmaAddtional_
1432+ { _amdcmaAddtional = _Coerce # pAmdcmaAddtional_
14291433 }
14301434
14311435-- | Average number of times an instance with correct class label
@@ -1435,6 +1439,7 @@ amdcmaAddtional :: Lens' AnalyzeModelDescriptionConfusionMatrixAdditional (HashM
14351439amdcmaAddtional
14361440 = lens _amdcmaAddtional
14371441 (\ s a -> s{_amdcmaAddtional = a})
1442+ . _Coerce
14381443
14391444instance FromJSON
14401445 AnalyzeModelDescriptionConfusionMatrixAdditional
gogol-proximitybeacon/gen/Network/Google/ProximityBeacon/Types/Product.hs+3−2
@@ -162,12 +162,13 @@ beaconProperties
162162 -> BeaconProperties
163163beaconProperties pBpAddtional_ =
164164 BeaconProperties
165− { _bpAddtional = pBpAddtional_
165+ { _bpAddtional = _Coerce # pBpAddtional_
166166 }
167167
168168bpAddtional :: Lens' BeaconProperties (HashMap Text Text)
169169bpAddtional
170− = lens _bpAddtional (\ s a -> s{_bpAddtional = a})
170+ = lens _bpAddtional (\ s a -> s{_bpAddtional = a}) .
171+ _Coerce
171172
172173instance FromJSON BeaconProperties where
173174 parseJSON
gogol-pubsub/gen/Network/Google/PubSub/Types/Product.hs+4−2
@@ -611,12 +611,13 @@ pubsubMessageAttributes
611611 -> PubsubMessageAttributes
612612pubsubMessageAttributes pPmaAddtional_ =
613613 PubsubMessageAttributes
614− { _pmaAddtional = pPmaAddtional_
614+ { _pmaAddtional = _Coerce # pPmaAddtional_
615615 }
616616
617617pmaAddtional :: Lens' PubsubMessageAttributes (HashMap Text Text)
618618pmaAddtional
619619 = lens _pmaAddtional (\ s a -> s{_pmaAddtional = a})
620+ . _Coerce
620621
621622instance FromJSON PubsubMessageAttributes where
622623 parseJSON
@@ -891,12 +892,13 @@ pushConfigAttributes
891892 -> PushConfigAttributes
892893pushConfigAttributes pPcaAddtional_ =
893894 PushConfigAttributes
894− { _pcaAddtional = pPcaAddtional_
895+ { _pcaAddtional = _Coerce # pPcaAddtional_
895896 }
896897
897898pcaAddtional :: Lens' PushConfigAttributes (HashMap Text Text)
898899pcaAddtional
899900 = lens _pcaAddtional (\ s a -> s{_pcaAddtional = a})
901+ . _Coerce
900902
901903instance FromJSON PushConfigAttributes where
902904 parseJSON
gogol-resourcemanager/gen/Network/Google/ResourceManager/Types/Product.hs+3−2
@@ -554,12 +554,13 @@ projectLabels
554554 -> ProjectLabels
555555projectLabels pPlAddtional_ =
556556 ProjectLabels
557− { _plAddtional = pPlAddtional_
557+ { _plAddtional = _Coerce # pPlAddtional_
558558 }
559559
560560plAddtional :: Lens' ProjectLabels (HashMap Text Text)
561561plAddtional
562− = lens _plAddtional (\ s a -> s{_plAddtional = a})
562+ = lens _plAddtional (\ s a -> s{_plAddtional = a}) .
563+ _Coerce
563564
564565instance FromJSON ProjectLabels where
565566 parseJSON
gogol-resourceviews/gen/Network/Google/ResourceViews/Types/Product.hs+2−1
@@ -834,7 +834,7 @@ listResourceResponseItemEndpoints
834834 -> ListResourceResponseItemEndpoints
835835listResourceResponseItemEndpoints pLrrieAddtional_ =
836836 ListResourceResponseItemEndpoints
837− { _lrrieAddtional = pLrrieAddtional_
837+ { _lrrieAddtional = _Coerce # pLrrieAddtional_
838838 }
839839
840840-- | The name of the service end point.
@@ -842,6 +842,7 @@ lrrieAddtional :: Lens' ListResourceResponseItemEndpoints (HashMap Text [Int32])
842842lrrieAddtional
843843 = lens _lrrieAddtional
844844 (\ s a -> s{_lrrieAddtional = a})
845+ . _Coerce
845846
846847instance FromJSON ListResourceResponseItemEndpoints
847848 where
gogol-storage-transfer/gen/Network/Google/StorageTransfer/Types/Product.hs+8−5
@@ -594,13 +594,14 @@ statusDetailsItem
594594 -> StatusDetailsItem
595595statusDetailsItem pSdiAddtional_ =
596596 StatusDetailsItem
597− { _sdiAddtional = pSdiAddtional_
597+ { _sdiAddtional = _Coerce # pSdiAddtional_
598598 }
599599
600600-- | Properties of the object. Contains field \'ype with type URL.
601601sdiAddtional :: Lens' StatusDetailsItem (HashMap Text JSONValue)
602602sdiAddtional
603603 = lens _sdiAddtional (\ s a -> s{_sdiAddtional = a})
604+ . _Coerce
604605
605606instance FromJSON StatusDetailsItem where
606607 parseJSON
@@ -1435,13 +1436,14 @@ operationMetadata
14351436 -> OperationMetadata
14361437operationMetadata pOmAddtional_ =
14371438 OperationMetadata
1438− { _omAddtional = pOmAddtional_
1439+ { _omAddtional = _Coerce # pOmAddtional_
14391440 }
14401441
14411442-- | Properties of the object. Contains field \'ype with type URL.
14421443omAddtional :: Lens' OperationMetadata (HashMap Text JSONValue)
14431444omAddtional
1444− = lens _omAddtional (\ s a -> s{_omAddtional = a})
1445+ = lens _omAddtional (\ s a -> s{_omAddtional = a}) .
1446+ _Coerce
14451447
14461448instance FromJSON OperationMetadata where
14471449 parseJSON
@@ -1827,13 +1829,14 @@ operationResponse
18271829 -> OperationResponse
18281830operationResponse pOrAddtional_ =
18291831 OperationResponse
1830− { _orAddtional = pOrAddtional_
1832+ { _orAddtional = _Coerce # pOrAddtional_
18311833 }
18321834
18331835-- | Properties of the object. Contains field \'ype with type URL.
18341836orAddtional :: Lens' OperationResponse (HashMap Text JSONValue)
18351837orAddtional
1836− = lens _orAddtional (\ s a -> s{_orAddtional = a})
1838+ = lens _orAddtional (\ s a -> s{_orAddtional = a}) .
1839+ _Coerce
18371840
18381841instance FromJSON OperationResponse where
18391842 parseJSON
gogol-storage/gen/Network/Google/Storage/Types/Product.hs+6−4
@@ -227,13 +227,14 @@ objectMetadata
227227 -> ObjectMetadata
228228objectMetadata pOmAddtional_ =
229229 ObjectMetadata
230− { _omAddtional = pOmAddtional_
230+ { _omAddtional = _Coerce # pOmAddtional_
231231 }
232232
233233-- | An individual metadata entry.
234234omAddtional :: Lens' ObjectMetadata (HashMap Text Text)
235235omAddtional
236− = lens _omAddtional (\ s a -> s{_omAddtional = a})
236+ = lens _omAddtional (\ s a -> s{_omAddtional = a}) .
237+ _Coerce
237238
238239instance FromJSON ObjectMetadata where
239240 parseJSON
@@ -1237,13 +1238,14 @@ channelParams
12371238 -> ChannelParams
12381239channelParams pCpAddtional_ =
12391240 ChannelParams
1240− { _cpAddtional = pCpAddtional_
1241+ { _cpAddtional = _Coerce # pCpAddtional_
12411242 }
12421243
12431244-- | Declares a new parameter by name.
12441245cpAddtional :: Lens' ChannelParams (HashMap Text Text)
12451246cpAddtional
1246− = lens _cpAddtional (\ s a -> s{_cpAddtional = a})
1247+ = lens _cpAddtional (\ s a -> s{_cpAddtional = a}) .
1248+ _Coerce
12471249
12481250instance FromJSON ChannelParams where
12491251 parseJSON
gogol-youtube/gen/Network/Google/YouTube/Types/Product.hs+10−6
@@ -4838,13 +4838,14 @@ channelLocalizations
48384838 -> ChannelLocalizations
48394839channelLocalizations pClAddtional_ =
48404840 ChannelLocalizations
4841− { _clAddtional = pClAddtional_
4841+ { _clAddtional = _Coerce # pClAddtional_
48424842 }
48434843
48444844-- | The language tag, using string since map_key require simple types.
48454845clAddtional :: Lens' ChannelLocalizations (HashMap Text ChannelLocalization)
48464846clAddtional
4847− = lens _clAddtional (\ s a -> s{_clAddtional = a})
4847+ = lens _clAddtional (\ s a -> s{_clAddtional = a}) .
4848+ _Coerce
48484849
48494850instance FromJSON ChannelLocalizations where
48504851 parseJSON
@@ -5335,13 +5336,14 @@ playListLocalizations
53355336 -> PlayListLocalizations
53365337playListLocalizations pPllAddtional_ =
53375338 PlayListLocalizations
5338− { _pllAddtional = pPllAddtional_
5339+ { _pllAddtional = _Coerce # pPllAddtional_
53395340 }
53405341
53415342-- | The language tag, using string since map_key require simple types.
53425343pllAddtional :: Lens' PlayListLocalizations (HashMap Text PlayListLocalization)
53435344pllAddtional
53445345 = lens _pllAddtional (\ s a -> s{_pllAddtional = a})
5346+ . _Coerce
53455347
53465348instance FromJSON PlayListLocalizations where
53475349 parseJSON
@@ -6125,13 +6127,14 @@ videoLocalizations
61256127 -> VideoLocalizations
61266128videoLocalizations pVlAddtional_ =
61276129 VideoLocalizations
6128− { _vlAddtional = pVlAddtional_
6130+ { _vlAddtional = _Coerce # pVlAddtional_
61296131 }
61306132
61316133-- | The language tag, using string since map_key require simple types.
61326134vlAddtional :: Lens' VideoLocalizations (HashMap Text VideoLocalization)
61336135vlAddtional
6134− = lens _vlAddtional (\ s a -> s{_vlAddtional = a})
6136+ = lens _vlAddtional (\ s a -> s{_vlAddtional = a}) .
6137+ _Coerce
61356138
61366139instance FromJSON VideoLocalizations where
61376140 parseJSON
@@ -8306,13 +8309,14 @@ channelSectionLocalizations
83068309 -> ChannelSectionLocalizations
83078310channelSectionLocalizations pCslAddtional_ =
83088311 ChannelSectionLocalizations
8309− { _cslAddtional = pCslAddtional_
8312+ { _cslAddtional = _Coerce # pCslAddtional_
83108313 }
83118314
83128315-- | The language tag, using string since map_key require simple types.
83138316cslAddtional :: Lens' ChannelSectionLocalizations (HashMap Text ChannelSectionLocalization)
83148317cslAddtional
83158318 = lens _cslAddtional (\ s a -> s{_cslAddtional = a})
8319+ . _Coerce
83168320
83178321instance FromJSON ChannelSectionLocalizations where
83188322 parseJSON