From 2fcb575405fcfbe8736d0188fce113af39c43f40 Mon Sep 17 00:00:00 2001 From: Christophe Rhodes Date: Sun, 23 Oct 2011 10:54:19 +0100 Subject: [PATCH] don't print out "locals" from the global environment This is important because e.g. the repl evaluation happens in the global environment, so errors on code called from the repl will pull up a backtrace with that evaluation frame, which can be inspected for locals. But printing out all the locals is a hugely expensive and not helpful thing to do. --- swank.R | 3 +++ 1 file changed, 3 insertions(+) diff --git a/swank.R b/swank.R index ce757b3..c50114a 100644 --- a/swank.R +++ b/swank.R @@ -423,6 +423,9 @@ computeRestartsForEmacs <- function (sldbState) { `swank:frame-locals-and-catch-tags` <- function(slimeConnection, sldbState, index) { frame <- sldbState$frames[[1+index]] objs <- ls(envir=frame) + if(identical(frame, globalenv())) { + objs <- c() + } list(lapply(objs, function(name) { list(quote(`:name`), name, quote(`:id`), 0, quote(`:value`), -- 2.39.5