packages feed

gogol-cloudtrace 0.4.0 → 0.5.0

raw patch · 6 files changed

+151/−112 lines, 6 filesdep ~gogol-corePVP ok

version bump matches the API change (PVP)

Dependency ranges changed: gogol-core

API changes (from Hackage documentation)

Files

README.md view
@@ -8,7 +8,7 @@  ## Version -`0.3.0`+`0.5.0`   ## Description
gen/Network/Google/CloudTrace/Types.hs view
@@ -178,8 +178,8 @@  -- | Write Trace data for a project or application traceAppendScope :: Proxy '["https://www.googleapis.com/auth/trace.append"]-traceAppendScope = Proxy;+traceAppendScope = Proxy  -- | View and manage your data across Google Cloud Platform services cloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]-cloudPlatformScope = Proxy;+cloudPlatformScope = Proxy
gen/Network/Google/CloudTrace/Types/Product.hs view
@@ -28,7 +28,8 @@ -- a trace. -- -- /See:/ 'span' smart constructor.-data Span = Span'+data Span =+  Span'     { _sStatus                  :: !(Maybe Status)     , _sStartTime               :: !(Maybe DateTime')     , _sChildSpanCount          :: !(Maybe (Textual Int32))@@ -42,8 +43,10 @@     , _sParentSpanId            :: !(Maybe Text)     , _sLinks                   :: !(Maybe Links)     , _sSpanId                  :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Span' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -76,7 +79,7 @@ span     :: Span span =-    Span'+  Span'     { _sStatus = Nothing     , _sStartTime = Nothing     , _sChildSpanCount = Nothing@@ -92,6 +95,7 @@     , _sSpanId = Nothing     } + -- | An optional final status for this span. sStatus :: Lens' Span (Maybe Status) sStatus = lens _sStatus (\ s a -> s{_sStatus = a})@@ -220,11 +224,14 @@ -- | Represents a string that might be shortened to a specified length. -- -- /See:/ 'truncatableString' smart constructor.-data TruncatableString = TruncatableString'+data TruncatableString =+  TruncatableString'     { _tsValue              :: !(Maybe Text)     , _tsTruncatedByteCount :: !(Maybe (Textual Int32))-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'TruncatableString' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -235,11 +242,9 @@ truncatableString     :: TruncatableString truncatableString =-    TruncatableString'-    { _tsValue = Nothing-    , _tsTruncatedByteCount = Nothing-    }+  TruncatableString' {_tsValue = Nothing, _tsTruncatedByteCount = Nothing} + -- | The shortened string. For example, if the original string is 500 bytes -- long and the limit of the string is 128 bytes, then \`value\` contains -- the first 128 bytes of the 500-byte string. Truncation always happens on@@ -308,12 +313,15 @@ -- security\/privacy reasons. -- -- /See:/ 'status' smart constructor.-data Status = Status'+data Status =+  Status'     { _sDetails :: !(Maybe [StatusDetailsItem])     , _sCode    :: !(Maybe (Textual Int32))     , _sMessage :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Status' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -325,13 +333,9 @@ -- * 'sMessage' status     :: Status-status =-    Status'-    { _sDetails = Nothing-    , _sCode = Nothing-    , _sMessage = Nothing-    }+status = Status' {_sDetails = Nothing, _sCode = Nothing, _sMessage = Nothing} + -- | A list of messages that carry the error details. There is a common set -- of message types for APIs to use. sDetails :: Lens' Status [StatusDetailsItem]@@ -375,10 +379,13 @@ -- \"\/http\/request_bytes\": 300 \"abc.com\/myattribute\": true -- -- /See:/ 'attributesAttributeMap' smart constructor.-newtype AttributesAttributeMap = AttributesAttributeMap'+newtype AttributesAttributeMap =+  AttributesAttributeMap'     { _aamAddtional :: HashMap Text AttributeValue-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AttributesAttributeMap' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -388,10 +395,9 @@     :: HashMap Text AttributeValue -- ^ 'aamAddtional'     -> AttributesAttributeMap attributesAttributeMap pAamAddtional_ =-    AttributesAttributeMap'-    { _aamAddtional = _Coerce # pAamAddtional_-    }+  AttributesAttributeMap' {_aamAddtional = _Coerce # pAamAddtional_} + aamAddtional :: Lens' AttributesAttributeMap (HashMap Text AttributeValue) aamAddtional   = lens _aamAddtional (\ s a -> s{_aamAddtional = a})@@ -409,11 +415,14 @@ -- | Text annotation with a set of attributes. -- -- /See:/ 'annotation' smart constructor.-data Annotation = Annotation'+data Annotation =+  Annotation'     { _aAttributes  :: !(Maybe Attributes)     , _aDescription :: !(Maybe TruncatableString)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Annotation' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -423,12 +432,9 @@ -- * 'aDescription' annotation     :: Annotation-annotation =-    Annotation'-    { _aAttributes = Nothing-    , _aDescription = Nothing-    }+annotation = Annotation' {_aAttributes = Nothing, _aDescription = Nothing} + -- | A set of attributes on the annotation. You can have up to 4 attributes -- per Annotation. aAttributes :: Lens' Annotation (Maybe Attributes)@@ -458,12 +464,15 @@ -- | The allowed types for [VALUE] in a \`[KEY]:[VALUE]\` attribute. -- -- /See:/ 'attributeValue' smart constructor.-data AttributeValue = AttributeValue'+data AttributeValue =+  AttributeValue'     { _avBoolValue   :: !(Maybe Bool)     , _avIntValue    :: !(Maybe (Textual Int64))     , _avStringValue :: !(Maybe TruncatableString)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AttributeValue' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -476,12 +485,10 @@ attributeValue     :: AttributeValue attributeValue =-    AttributeValue'-    { _avBoolValue = Nothing-    , _avIntValue = Nothing-    , _avStringValue = Nothing-    }+  AttributeValue'+    {_avBoolValue = Nothing, _avIntValue = Nothing, _avStringValue = Nothing} + -- | A Boolean value represented by \`true\` or \`false\`. avBoolValue :: Lens' AttributeValue (Maybe Bool) avBoolValue@@ -518,13 +525,16 @@ -- | An event describing a message sent\/received between Spans. -- -- /See:/ 'messageEvent' smart constructor.-data MessageEvent = MessageEvent'+data MessageEvent =+  MessageEvent'     { _meId                    :: !(Maybe (Textual Int64))     , _meUncompressedSizeBytes :: !(Maybe (Textual Int64))     , _meType                  :: !(Maybe MessageEventType)     , _meCompressedSizeBytes   :: !(Maybe (Textual Int64))-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'MessageEvent' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -539,13 +549,14 @@ messageEvent     :: MessageEvent messageEvent =-    MessageEvent'+  MessageEvent'     { _meId = Nothing     , _meUncompressedSizeBytes = Nothing     , _meType = Nothing     , _meCompressedSizeBytes = Nothing     } + -- | An identifier for the MessageEvent\'s message that can be used to match -- SENT and RECEIVED MessageEvents. It is recommended to be unique within a -- Span.@@ -602,15 +613,17 @@ -- -- /See:/ 'empty' smart constructor. data Empty =-    Empty'-    deriving (Eq,Show,Data,Typeable,Generic)+  Empty'+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Empty' with the minimum fields required to make a request. -- empty     :: Empty empty = Empty' + instance FromJSON Empty where         parseJSON = withObject "Empty" (\ o -> pure Empty') @@ -623,13 +636,16 @@ -- traces or when the handler receives a request from a different project. -- -- /See:/ 'link' smart constructor.-data Link = Link'+data Link =+  Link'     { _lTraceId    :: !(Maybe Text)     , _lAttributes :: !(Maybe Attributes)     , _lType       :: !(Maybe LinkType)     , _lSpanId     :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Link' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -644,13 +660,14 @@ link     :: Link link =-    Link'+  Link'     { _lTraceId = Nothing     , _lAttributes = Nothing     , _lType = Nothing     , _lSpanId = Nothing     } + -- | The [TRACE_ID] for a trace within a project. lTraceId :: Lens' Link (Maybe Text) lTraceId = lens _lTraceId (\ s a -> s{_lTraceId = a})@@ -688,10 +705,13 @@  -- -- /See:/ 'statusDetailsItem' smart constructor.-newtype StatusDetailsItem = StatusDetailsItem'+newtype StatusDetailsItem =+  StatusDetailsItem'     { _sdiAddtional :: HashMap Text JSONValue-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'StatusDetailsItem' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -701,10 +721,9 @@     :: HashMap Text JSONValue -- ^ 'sdiAddtional'     -> StatusDetailsItem statusDetailsItem pSdiAddtional_ =-    StatusDetailsItem'-    { _sdiAddtional = _Coerce # pSdiAddtional_-    }+  StatusDetailsItem' {_sdiAddtional = _Coerce # pSdiAddtional_} + -- | Properties of the object. Contains field \'type with type URL. sdiAddtional :: Lens' StatusDetailsItem (HashMap Text JSONValue) sdiAddtional@@ -722,11 +741,14 @@ -- | A call stack appearing in a trace. -- -- /See:/ 'stackTrace' smart constructor.-data StackTrace = StackTrace'+data StackTrace =+  StackTrace'     { _stStackTraceHashId :: !(Maybe (Textual Int64))     , _stStackFrames      :: !(Maybe StackFrames)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'StackTrace' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -737,11 +759,9 @@ stackTrace     :: StackTrace stackTrace =-    StackTrace'-    { _stStackTraceHashId = Nothing-    , _stStackFrames = Nothing-    }+  StackTrace' {_stStackTraceHashId = Nothing, _stStackFrames = Nothing} + -- | The hash ID is used to conserve network bandwidth for duplicate stack -- traces within a single trace. Often multiple spans will have identical -- stack traces. The first occurrence of a stack trace should contain both@@ -777,10 +797,13 @@ -- | The request message for the \`BatchWriteSpans\` method. -- -- /See:/ 'batchWriteSpansRequest' smart constructor.-newtype BatchWriteSpansRequest = BatchWriteSpansRequest'+newtype BatchWriteSpansRequest =+  BatchWriteSpansRequest'     { _bwsrSpans :: Maybe [Span]-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'BatchWriteSpansRequest' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -788,11 +811,9 @@ -- * 'bwsrSpans' batchWriteSpansRequest     :: BatchWriteSpansRequest-batchWriteSpansRequest =-    BatchWriteSpansRequest'-    { _bwsrSpans = Nothing-    }+batchWriteSpansRequest = BatchWriteSpansRequest' {_bwsrSpans = Nothing} + -- | A list of new spans. The span names must not match existing spans, or -- the results are undefined. bwsrSpans :: Lens' BatchWriteSpansRequest [Span]@@ -815,11 +836,14 @@ -- | A set of attributes, each in the format \`[KEY]:[VALUE]\`. -- -- /See:/ 'attributes' smart constructor.-data Attributes = Attributes'+data Attributes =+  Attributes'     { _aDroppedAttributesCount :: !(Maybe (Textual Int32))     , _aAttributeMap           :: !(Maybe AttributesAttributeMap)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Attributes' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -830,11 +854,9 @@ attributes     :: Attributes attributes =-    Attributes'-    { _aDroppedAttributesCount = Nothing-    , _aAttributeMap = Nothing-    }+  Attributes' {_aDroppedAttributesCount = Nothing, _aAttributeMap = Nothing} + -- | The number of attributes that were discarded. Attributes can be -- discarded because their keys are too long or because there are too many -- attributes. If this value is 0 then all attributes are valid.@@ -873,11 +895,14 @@ -- | Binary module. -- -- /See:/ 'module'' smart constructor.-data Module = Module'+data Module =+  Module'     { _mBuildId :: !(Maybe TruncatableString)     , _mModule  :: !(Maybe TruncatableString)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Module' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -887,12 +912,9 @@ -- * 'mModule' module'     :: Module-module' =-    Module'-    { _mBuildId = Nothing-    , _mModule = Nothing-    }+module' = Module' {_mBuildId = Nothing, _mModule = Nothing} + -- | A unique identifier for the module, usually a hash of its contents (up -- to 128 bytes). mBuildId :: Lens' Module (Maybe TruncatableString)@@ -921,12 +943,15 @@ -- pairs, or details of a message sent\/received between Spans. -- -- /See:/ 'timeEvents' smart constructor.-data TimeEvents = TimeEvents'+data TimeEvents =+  TimeEvents'     { _teDroppedMessageEventsCount :: !(Maybe (Textual Int32))     , _teDroppedAnnotationsCount   :: !(Maybe (Textual Int32))     , _teTimeEvent                 :: !(Maybe [TimeEvent])-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'TimeEvents' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -939,12 +964,13 @@ timeEvents     :: TimeEvents timeEvents =-    TimeEvents'+  TimeEvents'     { _teDroppedMessageEventsCount = Nothing     , _teDroppedAnnotationsCount = Nothing     , _teTimeEvent = Nothing     } + -- | The number of dropped message events in all the included time events. If -- the value is 0, then no message events were dropped. teDroppedMessageEventsCount :: Lens' TimeEvents (Maybe Int32)@@ -990,11 +1016,14 @@ -- | A collection of stack frames, which can be truncated. -- -- /See:/ 'stackFrames' smart constructor.-data StackFrames = StackFrames'+data StackFrames =+  StackFrames'     { _sfDroppedFramesCount :: !(Maybe (Textual Int32))     , _sfFrame              :: !(Maybe [StackFrame])-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'StackFrames' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1004,12 +1033,9 @@ -- * 'sfFrame' stackFrames     :: StackFrames-stackFrames =-    StackFrames'-    { _sfDroppedFramesCount = Nothing-    , _sfFrame = Nothing-    }+stackFrames = StackFrames' {_sfDroppedFramesCount = Nothing, _sfFrame = Nothing} + -- | The number of stack frames that were dropped because there were too many -- stack frames. If this value is 0, then no stack frames were dropped. sfDroppedFramesCount :: Lens' StackFrames (Maybe Int32)@@ -1042,7 +1068,8 @@ -- | Represents a single stack frame in a stack trace. -- -- /See:/ 'stackFrame' smart constructor.-data StackFrame = StackFrame'+data StackFrame =+  StackFrame'     { _sfLoadModule           :: !(Maybe Module)     , _sfOriginalFunctionName :: !(Maybe TruncatableString)     , _sfLineNumber           :: !(Maybe (Textual Int64))@@ -1050,8 +1077,10 @@     , _sfFunctionName         :: !(Maybe TruncatableString)     , _sfColumnNumber         :: !(Maybe (Textual Int64))     , _sfFileName             :: !(Maybe TruncatableString)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'StackFrame' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1072,7 +1101,7 @@ stackFrame     :: StackFrame stackFrame =-    StackFrame'+  StackFrame'     { _sfLoadModule = Nothing     , _sfOriginalFunctionName = Nothing     , _sfLineNumber = Nothing@@ -1082,6 +1111,7 @@     , _sfFileName = Nothing     } + -- | The binary module from where the code was loaded. sfLoadModule :: Lens' StackFrame (Maybe Module) sfLoadModule@@ -1158,11 +1188,14 @@ -- the same or different trace. -- -- /See:/ 'links' smart constructor.-data Links = Links'+data Links =+  Links'     { _lDroppedLinksCount :: !(Maybe (Textual Int32))     , _lLink              :: !(Maybe [Link])-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Links' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1172,12 +1205,9 @@ -- * 'lLink' links     :: Links-links =-    Links'-    { _lDroppedLinksCount = Nothing-    , _lLink = Nothing-    }+links = Links' {_lDroppedLinksCount = Nothing, _lLink = Nothing} + -- | The number of dropped links after the maximum size was enforced. If this -- value is 0, then no links were dropped. lDroppedLinksCount :: Lens' Links (Maybe Int32)@@ -1210,12 +1240,15 @@ -- | A time-stamped annotation or message event in the Span. -- -- /See:/ 'timeEvent' smart constructor.-data TimeEvent = TimeEvent'+data TimeEvent =+  TimeEvent'     { _teMessageEvent :: !(Maybe MessageEvent)     , _teAnnotation   :: !(Maybe Annotation)     , _teTime         :: !(Maybe DateTime')-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'TimeEvent' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1228,11 +1261,9 @@ timeEvent     :: TimeEvent timeEvent =-    TimeEvent'-    { _teMessageEvent = Nothing-    , _teAnnotation = Nothing-    , _teTime = Nothing-    }+  TimeEvent'+    {_teMessageEvent = Nothing, _teAnnotation = Nothing, _teTime = Nothing}+  -- | An event describing a message sent\/received between Spans. teMessageEvent :: Lens' TimeEvent (Maybe MessageEvent)
gen/Network/Google/Resource/CloudTrace/Projects/Traces/BatchWrite.hs view
@@ -65,7 +65,8 @@ -- spans. -- -- /See:/ 'projectsTracesBatchWrite' smart constructor.-data ProjectsTracesBatchWrite = ProjectsTracesBatchWrite'+data ProjectsTracesBatchWrite =+  ProjectsTracesBatchWrite'     { _ptbwXgafv          :: !(Maybe Xgafv)     , _ptbwUploadProtocol :: !(Maybe Text)     , _ptbwAccessToken    :: !(Maybe Text)@@ -73,8 +74,10 @@     , _ptbwPayload        :: !BatchWriteSpansRequest     , _ptbwName           :: !Text     , _ptbwCallback       :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsTracesBatchWrite' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -97,7 +100,7 @@     -> Text -- ^ 'ptbwName'     -> ProjectsTracesBatchWrite projectsTracesBatchWrite pPtbwPayload_ pPtbwName_ =-    ProjectsTracesBatchWrite'+  ProjectsTracesBatchWrite'     { _ptbwXgafv = Nothing     , _ptbwUploadProtocol = Nothing     , _ptbwAccessToken = Nothing@@ -106,6 +109,7 @@     , _ptbwName = pPtbwName_     , _ptbwCallback = Nothing     }+  -- | V1 error format. ptbwXgafv :: Lens' ProjectsTracesBatchWrite (Maybe Xgafv)
gen/Network/Google/Resource/CloudTrace/Projects/Traces/Spans/CreateSpan.hs view
@@ -61,7 +61,8 @@ -- | Creates a new span. -- -- /See:/ 'projectsTracesSpansCreateSpan' smart constructor.-data ProjectsTracesSpansCreateSpan = ProjectsTracesSpansCreateSpan'+data ProjectsTracesSpansCreateSpan =+  ProjectsTracesSpansCreateSpan'     { _ptscsXgafv          :: !(Maybe Xgafv)     , _ptscsUploadProtocol :: !(Maybe Text)     , _ptscsAccessToken    :: !(Maybe Text)@@ -69,8 +70,10 @@     , _ptscsPayload        :: !Span     , _ptscsName           :: !Text     , _ptscsCallback       :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsTracesSpansCreateSpan' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -93,7 +96,7 @@     -> Text -- ^ 'ptscsName'     -> ProjectsTracesSpansCreateSpan projectsTracesSpansCreateSpan pPtscsPayload_ pPtscsName_ =-    ProjectsTracesSpansCreateSpan'+  ProjectsTracesSpansCreateSpan'     { _ptscsXgafv = Nothing     , _ptscsUploadProtocol = Nothing     , _ptscsAccessToken = Nothing@@ -102,6 +105,7 @@     , _ptscsName = pPtscsName_     , _ptscsCallback = Nothing     }+  -- | V1 error format. ptscsXgafv :: Lens' ProjectsTracesSpansCreateSpan (Maybe Xgafv)
gogol-cloudtrace.cabal view
@@ -1,5 +1,5 @@ name:                  gogol-cloudtrace-version:               0.4.0+version:               0.5.0 synopsis:              Google Stackdriver Trace SDK. homepage:              https://github.com/brendanhay/gogol bug-reports:           https://github.com/brendanhay/gogol/issues@@ -48,5 +48,5 @@         , Network.Google.CloudTrace.Types.Sum      build-depends:-          gogol-core == 0.4.0.*+          gogol-core == 0.5.0.*         , base       >= 4.7 && < 5