[ESS-bugs] the old hanging on exit and hanging on start

[Ian Wilson]

A couple of functions to crash and not crash ess/emacs/Rterm.

On my computer it seems to be related to graphics/ downloads



crash1 <- function()
  {
    hist(x <- rnorm(10000))
    dev.off();
    q("no")
  }
#but
nocrash <- function()
  {
    pdf(file="try1.pdf");
    hist(x <- rnorm(10000))
    dev.off();
    q("no")
  }
#and 
nocrash2 <- function()
{
 winDialog(type = c("ok", "okcancel", "yesno", "yesnocancel"), "crash?")
q("no")
}

crash2 <- function()
{
   install.packages("xtable");
   q("no");
}


# further mystery -   when I open a second emacs window with a
# new frame then I can start another R session
# when I open a new emacs session from the command line and then
# try to start emacs the new Rterm takes 100% of system ?

# tested emacs 23.1.1 for i386-msvc-nt-5.0.2195 
# ess 5.1.24
# R 1.8.0 and R.8.1 
# NT and Windows XP