Commit d11a1ea1 authored by Christophe Rhodes's avatar Christophe Rhodes
Browse files

catch errors during printing of frame locals

tryCatch is R's handler-case.  (Spent some time wondering why
withCallingHandlers wasn't working, but that's handler-bind.)
parent e7df7e66
......@@ -425,7 +425,12 @@ computeRestartsForEmacs <- function (sldbState) {
objs <- ls(envir=frame)
list(lapply(objs, function(name) { list(quote(`:name`), name,
quote(`:id`), 0,
quote(`:value`), printToString(eval(parse(text=name), envir=frame))) }),
quote(`:value`),
tryCatch({
printToString(eval(parse(text=name), envir=frame))
}, error=function(c) {
sprintf("error printing object")
}))}),
list())
}
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment