diff --git a/DESCRIPTION b/DESCRIPTION index f46f295..ed62835 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,6 +1,6 @@ Package: vscDebugger Title: Support for Visual Studio Code Debugger -Version: 0.4.4 +Version: 0.4.5 Authors@R: person(given = "Manuel", family = "Hentschel", diff --git a/R/breakpointsHelpers.R b/R/breakpointsHelpers.R index 572c01d..c2ead9f 100644 --- a/R/breakpointsHelpers.R +++ b/R/breakpointsHelpers.R @@ -5,6 +5,7 @@ # set some state in session? # logPrint('pre breakpoint!!!') # request `n` + session$clearStackTree <- TRUE sendWriteToStdinForFlowControl('n') # sendWriteToStdinEvent('n', when = "browserPrompt") session$state$startPaused(pausedOn = "breakpoint") @@ -19,6 +20,7 @@ # logPrint('pre breakpoint!!!') # request `n` # sendWriteToStdinEvent('n', when = "browserPrompt") + session$clearStackTree <- TRUE sendWriteToStdinForFlowControl('n') session$state$startPaused(pausedOn = "breakpoint") # send breakpoint event diff --git a/R/debugAdapter.R b/R/debugAdapter.R index dd5408c..f40c7be 100644 --- a/R/debugAdapter.R +++ b/R/debugAdapter.R @@ -9,7 +9,7 @@ command <- lget(request, 'command', '') args <- lget(request, 'arguments', list()) commandKnown <- TRUE - ret <- try({ + ret <- ({ if(command == 'stackTrace'){ stackTraceRequest(response, args, request) } else if(command == 'scopes'){