gogol-debugger 0.1.1 → 0.2.0
raw patch · 14 files changed
+270/−46 lines, 14 filesdep ~gogol-corePVP ok
version bump matches the API change (PVP)
Dependency ranges changed: gogol-core
API changes (from Hackage documentation)
+ Network.Google.Debugger: Any :: AliasContextKind
+ Network.Google.Debugger: BreakpointAge :: StatusMessageRefersTo
+ Network.Google.Debugger: BreakpointCondition :: StatusMessageRefersTo
+ Network.Google.Debugger: BreakpointExpression :: StatusMessageRefersTo
+ Network.Google.Debugger: BreakpointSourceLocation :: StatusMessageRefersTo
+ Network.Google.Debugger: Capture :: BreakpointAction
+ Network.Google.Debugger: Error' :: BreakpointLogLevel
+ Network.Google.Debugger: Fixed :: AliasContextKind
+ Network.Google.Debugger: Info :: BreakpointLogLevel
+ Network.Google.Debugger: Log :: BreakpointAction
+ Network.Google.Debugger: Movable :: AliasContextKind
+ Network.Google.Debugger: Other :: AliasContextKind
+ Network.Google.Debugger: Unspecified :: StatusMessageRefersTo
+ Network.Google.Debugger: VariableName :: StatusMessageRefersTo
+ Network.Google.Debugger: VariableValue :: StatusMessageRefersTo
+ Network.Google.Debugger: Warning :: BreakpointLogLevel
+ Network.Google.Debugger: X1 :: Xgafv
+ Network.Google.Debugger: X2 :: Xgafv
+ Network.Google.Debugger: data AliasContextKind
+ Network.Google.Debugger: data BreakpointAction
+ Network.Google.Debugger: data BreakpointLogLevel
+ Network.Google.Debugger: data StatusMessageRefersTo
+ Network.Google.Debugger: data Xgafv
+ Network.Google.Debugger.Types: Any :: AliasContextKind
+ Network.Google.Debugger.Types: BreakpointAge :: StatusMessageRefersTo
+ Network.Google.Debugger.Types: BreakpointCondition :: StatusMessageRefersTo
+ Network.Google.Debugger.Types: BreakpointExpression :: StatusMessageRefersTo
+ Network.Google.Debugger.Types: BreakpointSourceLocation :: StatusMessageRefersTo
+ Network.Google.Debugger.Types: Capture :: BreakpointAction
+ Network.Google.Debugger.Types: Error' :: BreakpointLogLevel
+ Network.Google.Debugger.Types: Fixed :: AliasContextKind
+ Network.Google.Debugger.Types: Info :: BreakpointLogLevel
+ Network.Google.Debugger.Types: Log :: BreakpointAction
+ Network.Google.Debugger.Types: Movable :: AliasContextKind
+ Network.Google.Debugger.Types: Other :: AliasContextKind
+ Network.Google.Debugger.Types: Unspecified :: StatusMessageRefersTo
+ Network.Google.Debugger.Types: VariableName :: StatusMessageRefersTo
+ Network.Google.Debugger.Types: VariableValue :: StatusMessageRefersTo
+ Network.Google.Debugger.Types: Warning :: BreakpointLogLevel
+ Network.Google.Debugger.Types: X1 :: Xgafv
+ Network.Google.Debugger.Types: X2 :: Xgafv
+ Network.Google.Debugger.Types: data AliasContextKind
+ Network.Google.Debugger.Types: data BreakpointAction
+ Network.Google.Debugger.Types: data BreakpointLogLevel
+ Network.Google.Debugger.Types: data StatusMessageRefersTo
+ Network.Google.Debugger.Types: data Xgafv
- Network.Google.Debugger: acKind :: Lens' AliasContext (Maybe Text)
+ Network.Google.Debugger: acKind :: Lens' AliasContext (Maybe AliasContextKind)
- Network.Google.Debugger: bAction :: Lens' Breakpoint (Maybe Text)
+ Network.Google.Debugger: bAction :: Lens' Breakpoint (Maybe BreakpointAction)
- Network.Google.Debugger: bCreateTime :: Lens' Breakpoint (Maybe Text)
+ Network.Google.Debugger: bCreateTime :: Lens' Breakpoint (Maybe UTCTime)
- Network.Google.Debugger: bFinalTime :: Lens' Breakpoint (Maybe Text)
+ Network.Google.Debugger: bFinalTime :: Lens' Breakpoint (Maybe UTCTime)
- Network.Google.Debugger: bLogLevel :: Lens' Breakpoint (Maybe Text)
+ Network.Google.Debugger: bLogLevel :: Lens' Breakpoint (Maybe BreakpointLogLevel)
- Network.Google.Debugger: smRefersTo :: Lens' StatusMessage (Maybe Text)
+ Network.Google.Debugger: smRefersTo :: Lens' StatusMessage (Maybe StatusMessageRefersTo)
- Network.Google.Debugger.Types: acKind :: Lens' AliasContext (Maybe Text)
+ Network.Google.Debugger.Types: acKind :: Lens' AliasContext (Maybe AliasContextKind)
- Network.Google.Debugger.Types: bAction :: Lens' Breakpoint (Maybe Text)
+ Network.Google.Debugger.Types: bAction :: Lens' Breakpoint (Maybe BreakpointAction)
- Network.Google.Debugger.Types: bCreateTime :: Lens' Breakpoint (Maybe Text)
+ Network.Google.Debugger.Types: bCreateTime :: Lens' Breakpoint (Maybe UTCTime)
- Network.Google.Debugger.Types: bFinalTime :: Lens' Breakpoint (Maybe Text)
+ Network.Google.Debugger.Types: bFinalTime :: Lens' Breakpoint (Maybe UTCTime)
- Network.Google.Debugger.Types: bLogLevel :: Lens' Breakpoint (Maybe Text)
+ Network.Google.Debugger.Types: bLogLevel :: Lens' Breakpoint (Maybe BreakpointLogLevel)
- Network.Google.Debugger.Types: smRefersTo :: Lens' StatusMessage (Maybe Text)
+ Network.Google.Debugger.Types: smRefersTo :: Lens' StatusMessage (Maybe StatusMessageRefersTo)
- Network.Google.Resource.CloudDebugger.Controller.Debuggees.Breakpoints.List: cdblXgafv :: Lens' ControllerDebuggeesBreakpointsList (Maybe Text)
+ Network.Google.Resource.CloudDebugger.Controller.Debuggees.Breakpoints.List: cdblXgafv :: Lens' ControllerDebuggeesBreakpointsList (Maybe Xgafv)
- Network.Google.Resource.CloudDebugger.Controller.Debuggees.Breakpoints.List: type ControllerDebuggeesBreakpointsListResource = "v2" :> ("controller" :> ("debuggees" :> (Capture "debuggeeId" Text :> ("breakpoints" :> (QueryParam "$.xgafv" Text :> (QueryParam "upload_protocol" Text :> (QueryParam "pp" Bool :> (QueryParam "access_token" Text :> (QueryParam "uploadType" Text :> (QueryParam "successOnTimeout" Bool :> (QueryParam "bearer_token" Text :> (QueryParam "waitToken" Text :> (QueryParam "callback" Text :> (QueryParam "alt" AltJSON :> Get '[JSON] ListActiveBreakpointsResponse))))))))))))))
+ Network.Google.Resource.CloudDebugger.Controller.Debuggees.Breakpoints.List: type ControllerDebuggeesBreakpointsListResource = "v2" :> ("controller" :> ("debuggees" :> (Capture "debuggeeId" Text :> ("breakpoints" :> (QueryParam "$.xgafv" Xgafv :> (QueryParam "upload_protocol" Text :> (QueryParam "pp" Bool :> (QueryParam "access_token" Text :> (QueryParam "uploadType" Text :> (QueryParam "successOnTimeout" Bool :> (QueryParam "bearer_token" Text :> (QueryParam "waitToken" Text :> (QueryParam "callback" Text :> (QueryParam "alt" AltJSON :> Get '[JSON] ListActiveBreakpointsResponse))))))))))))))
- Network.Google.Resource.CloudDebugger.Controller.Debuggees.Breakpoints.Update: cdbuXgafv :: Lens' ControllerDebuggeesBreakpointsUpdate (Maybe Text)
+ Network.Google.Resource.CloudDebugger.Controller.Debuggees.Breakpoints.Update: cdbuXgafv :: Lens' ControllerDebuggeesBreakpointsUpdate (Maybe Xgafv)
- Network.Google.Resource.CloudDebugger.Controller.Debuggees.Breakpoints.Update: type ControllerDebuggeesBreakpointsUpdateResource = "v2" :> ("controller" :> ("debuggees" :> (Capture "debuggeeId" Text :> ("breakpoints" :> (Capture "id" Text :> (QueryParam "$.xgafv" Text :> (QueryParam "upload_protocol" Text :> (QueryParam "pp" Bool :> (QueryParam "access_token" Text :> (QueryParam "uploadType" Text :> (QueryParam "bearer_token" Text :> (QueryParam "callback" Text :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] UpdateActiveBreakpointRequest :> Put '[JSON] UpdateActiveBreakpointResponse))))))))))))))
+ Network.Google.Resource.CloudDebugger.Controller.Debuggees.Breakpoints.Update: type ControllerDebuggeesBreakpointsUpdateResource = "v2" :> ("controller" :> ("debuggees" :> (Capture "debuggeeId" Text :> ("breakpoints" :> (Capture "id" Text :> (QueryParam "$.xgafv" Xgafv :> (QueryParam "upload_protocol" Text :> (QueryParam "pp" Bool :> (QueryParam "access_token" Text :> (QueryParam "uploadType" Text :> (QueryParam "bearer_token" Text :> (QueryParam "callback" Text :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] UpdateActiveBreakpointRequest :> Put '[JSON] UpdateActiveBreakpointResponse))))))))))))))
- Network.Google.Resource.CloudDebugger.Controller.Debuggees.Register: cdrXgafv :: Lens' ControllerDebuggeesRegister (Maybe Text)
+ Network.Google.Resource.CloudDebugger.Controller.Debuggees.Register: cdrXgafv :: Lens' ControllerDebuggeesRegister (Maybe Xgafv)
- Network.Google.Resource.CloudDebugger.Controller.Debuggees.Register: type ControllerDebuggeesRegisterResource = "v2" :> ("controller" :> ("debuggees" :> ("register" :> (QueryParam "$.xgafv" Text :> (QueryParam "upload_protocol" Text :> (QueryParam "pp" Bool :> (QueryParam "access_token" Text :> (QueryParam "uploadType" Text :> (QueryParam "bearer_token" Text :> (QueryParam "callback" Text :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] RegisterDebuggeeRequest :> Post '[JSON] RegisterDebuggeeResponse))))))))))))
+ Network.Google.Resource.CloudDebugger.Controller.Debuggees.Register: type ControllerDebuggeesRegisterResource = "v2" :> ("controller" :> ("debuggees" :> ("register" :> (QueryParam "$.xgafv" Xgafv :> (QueryParam "upload_protocol" Text :> (QueryParam "pp" Bool :> (QueryParam "access_token" Text :> (QueryParam "uploadType" Text :> (QueryParam "bearer_token" Text :> (QueryParam "callback" Text :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] RegisterDebuggeeRequest :> Post '[JSON] RegisterDebuggeeResponse))))))))))))
- Network.Google.Resource.CloudDebugger.Debugger.Debuggees.Breakpoints.Delete: ddbdXgafv :: Lens' DebuggerDebuggeesBreakpointsDelete (Maybe Text)
+ Network.Google.Resource.CloudDebugger.Debugger.Debuggees.Breakpoints.Delete: ddbdXgafv :: Lens' DebuggerDebuggeesBreakpointsDelete (Maybe Xgafv)
- Network.Google.Resource.CloudDebugger.Debugger.Debuggees.Breakpoints.Delete: type DebuggerDebuggeesBreakpointsDeleteResource = "v2" :> ("debugger" :> ("debuggees" :> (Capture "debuggeeId" Text :> ("breakpoints" :> (Capture "breakpointId" Text :> (QueryParam "$.xgafv" Text :> (QueryParam "upload_protocol" Text :> (QueryParam "pp" Bool :> (QueryParam "access_token" Text :> (QueryParam "uploadType" Text :> (QueryParam "bearer_token" Text :> (QueryParam "clientVersion" Text :> (QueryParam "callback" Text :> (QueryParam "alt" AltJSON :> Delete '[JSON] Empty))))))))))))))
+ Network.Google.Resource.CloudDebugger.Debugger.Debuggees.Breakpoints.Delete: type DebuggerDebuggeesBreakpointsDeleteResource = "v2" :> ("debugger" :> ("debuggees" :> (Capture "debuggeeId" Text :> ("breakpoints" :> (Capture "breakpointId" Text :> (QueryParam "$.xgafv" Xgafv :> (QueryParam "upload_protocol" Text :> (QueryParam "pp" Bool :> (QueryParam "access_token" Text :> (QueryParam "uploadType" Text :> (QueryParam "bearer_token" Text :> (QueryParam "clientVersion" Text :> (QueryParam "callback" Text :> (QueryParam "alt" AltJSON :> Delete '[JSON] Empty))))))))))))))
- Network.Google.Resource.CloudDebugger.Debugger.Debuggees.Breakpoints.Get: ddbgXgafv :: Lens' DebuggerDebuggeesBreakpointsGet (Maybe Text)
+ Network.Google.Resource.CloudDebugger.Debugger.Debuggees.Breakpoints.Get: ddbgXgafv :: Lens' DebuggerDebuggeesBreakpointsGet (Maybe Xgafv)
- Network.Google.Resource.CloudDebugger.Debugger.Debuggees.Breakpoints.Get: type DebuggerDebuggeesBreakpointsGetResource = "v2" :> ("debugger" :> ("debuggees" :> (Capture "debuggeeId" Text :> ("breakpoints" :> (Capture "breakpointId" Text :> (QueryParam "$.xgafv" Text :> (QueryParam "upload_protocol" Text :> (QueryParam "pp" Bool :> (QueryParam "access_token" Text :> (QueryParam "uploadType" Text :> (QueryParam "bearer_token" Text :> (QueryParam "clientVersion" Text :> (QueryParam "callback" Text :> (QueryParam "alt" AltJSON :> Get '[JSON] GetBreakpointResponse))))))))))))))
+ Network.Google.Resource.CloudDebugger.Debugger.Debuggees.Breakpoints.Get: type DebuggerDebuggeesBreakpointsGetResource = "v2" :> ("debugger" :> ("debuggees" :> (Capture "debuggeeId" Text :> ("breakpoints" :> (Capture "breakpointId" Text :> (QueryParam "$.xgafv" Xgafv :> (QueryParam "upload_protocol" Text :> (QueryParam "pp" Bool :> (QueryParam "access_token" Text :> (QueryParam "uploadType" Text :> (QueryParam "bearer_token" Text :> (QueryParam "clientVersion" Text :> (QueryParam "callback" Text :> (QueryParam "alt" AltJSON :> Get '[JSON] GetBreakpointResponse))))))))))))))
- Network.Google.Resource.CloudDebugger.Debugger.Debuggees.Breakpoints.List: ddblXgafv :: Lens' DebuggerDebuggeesBreakpointsList (Maybe Text)
+ Network.Google.Resource.CloudDebugger.Debugger.Debuggees.Breakpoints.List: ddblXgafv :: Lens' DebuggerDebuggeesBreakpointsList (Maybe Xgafv)
- Network.Google.Resource.CloudDebugger.Debugger.Debuggees.Breakpoints.List: type DebuggerDebuggeesBreakpointsListResource = "v2" :> ("debugger" :> ("debuggees" :> (Capture "debuggeeId" Text :> ("breakpoints" :> (QueryParam "$.xgafv" Text :> (QueryParam "includeInactive" Bool :> (QueryParam "upload_protocol" Text :> (QueryParam "pp" Bool :> (QueryParam "access_token" Text :> (QueryParam "action.value" Text :> (QueryParam "uploadType" Text :> (QueryParam "stripResults" Bool :> (QueryParam "bearer_token" Text :> (QueryParam "includeAllUsers" Bool :> (QueryParam "waitToken" Text :> (QueryParam "clientVersion" Text :> (QueryParam "callback" Text :> (QueryParam "alt" AltJSON :> Get '[JSON] ListBreakpointsResponse))))))))))))))))))
+ Network.Google.Resource.CloudDebugger.Debugger.Debuggees.Breakpoints.List: type DebuggerDebuggeesBreakpointsListResource = "v2" :> ("debugger" :> ("debuggees" :> (Capture "debuggeeId" Text :> ("breakpoints" :> (QueryParam "$.xgafv" Xgafv :> (QueryParam "includeInactive" Bool :> (QueryParam "upload_protocol" Text :> (QueryParam "pp" Bool :> (QueryParam "access_token" Text :> (QueryParam "action.value" Text :> (QueryParam "uploadType" Text :> (QueryParam "stripResults" Bool :> (QueryParam "bearer_token" Text :> (QueryParam "includeAllUsers" Bool :> (QueryParam "waitToken" Text :> (QueryParam "clientVersion" Text :> (QueryParam "callback" Text :> (QueryParam "alt" AltJSON :> Get '[JSON] ListBreakpointsResponse))))))))))))))))))
- Network.Google.Resource.CloudDebugger.Debugger.Debuggees.Breakpoints.Set: ddbsXgafv :: Lens' DebuggerDebuggeesBreakpointsSet (Maybe Text)
+ Network.Google.Resource.CloudDebugger.Debugger.Debuggees.Breakpoints.Set: ddbsXgafv :: Lens' DebuggerDebuggeesBreakpointsSet (Maybe Xgafv)
- Network.Google.Resource.CloudDebugger.Debugger.Debuggees.Breakpoints.Set: type DebuggerDebuggeesBreakpointsSetResource = "v2" :> ("debugger" :> ("debuggees" :> (Capture "debuggeeId" Text :> ("breakpoints" :> ("set" :> (QueryParam "$.xgafv" Text :> (QueryParam "upload_protocol" Text :> (QueryParam "pp" Bool :> (QueryParam "access_token" Text :> (QueryParam "uploadType" Text :> (QueryParam "bearer_token" Text :> (QueryParam "clientVersion" Text :> (QueryParam "callback" Text :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Breakpoint :> Post '[JSON] SetBreakpointResponse)))))))))))))))
+ Network.Google.Resource.CloudDebugger.Debugger.Debuggees.Breakpoints.Set: type DebuggerDebuggeesBreakpointsSetResource = "v2" :> ("debugger" :> ("debuggees" :> (Capture "debuggeeId" Text :> ("breakpoints" :> ("set" :> (QueryParam "$.xgafv" Xgafv :> (QueryParam "upload_protocol" Text :> (QueryParam "pp" Bool :> (QueryParam "access_token" Text :> (QueryParam "uploadType" Text :> (QueryParam "bearer_token" Text :> (QueryParam "clientVersion" Text :> (QueryParam "callback" Text :> (QueryParam "alt" AltJSON :> (ReqBody '[JSON] Breakpoint :> Post '[JSON] SetBreakpointResponse)))))))))))))))
- Network.Google.Resource.CloudDebugger.Debugger.Debuggees.List: ddlXgafv :: Lens' DebuggerDebuggeesList (Maybe Text)
+ Network.Google.Resource.CloudDebugger.Debugger.Debuggees.List: ddlXgafv :: Lens' DebuggerDebuggeesList (Maybe Xgafv)
- Network.Google.Resource.CloudDebugger.Debugger.Debuggees.List: type DebuggerDebuggeesListResource = "v2" :> ("debugger" :> ("debuggees" :> (QueryParam "$.xgafv" Text :> (QueryParam "includeInactive" Bool :> (QueryParam "upload_protocol" Text :> (QueryParam "project" Text :> (QueryParam "pp" Bool :> (QueryParam "access_token" Text :> (QueryParam "uploadType" Text :> (QueryParam "bearer_token" Text :> (QueryParam "clientVersion" Text :> (QueryParam "callback" Text :> (QueryParam "alt" AltJSON :> Get '[JSON] ListDebuggeesResponse)))))))))))))
+ Network.Google.Resource.CloudDebugger.Debugger.Debuggees.List: type DebuggerDebuggeesListResource = "v2" :> ("debugger" :> ("debuggees" :> (QueryParam "$.xgafv" Xgafv :> (QueryParam "includeInactive" Bool :> (QueryParam "upload_protocol" Text :> (QueryParam "project" Text :> (QueryParam "pp" Bool :> (QueryParam "access_token" Text :> (QueryParam "uploadType" Text :> (QueryParam "bearer_token" Text :> (QueryParam "clientVersion" Text :> (QueryParam "callback" Text :> (QueryParam "alt" AltJSON :> Get '[JSON] ListDebuggeesResponse)))))))))))))
Files
- README.md +1/−1
- gen/Network/Google/Debugger.hs +15/−0
- gen/Network/Google/Debugger/Types.hs +15/−0
- gen/Network/Google/Debugger/Types/Product.hs +21/−17
- gen/Network/Google/Debugger/Types/Sum.hs +190/−0
- gen/Network/Google/Resource/CloudDebugger/Controller/Debuggees/Breakpoints/List.hs +3/−3
- gen/Network/Google/Resource/CloudDebugger/Controller/Debuggees/Breakpoints/Update.hs +3/−3
- gen/Network/Google/Resource/CloudDebugger/Controller/Debuggees/Register.hs +3/−3
- gen/Network/Google/Resource/CloudDebugger/Debugger/Debuggees/Breakpoints/Delete.hs +3/−3
- gen/Network/Google/Resource/CloudDebugger/Debugger/Debuggees/Breakpoints/Get.hs +3/−3
- gen/Network/Google/Resource/CloudDebugger/Debugger/Debuggees/Breakpoints/List.hs +5/−5
- gen/Network/Google/Resource/CloudDebugger/Debugger/Debuggees/Breakpoints/Set.hs +3/−3
- gen/Network/Google/Resource/CloudDebugger/Debugger/Debuggees/List.hs +3/−3
- gogol-debugger.cabal +2/−2
README.md view
@@ -8,7 +8,7 @@ ## Version -`0.1.1`+`0.2.0` ## Description
gen/Network/Google/Debugger.hs view
@@ -161,6 +161,12 @@ , lbrNextWaitToken , lbrBreakpoints + -- ** StatusMessageRefersTo+ , StatusMessageRefersTo (..)++ -- ** BreakpointLogLevel+ , BreakpointLogLevel (..)+ -- ** ListDebuggeesResponse , ListDebuggeesResponse , listDebuggeesResponse@@ -178,6 +184,12 @@ , smIsError , smDescription + -- ** Xgafv+ , Xgafv (..)++ -- ** BreakpointAction+ , BreakpointAction (..)+ -- ** ListActiveBreakpointsResponse , ListActiveBreakpointsResponse , listActiveBreakpointsResponse@@ -255,6 +267,9 @@ , aliasContext , acKind , acName++ -- ** AliasContextKind+ , AliasContextKind (..) -- ** CloudWorkspaceId , CloudWorkspaceId
gen/Network/Google/Debugger/Types.hs view
@@ -127,6 +127,12 @@ , lbrNextWaitToken , lbrBreakpoints + -- * StatusMessageRefersTo+ , StatusMessageRefersTo (..)++ -- * BreakpointLogLevel+ , BreakpointLogLevel (..)+ -- * ListDebuggeesResponse , ListDebuggeesResponse , listDebuggeesResponse@@ -144,6 +150,12 @@ , smIsError , smDescription + -- * Xgafv+ , Xgafv (..)++ -- * BreakpointAction+ , BreakpointAction (..)+ -- * ListActiveBreakpointsResponse , ListActiveBreakpointsResponse , listActiveBreakpointsResponse@@ -221,6 +233,9 @@ , aliasContext , acKind , acName++ -- * AliasContextKind+ , AliasContextKind (..) -- * CloudWorkspaceId , CloudWorkspaceId
gen/Network/Google/Debugger/Types/Product.hs view
@@ -481,10 +481,10 @@ -- /See:/ 'breakpoint' smart constructor. data Breakpoint = Breakpoint' { _bStatus :: !(Maybe StatusMessage)- , _bLogLevel :: !(Maybe Text)+ , _bLogLevel :: !(Maybe BreakpointLogLevel) , _bLocation :: !(Maybe SourceLocation)- , _bAction :: !(Maybe Text)- , _bFinalTime :: !(Maybe Text)+ , _bAction :: !(Maybe BreakpointAction)+ , _bFinalTime :: !(Maybe DateTime') , _bExpressions :: !(Maybe [Text]) , _bLogMessageFormat :: !(Maybe Text) , _bId :: !(Maybe Text)@@ -494,7 +494,7 @@ , _bStackFrames :: !(Maybe [StackFrame]) , _bCondition :: !(Maybe Text) , _bEvaluatedExpressions :: !(Maybe [Variable])- , _bCreateTime :: !(Maybe Text)+ , _bCreateTime :: !(Maybe DateTime') , _bIsFinalState :: !(Maybe Bool) } deriving (Eq,Show,Data,Typeable,Generic) @@ -567,7 +567,7 @@ bStatus = lens _bStatus (\ s a -> s{_bStatus = a}) -- | Indicates the severity of the log. Only relevant when action is \`LOG\`.-bLogLevel :: Lens' Breakpoint (Maybe Text)+bLogLevel :: Lens' Breakpoint (Maybe BreakpointLogLevel) bLogLevel = lens _bLogLevel (\ s a -> s{_bLogLevel = a}) @@ -578,14 +578,15 @@ -- | Action that the agent should perform when the code at the breakpoint -- location is hit.-bAction :: Lens' Breakpoint (Maybe Text)+bAction :: Lens' Breakpoint (Maybe BreakpointAction) bAction = lens _bAction (\ s a -> s{_bAction = a}) -- | Time this breakpoint was finalized as seen by the server in seconds -- resolution.-bFinalTime :: Lens' Breakpoint (Maybe Text)+bFinalTime :: Lens' Breakpoint (Maybe UTCTime) bFinalTime- = lens _bFinalTime (\ s a -> s{_bFinalTime = a})+ = lens _bFinalTime (\ s a -> s{_bFinalTime = a}) .+ mapping _DateTime -- | List of read-only expressions to evaluate at the breakpoint location. -- The expressions are composed using expressions in the programming@@ -669,9 +670,10 @@ . _Coerce -- | Time this breakpoint was created by the server in seconds resolution.-bCreateTime :: Lens' Breakpoint (Maybe Text)+bCreateTime :: Lens' Breakpoint (Maybe UTCTime) bCreateTime- = lens _bCreateTime (\ s a -> s{_bCreateTime = a})+ = lens _bCreateTime (\ s a -> s{_bCreateTime = a}) .+ mapping _DateTime -- | When true, indicates that this is a final result and the breakpoint -- state will not change from here on.@@ -807,7 +809,7 @@ -- Captured variable name: \"p\", type: \"T*\", value: \"0x00400400\" -- status { is_error: true, description { format: \"unavailable\" } } } The -- status should describe the reason for the missing value, such as \`\`,--- \`\`, \` \`. Note that a null pointer should not have members. 5) An+-- \`\`, \`\`. Note that a null pointer should not have members. 5) An -- unnamed value: int* p = new int(7); { \/\/ Captured variable name: -- \"p\", value: \"0x00500500\", type: \"int*\", members { value: \"7\", -- type: \"int\" } } 6) An unnamed pointer where the pointee was not@@ -968,8 +970,10 @@ = lens _lbrNextWaitToken (\ s a -> s{_lbrNextWaitToken = a}) --- | List of all breakpoints with complete state. The fields \`id\` and--- \`location\` are guaranteed to be set on each breakpoint.+-- | List of breakpoints matching the request. The fields \`id\` and+-- \`location\` are guaranteed to be set on each breakpoint. The fields:+-- \`stack_frames\`, \`evaluated_expressions\` and \`variable_table\` are+-- cleared on each breakpoint regardless of it\'s status. lbrBreakpoints :: Lens' ListBreakpointsResponse [Breakpoint] lbrBreakpoints = lens _lbrBreakpoints@@ -1078,7 +1082,7 @@ -- -- /See:/ 'statusMessage' smart constructor. data StatusMessage = StatusMessage'- { _smRefersTo :: !(Maybe Text)+ { _smRefersTo :: !(Maybe StatusMessageRefersTo) , _smIsError :: !(Maybe Bool) , _smDescription :: !(Maybe FormatMessage) } deriving (Eq,Show,Data,Typeable,Generic)@@ -1102,7 +1106,7 @@ } -- | Reference to which the message applies.-smRefersTo :: Lens' StatusMessage (Maybe Text)+smRefersTo :: Lens' StatusMessage (Maybe StatusMessageRefersTo) smRefersTo = lens _smRefersTo (\ s a -> s{_smRefersTo = a}) @@ -1783,7 +1787,7 @@ -- -- /See:/ 'aliasContext' smart constructor. data AliasContext = AliasContext'- { _acKind :: !(Maybe Text)+ { _acKind :: !(Maybe AliasContextKind) , _acName :: !(Maybe Text) } deriving (Eq,Show,Data,Typeable,Generic) @@ -1803,7 +1807,7 @@ } -- | The alias kind.-acKind :: Lens' AliasContext (Maybe Text)+acKind :: Lens' AliasContext (Maybe AliasContextKind) acKind = lens _acKind (\ s a -> s{_acKind = a}) -- | The alias name.
gen/Network/Google/Debugger/Types/Sum.hs view
@@ -17,3 +17,193 @@ module Network.Google.Debugger.Types.Sum where import Network.Google.Prelude++-- | Reference to which the message applies.+data StatusMessageRefersTo+ = Unspecified+ -- ^ @UNSPECIFIED@+ -- Status doesn\'t refer to any particular input.+ | BreakpointSourceLocation+ -- ^ @BREAKPOINT_SOURCE_LOCATION@+ -- Status applies to the breakpoint and is related to its location.+ | BreakpointCondition+ -- ^ @BREAKPOINT_CONDITION@+ -- Status applies to the breakpoint and is related to its condition.+ | BreakpointExpression+ -- ^ @BREAKPOINT_EXPRESSION@+ -- Status applies to the breakpoint and is related to its expressions.+ | BreakpointAge+ -- ^ @BREAKPOINT_AGE@+ -- Status applies to the breakpoint and is related to its age.+ | VariableName+ -- ^ @VARIABLE_NAME@+ -- Status applies to the entire variable.+ | VariableValue+ -- ^ @VARIABLE_VALUE@+ -- Status applies to variable value (variable name is valid).+ deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable StatusMessageRefersTo++instance FromHttpApiData StatusMessageRefersTo where+ parseQueryParam = \case+ "UNSPECIFIED" -> Right Unspecified+ "BREAKPOINT_SOURCE_LOCATION" -> Right BreakpointSourceLocation+ "BREAKPOINT_CONDITION" -> Right BreakpointCondition+ "BREAKPOINT_EXPRESSION" -> Right BreakpointExpression+ "BREAKPOINT_AGE" -> Right BreakpointAge+ "VARIABLE_NAME" -> Right VariableName+ "VARIABLE_VALUE" -> Right VariableValue+ x -> Left ("Unable to parse StatusMessageRefersTo from: " <> x)++instance ToHttpApiData StatusMessageRefersTo where+ toQueryParam = \case+ Unspecified -> "UNSPECIFIED"+ BreakpointSourceLocation -> "BREAKPOINT_SOURCE_LOCATION"+ BreakpointCondition -> "BREAKPOINT_CONDITION"+ BreakpointExpression -> "BREAKPOINT_EXPRESSION"+ BreakpointAge -> "BREAKPOINT_AGE"+ VariableName -> "VARIABLE_NAME"+ VariableValue -> "VARIABLE_VALUE"++instance FromJSON StatusMessageRefersTo where+ parseJSON = parseJSONText "StatusMessageRefersTo"++instance ToJSON StatusMessageRefersTo where+ toJSON = toJSONText++-- | Indicates the severity of the log. Only relevant when action is \`LOG\`.+data BreakpointLogLevel+ = Info+ -- ^ @INFO@+ -- Information log message.+ | Warning+ -- ^ @WARNING@+ -- Warning log message.+ | Error'+ -- ^ @ERROR@+ -- Error log message.+ deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable BreakpointLogLevel++instance FromHttpApiData BreakpointLogLevel where+ parseQueryParam = \case+ "INFO" -> Right Info+ "WARNING" -> Right Warning+ "ERROR" -> Right Error'+ x -> Left ("Unable to parse BreakpointLogLevel from: " <> x)++instance ToHttpApiData BreakpointLogLevel where+ toQueryParam = \case+ Info -> "INFO"+ Warning -> "WARNING"+ Error' -> "ERROR"++instance FromJSON BreakpointLogLevel where+ parseJSON = parseJSONText "BreakpointLogLevel"++instance ToJSON BreakpointLogLevel where+ toJSON = toJSONText++-- | V1 error format.+data Xgafv+ = X1+ -- ^ @1@+ -- v1 error format+ | X2+ -- ^ @2@+ -- v2 error format+ deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable Xgafv++instance FromHttpApiData Xgafv where+ parseQueryParam = \case+ "1" -> Right X1+ "2" -> Right X2+ x -> Left ("Unable to parse Xgafv from: " <> x)++instance ToHttpApiData Xgafv where+ toQueryParam = \case+ X1 -> "1"+ X2 -> "2"++instance FromJSON Xgafv where+ parseJSON = parseJSONText "Xgafv"++instance ToJSON Xgafv where+ toJSON = toJSONText++-- | Action that the agent should perform when the code at the breakpoint+-- location is hit.+data BreakpointAction+ = Capture+ -- ^ @CAPTURE@+ -- Capture stack frame and variables and update the breakpoint. The data is+ -- only captured once. After that the breakpoint is set in a final state.+ | Log+ -- ^ @LOG@+ -- Log each breakpoint hit. The breakpoint remains active until deleted or+ -- expired.+ deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable BreakpointAction++instance FromHttpApiData BreakpointAction where+ parseQueryParam = \case+ "CAPTURE" -> Right Capture+ "LOG" -> Right Log+ x -> Left ("Unable to parse BreakpointAction from: " <> x)++instance ToHttpApiData BreakpointAction where+ toQueryParam = \case+ Capture -> "CAPTURE"+ Log -> "LOG"++instance FromJSON BreakpointAction where+ parseJSON = parseJSONText "BreakpointAction"++instance ToJSON BreakpointAction where+ toJSON = toJSONText++-- | The alias kind.+data AliasContextKind+ = Any+ -- ^ @ANY@+ -- Do not use.+ | Fixed+ -- ^ @FIXED@+ -- Git tag+ | Movable+ -- ^ @MOVABLE@+ -- Git branch+ | Other+ -- ^ @OTHER@+ -- OTHER is used to specify non-standard aliases, those not of the kinds+ -- above. For example, if a Git repo has a ref named \"refs\/foo\/bar\", it+ -- is considered to be of kind OTHER.+ deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)++instance Hashable AliasContextKind++instance FromHttpApiData AliasContextKind where+ parseQueryParam = \case+ "ANY" -> Right Any+ "FIXED" -> Right Fixed+ "MOVABLE" -> Right Movable+ "OTHER" -> Right Other+ x -> Left ("Unable to parse AliasContextKind from: " <> x)++instance ToHttpApiData AliasContextKind where+ toQueryParam = \case+ Any -> "ANY"+ Fixed -> "FIXED"+ Movable -> "MOVABLE"+ Other -> "OTHER"++instance FromJSON AliasContextKind where+ parseJSON = parseJSONText "AliasContextKind"++instance ToJSON AliasContextKind where+ toJSON = toJSONText
gen/Network/Google/Resource/CloudDebugger/Controller/Debuggees/Breakpoints/List.hs view
@@ -65,7 +65,7 @@ "debuggees" :> Capture "debuggeeId" Text :> "breakpoints" :>- QueryParam "$.xgafv" Text :>+ QueryParam "$.xgafv" Xgafv :> QueryParam "upload_protocol" Text :> QueryParam "pp" Bool :> QueryParam "access_token" Text :>@@ -90,7 +90,7 @@ -- -- /See:/ 'controllerDebuggeesBreakpointsList' smart constructor. data ControllerDebuggeesBreakpointsList = ControllerDebuggeesBreakpointsList'- { _cdblXgafv :: !(Maybe Text)+ { _cdblXgafv :: !(Maybe Xgafv) , _cdblUploadProtocol :: !(Maybe Text) , _cdblPp :: !Bool , _cdblAccessToken :: !(Maybe Text)@@ -143,7 +143,7 @@ } -- | V1 error format.-cdblXgafv :: Lens' ControllerDebuggeesBreakpointsList (Maybe Text)+cdblXgafv :: Lens' ControllerDebuggeesBreakpointsList (Maybe Xgafv) cdblXgafv = lens _cdblXgafv (\ s a -> s{_cdblXgafv = a})
gen/Network/Google/Resource/CloudDebugger/Controller/Debuggees/Breakpoints/Update.hs view
@@ -63,7 +63,7 @@ Capture "debuggeeId" Text :> "breakpoints" :> Capture "id" Text :>- QueryParam "$.xgafv" Text :>+ QueryParam "$.xgafv" Xgafv :> QueryParam "upload_protocol" Text :> QueryParam "pp" Bool :> QueryParam "access_token" Text :>@@ -84,7 +84,7 @@ -- -- /See:/ 'controllerDebuggeesBreakpointsUpdate' smart constructor. data ControllerDebuggeesBreakpointsUpdate = ControllerDebuggeesBreakpointsUpdate'- { _cdbuXgafv :: !(Maybe Text)+ { _cdbuXgafv :: !(Maybe Xgafv) , _cdbuUploadProtocol :: !(Maybe Text) , _cdbuPp :: !Bool , _cdbuAccessToken :: !(Maybe Text)@@ -139,7 +139,7 @@ } -- | V1 error format.-cdbuXgafv :: Lens' ControllerDebuggeesBreakpointsUpdate (Maybe Text)+cdbuXgafv :: Lens' ControllerDebuggeesBreakpointsUpdate (Maybe Xgafv) cdbuXgafv = lens _cdbuXgafv (\ s a -> s{_cdbuXgafv = a})
gen/Network/Google/Resource/CloudDebugger/Controller/Debuggees/Register.hs view
@@ -60,7 +60,7 @@ "controller" :> "debuggees" :> "register" :>- QueryParam "$.xgafv" Text :>+ QueryParam "$.xgafv" Xgafv :> QueryParam "upload_protocol" Text :> QueryParam "pp" Bool :> QueryParam "access_token" Text :>@@ -82,7 +82,7 @@ -- -- /See:/ 'controllerDebuggeesRegister' smart constructor. data ControllerDebuggeesRegister = ControllerDebuggeesRegister'- { _cdrXgafv :: !(Maybe Text)+ { _cdrXgafv :: !(Maybe Xgafv) , _cdrUploadProtocol :: !(Maybe Text) , _cdrPp :: !Bool , _cdrAccessToken :: !(Maybe Text)@@ -127,7 +127,7 @@ } -- | V1 error format.-cdrXgafv :: Lens' ControllerDebuggeesRegister (Maybe Text)+cdrXgafv :: Lens' ControllerDebuggeesRegister (Maybe Xgafv) cdrXgafv = lens _cdrXgafv (\ s a -> s{_cdrXgafv = a}) -- | Upload protocol for media (e.g. \"raw\", \"multipart\").
gen/Network/Google/Resource/CloudDebugger/Debugger/Debuggees/Breakpoints/Delete.hs view
@@ -57,7 +57,7 @@ Capture "debuggeeId" Text :> "breakpoints" :> Capture "breakpointId" Text :>- QueryParam "$.xgafv" Text :>+ QueryParam "$.xgafv" Xgafv :> QueryParam "upload_protocol" Text :> QueryParam "pp" Bool :> QueryParam "access_token" Text :>@@ -72,7 +72,7 @@ -- -- /See:/ 'debuggerDebuggeesBreakpointsDelete' smart constructor. data DebuggerDebuggeesBreakpointsDelete = DebuggerDebuggeesBreakpointsDelete'- { _ddbdXgafv :: !(Maybe Text)+ { _ddbdXgafv :: !(Maybe Xgafv) , _ddbdUploadProtocol :: !(Maybe Text) , _ddbdPp :: !Bool , _ddbdAccessToken :: !(Maybe Text)@@ -126,7 +126,7 @@ } -- | V1 error format.-ddbdXgafv :: Lens' DebuggerDebuggeesBreakpointsDelete (Maybe Text)+ddbdXgafv :: Lens' DebuggerDebuggeesBreakpointsDelete (Maybe Xgafv) ddbdXgafv = lens _ddbdXgafv (\ s a -> s{_ddbdXgafv = a})
gen/Network/Google/Resource/CloudDebugger/Debugger/Debuggees/Breakpoints/Get.hs view
@@ -57,7 +57,7 @@ Capture "debuggeeId" Text :> "breakpoints" :> Capture "breakpointId" Text :>- QueryParam "$.xgafv" Text :>+ QueryParam "$.xgafv" Xgafv :> QueryParam "upload_protocol" Text :> QueryParam "pp" Bool :> QueryParam "access_token" Text :>@@ -72,7 +72,7 @@ -- -- /See:/ 'debuggerDebuggeesBreakpointsGet' smart constructor. data DebuggerDebuggeesBreakpointsGet = DebuggerDebuggeesBreakpointsGet'- { _ddbgXgafv :: !(Maybe Text)+ { _ddbgXgafv :: !(Maybe Xgafv) , _ddbgUploadProtocol :: !(Maybe Text) , _ddbgPp :: !Bool , _ddbgAccessToken :: !(Maybe Text)@@ -126,7 +126,7 @@ } -- | V1 error format.-ddbgXgafv :: Lens' DebuggerDebuggeesBreakpointsGet (Maybe Text)+ddbgXgafv :: Lens' DebuggerDebuggeesBreakpointsGet (Maybe Xgafv) ddbgXgafv = lens _ddbgXgafv (\ s a -> s{_ddbgXgafv = a})
gen/Network/Google/Resource/CloudDebugger/Debugger/Debuggees/Breakpoints/List.hs view
@@ -60,7 +60,7 @@ "debuggees" :> Capture "debuggeeId" Text :> "breakpoints" :>- QueryParam "$.xgafv" Text :>+ QueryParam "$.xgafv" Xgafv :> QueryParam "includeInactive" Bool :> QueryParam "upload_protocol" Text :> QueryParam "pp" Bool :>@@ -80,7 +80,7 @@ -- -- /See:/ 'debuggerDebuggeesBreakpointsList' smart constructor. data DebuggerDebuggeesBreakpointsList = DebuggerDebuggeesBreakpointsList'- { _ddblXgafv :: !(Maybe Text)+ { _ddblXgafv :: !(Maybe Xgafv) , _ddblIncludeInactive :: !(Maybe Bool) , _ddblUploadProtocol :: !(Maybe Text) , _ddblPp :: !Bool@@ -149,7 +149,7 @@ } -- | V1 error format.-ddblXgafv :: Lens' DebuggerDebuggeesBreakpointsList (Maybe Text)+ddblXgafv :: Lens' DebuggerDebuggeesBreakpointsList (Maybe Xgafv) ddblXgafv = lens _ddblXgafv (\ s a -> s{_ddblXgafv = a}) @@ -188,8 +188,8 @@ = lens _ddblUploadType (\ s a -> s{_ddblUploadType = a}) --- | When set to \`true\`, the response breakpoints are stripped of the--- results fields: \`stack_frames\`, \`evaluated_expressions\` and+-- | This field is deprecated. The following fields are always stripped out+-- of the result: \`stack_frames\`, \`evaluated_expressions\` and -- \`variable_table\`. ddblStripResults :: Lens' DebuggerDebuggeesBreakpointsList (Maybe Bool) ddblStripResults
gen/Network/Google/Resource/CloudDebugger/Debugger/Debuggees/Breakpoints/Set.hs view
@@ -57,7 +57,7 @@ Capture "debuggeeId" Text :> "breakpoints" :> "set" :>- QueryParam "$.xgafv" Text :>+ QueryParam "$.xgafv" Xgafv :> QueryParam "upload_protocol" Text :> QueryParam "pp" Bool :> QueryParam "access_token" Text :>@@ -73,7 +73,7 @@ -- -- /See:/ 'debuggerDebuggeesBreakpointsSet' smart constructor. data DebuggerDebuggeesBreakpointsSet = DebuggerDebuggeesBreakpointsSet'- { _ddbsXgafv :: !(Maybe Text)+ { _ddbsXgafv :: !(Maybe Xgafv) , _ddbsUploadProtocol :: !(Maybe Text) , _ddbsPp :: !Bool , _ddbsAccessToken :: !(Maybe Text)@@ -127,7 +127,7 @@ } -- | V1 error format.-ddbsXgafv :: Lens' DebuggerDebuggeesBreakpointsSet (Maybe Text)+ddbsXgafv :: Lens' DebuggerDebuggeesBreakpointsSet (Maybe Xgafv) ddbsXgafv = lens _ddbsXgafv (\ s a -> s{_ddbsXgafv = a})
gen/Network/Google/Resource/CloudDebugger/Debugger/Debuggees/List.hs view
@@ -54,7 +54,7 @@ "v2" :> "debugger" :> "debuggees" :>- QueryParam "$.xgafv" Text :>+ QueryParam "$.xgafv" Xgafv :> QueryParam "includeInactive" Bool :> QueryParam "upload_protocol" Text :> QueryParam "project" Text :>@@ -71,7 +71,7 @@ -- -- /See:/ 'debuggerDebuggeesList' smart constructor. data DebuggerDebuggeesList = DebuggerDebuggeesList'- { _ddlXgafv :: !(Maybe Text)+ { _ddlXgafv :: !(Maybe Xgafv) , _ddlIncludeInactive :: !(Maybe Bool) , _ddlUploadProtocol :: !(Maybe Text) , _ddlProject :: !(Maybe Text)@@ -123,7 +123,7 @@ } -- | V1 error format.-ddlXgafv :: Lens' DebuggerDebuggeesList (Maybe Text)+ddlXgafv :: Lens' DebuggerDebuggeesList (Maybe Xgafv) ddlXgafv = lens _ddlXgafv (\ s a -> s{_ddlXgafv = a}) -- | When set to \`true\`, the result includes all debuggees. Otherwise, the
gogol-debugger.cabal view
@@ -1,5 +1,5 @@ name: gogol-debugger-version: 0.1.1+version: 0.2.0 synopsis: Google Stackdriver Debugger SDK. homepage: https://github.com/brendanhay/gogol bug-reports: https://github.com/brendanhay/gogol/issues@@ -50,5 +50,5 @@ , Network.Google.Debugger.Types.Sum build-depends:- gogol-core == 0.1.1.*+ gogol-core == 0.2.0.* , base >= 4.7 && < 5