packages feed

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 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