withRetryRestart("retry SLIME interactive evaluation request",
tmp <- withVisible(eval(parse(text=string), envir=globalenv())))
if(tmp$visible) {
withRetryRestart("retry SLIME interactive evaluation request",
tmp <- withVisible(eval(parse(text=string), envir=globalenv())))
if(tmp$visible) {