[ESS] error "Timeout waiting for prompt ( Eval region didn't work?)

[christian schulz]

Hi

i spend some time to fix the problem, and recognize now
error message below when i'm type  M x  R it need some time and then it comes
up. Nevrthless i have an R istance and could use C - c n , but  not  C - c r.
With mouse and buttons the same!
For 5.2.4 and 5.2.3  the same.

Perhaps anything on my 
R.2.0.1 compile is a cause of the error?

many thanks  christian

[SNIP]

Signaling: (error "Timeout waiting for prompt. Check inferior-ess-prompt or 
ess-loop-timeout.")
  signal(error ("Timeout waiting for prompt. Check inferior-ess-prompt or 
ess-loop-timeout."))
  cerror("Timeout waiting for prompt. Check inferior-ess-prompt or 
ess-loop-timeout.")
  apply(cerror "Timeout waiting for prompt. Check inferior-ess-prompt or 
ess-loop-timeout." nil)
  error("Timeout waiting for prompt. Check inferior-ess-prompt or 
ess-loop-timeout.")
  ess-error("Timeout waiting for prompt. Check inferior-ess-prompt or 
ess-loop-timeout.")
  (if (> (setq timeout ...) ess-loop-timeout) (ess-error "Timeout waiting for 
prompt. Check inferior-ess-prompt or ess-loSignaling: (error "Timeout waiting 
for prompt. Check inferior-ess-prompt or ess-loop-timeout.")
  signal(error ("Timeout waiting for prompt. Check inferior-ess-prompt or 
ess-loop-timeout."))
  cerror("Timeout waiting for prompt. Check inferior-ess-prompt or 
ess-loop-timeout.")
  apply(cerror "Timeout waiting for prompt. Check inferior-ess-prompt or 
ess-loop-timeout." nil)
  error("Timeout waiting for prompt. Check inferior-ess-prompt or 
ess-loop-timeout.")
  ess-error("Timeout waiting for prompt. Check inferior-ess-prompt or 
ess-loop-timeout.")
  (if (> (setq timeout ...) ess-loop-timeout) (ess-error "Timeout waiting for 
prompt. Check inferior-ess-prompt or ess-loop-timeout."))
  (if (not (eq ... ...)) (ess-error "ESS process has died unexpectedly.") (if 
(> ... ess-loop-timeout) (ess-error "Timeout waiting for prompt. Check 
inferior-ess-prompt or ess-loop-timeout.")) (accept-process-output) 
(goto-char (point-max)) (beginning-of-line) (setq r (looking-at 
inferior-ess-prompt)) (not (or r ...)))
  (progn (if (not ...) (ess-error "ESS process has died unexpectedly.") 
(if ... ...) (accept-process-output) (goto-char ...) (beginning-of-line) 
(setq r ...) (not ...)))
  (while (progn (if ... ... ... ... ... ... ... ...)))
  (let* ((cbuffer ...) (sprocess ...) (sbuffer ...) (r nil) (timeout 0)) 
(set-buffer sbuffer) (while (progn ...)) (goto-char (point-max)) (set-buffer 
cbuffer) (symbol-value r))
  inferior-ess-wait-for-prompt()
  (let* ((symbol-string ...) (switches-symbol ...) (switches ...) 
(buf-name-str ...)) (ess-write-to-dribble-buffer (format "(ess-multi 0):  
inf-ess-start-args=%s, comint-..echoes=%s\n" inf-ess-start-args 
comint-process-echoes)) (set-buffer buffer) (setq-default inferior-ess-prompt 
(concat "\\(" inferior-ess-primary-prompt "\\|" inferior-ess-secondary-prompt 
"\\)")) (inferior-ess-mode) (ess-write-to-dribble-buffer (format "(ess-multi 
post inf-ess: start-args=%s, comint-echoes=%s\n" inf-ess-start-args 
comint-process-echoes)) (setq ess-local-process-name proc-name) (goto-char 
(point-max)) (setq comint-input-ring-file-name (expand-file-name 
ess-history-file ess-directory)) (comint-read-input-ring) 
(ess-write-to-dribble-buffer (format "(ess-multi 1):  start-args=%s \n" 
inf-ess-start-args)) (set-buffer (if switches ... ...)) (set-process-sentinel 
(get-process proc-name) (quote ess-process-sentinel)) (let (...) (if conselt 
nil ...)) (ess-make-buffer-current) (inferior-ess-wait-for-prompt) (goto-char 
(point-max)) (setq ess-sl-modtime-alist nil) (setq ess-sp-change t) 
(run-hooks (quote ess-post-run-hook)))
  (if (and proc (comint-check-proc ...)) (pop-to-buffer (process-buffer proc)) 
(let* (... ... ... ...) (ess-write-to-dribble-buffer ...) (set-buffer buffer) 
(setq-default inferior-ess-prompt ...) (inferior-ess-mode) 
(ess-write-to-dribble-buffer ...) (setq ess-local-process-name proc-name) 
(goto-char ...) (setq comint-input-ring-file-name ...) 
(comint-read-input-ring) (ess-write-to-dribble-buffer ...) (set-buffer ...) 
(set-process-sentinel ... ...) (let ... ...) (ess-make-buffer-current) 
(inferior-ess-wait-for-prompt) (goto-char ...) (setq ess-sl-modtime-alist 
nil) (setq ess-sp-change t) (run-hooks ...)) (if inferior-ess-same-window 
(switch-to-buffer ...) (pop-to-buffer ...)))
  (let* ((proc-name name) (special-display-regexps nil) 
(special-display-frame-alist inferior-ess-frame-alist) (proc ...)) (if 
inferior-ess-own-frame (setq special-display-regexps ...)) (if (and proc ...) 
(pop-to-buffer ...) 
(let* ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ...) 
(if inferior-ess-same-window ... ...)))
  ess-multi("R" #<buffer "*R*"> "--no-readline ")
  (let ((ess-directory ...)) (ess-multi procname buf inferior-ess-start-args))
  (let* ((process-environment process-environment) (defdir ...) (temp-dialect 
temp-ess-dialect) (temp-lang temp-ess-lang) (procname ...) (startdir nil) 
(buf nil) (buf-name-str ...)) (ess-write-to-dribble-buffer (format "(inf-ess 
1.1): procname=%s temp-dialect=%s, buf-name=%s \n" procname temp-dialect 
buf-name-str)) (cond (... ... ... ...) (... ... ...) (... ... ... ...)) 
(set-buffer buf) (ess-setq-vars-local ess-customize-alist) (if ess-start-args 
(setq inferior-ess-start-args ess-start-args)) (ess-write-to-dribble-buffer 
(format "(inf-ess 2.1): ess-language=%s, ess-dialect=%s buf=%s \n" 
ess-language ess-dialect ...)) (ess-write-to-dribble-buffer (format "(inf-ess 
2.2): start args = %s, inf-ess-start-args=%s \n" ess-start-args 
inferior-ess-start-args)) (ess-write-to-dribble-buffer (format "(inf-ess 
finish [%s(%s), %s(%s,%s)]\n" ess-language ess-dialect inferior-ess-program 
ess-current-process-name ess-local-process-name)) (if startdir (setq 
default-directory startdir)) (setq-default ess-history-file (concat "." 
ess-dialect "history")) (let (...) (ess-multi procname buf 
inferior-ess-start-args)))
  (let ((temp-ess-dialect ...) (temp-ess-lang ...)) (save-excursion 
(set-buffer ess-dribble-buffer) (make-variable-buffer-local ...) 
(ess-setq-vars-default ess-customize-alist) (setq-default 
comint-use-prompt-regexp-instead-of-fields nil)) (run-hooks (quote 
ess-pre-run-hook)) (ess-write-to-dribble-buffer (format "(inf-ess 1): 
lang=%s, dialect=%s, tmp-dialect=%s, buf=%s\n" ess-language ess-dialect 
temp-ess-dialect ...)) (let* (... ... ... ... ... ... ... ...) 
(ess-write-to-dribble-buffer ...) (cond ... ... ...) (set-buffer buf) 
(ess-setq-vars-local ess-customize-alist) (if ess-start-args ...) 
(ess-write-to-dribble-buffer ...) (ess-write-to-dribble-buffer ...) 
(ess-write-to-dribble-buffer ...) (if startdir ...) (setq-default 
ess-history-file ...) (let ... ...)))
  inferior-ess("--no-readline ")
  (let* ((r-always-arg ...) (r-start-args ...) default-process-coding-system) 
(if ess-microsoft-p (setq default-process-coding-system ...)) (inferior-ess 
r-start-args) (ess-write-to-dribble-buffer (format "(R): 
inferior-ess-language-start=%s\n" inferior-ess-language-start)) (if 
inferior-ess-language-start (ess-eval-linewise inferior-ess-language-start)))
  R(nil)
  call-interactively(R)
  command-execute(R t)
  execute-extended-command(nil)
  call-interactively(execute-extended-command)op-timeout."))
  (if (not (eq ... ...)) (ess-error "ESS process has died unexpectedly.") (if 
(> ... ess-loop-timeout) (ess-error "Timeout waiting for prompt. Check 
inferior-ess-prompt or ess-loop-timeout.")) (accept-process-output) 
(goto-char (point-max)) (beginning-of-line) (setq r (looking-at 
inferior-ess-prompt)) (not (or r ...)))
  (progn (if (not ...) (ess-error "ESS process has died unexpectedly.") 
(if ... ...) (accept-process-output) (goto-char ...) (beginning-of-line) 
(setq r ...) (not ...)))
  (while (progn (if ... ... ... ... ... ... ... ...)))
  (let* ((cbuffer ...) (sprocess ...) (sbuffer ...) (r nil) (timeout 0)) 
(set-buffer sbuffer) (while (progn ...)) (goto-char (point-max)) (set-buffer 
cbuffer) (symbol-value r))
  inferior-ess-wait-for-prompt()
  (let* ((symbol-string ...) (switches-symbol ...) (switches ...) 
(buf-name-str ...)) (ess-write-to-dribble-buffer (format "(ess-multi 0):  
inf-ess-start-args=%s, comint-..echoes=%s\n" inf-ess-start-args 
comint-process-echoes)) (set-buffer buffer) (setq-default inferior-ess-prompt 
(concat "\\(" inferior-ess-primary-prompt "\\|" inferior-ess-secondary-prompt 
"\\)")) (inferior-ess-mode) (ess-write-to-dribble-buffer (format "(ess-multi 
post inf-ess: start-args=%s, comint-echoes=Signaling: (error "Timeout waiting 
for prompt. Check inferior-ess-prompt or ess-loop-timeout.")
  signal(error ("Timeout waiting for prompt. Check inferior-ess-prompt or 
ess-loop-timeout."))
  cerror("Timeout waiting for prompt. Check inferior-ess-prompt or 
ess-loop-timeout.")
  apply(cerror "Timeout waiting for prompt. Check inferior-ess-prompt or 
ess-loop-timeout." nil)
  error("Timeout waiting for prompt. Check inferior-ess-prompt or 
ess-loop-timeout.")
  ess-error("Timeout waiting for prompt. Check inferior-ess-prompt or 
ess-loop-timeout.")
  (if (> (setq timeout ...) ess-loop-timeout) (ess-error "Timeout waiting for 
prompt. Check inferior-ess-prompt or ess-loop-timeout."))
  (if (not (eq ... ...)) (ess-error "ESS process has died unexpectedly.") (if 
(> ... ess-loop-timeout) (ess-error "Timeout waiting for prompt. Check 
inferior-ess-prompt or ess-loop-timeout.")) (accept-process-output) 
(goto-char (point-max)) (beginning-of-line) (setq r (looking-at 
inferior-ess-prompt)) (not (or r ...)))
  (progn (if (not ...) (ess-error "ESS process has died unexpectedly.") 
(if ... ...) (accept-process-output) (goto-char ...) (beginning-of-line) 
(setq r ...) (not ...)))
  (while (progn (if ... ... ... ... ... ... ... ...)))
  (let* ((cbuffer ...) (sprocess ...) (sbuffer ...) (r nil) (timeout 0)) 
(set-buffer sbuffer) (while (progn ...)) (goto-char (point-max)) (set-buffer 
cbuffer) (symbol-value r))
  inferior-ess-wait-for-prompt()
  (let* ((symbol-string ...) (switches-symbol ...) (switches ...) 
(buf-name-str ...)) (ess-write-to-dribble-buffer (format "(ess-multi 0):  
inf-ess-start-args=%s, comint-..echoes=%s\n" inf-ess-start-args 
comint-process-echoes)) (set-buffer buffer) (setq-default inferior-ess-prompt 
(concat "\\(" inferior-ess-primary-prompt "\\|" inferior-ess-secondary-prompt 
"\\)")) (inferior-ess-mode) (ess-write-to-dribble-buffer (format "(ess-multi 
post inf-ess: start-args=%s, comint-echoes=%s\n" inf-ess-start-args 
comint-process-echoes)) (setq ess-local-process-name proc-name) (goto-char 
(point-max)) (setq comint-input-ring-file-name (expand-file-name 
ess-history-file ess-directory)) (comint-read-input-ring) 
(ess-write-to-dribble-buffer (format "(ess-multi 1):  start-args=%s \n" 
inf-ess-start-args)) (set-buffer (if switches ... ...)) (set-process-sentinel 
(get-process proc-name) (quote ess-process-sentinel)) (let (...) (if conselt 
nil ...)) (ess-make-buffer-current) (inferior-ess-wait-for-prompt) (goto-char 
(point-max)) (setq ess-sl-modtime-alist nil) (setq ess-sp-change t) 
(run-hooks (quote ess-post-run-hook)))
  (if (and proc (comint-check-proc ...)) (pop-to-buffer (process-buffer proc)) 
(let* (... ... ... ...) (ess-write-to-dribble-buffer ...) (set-buffer buffer) 
(setq-default inferior-ess-prompt ...) (inferior-ess-mode) 
(ess-write-to-dribble-buffer ...) (setq ess-local-process-name proc-name) 
(goto-char ...) (setq comint-input-ring-file-name ...) 
(comint-read-input-ring) (ess-write-to-dribble-buffer ...) (set-buffer ...) 
(set-process-sentinel ... ...) (let ... ...) (ess-make-buffer-current) 
(inferior-ess-wait-for-prompt) (goto-char ...) (setq ess-sl-modtime-alist 
nil) (setq ess-sp-change t) (run-hooks ...)) (if inferior-ess-same-window 
(switch-to-buffer ...) (pop-to-buffer ...)))
  (let* ((proc-name name) (special-display-regexps nil) 
(special-display-frame-alist inferior-ess-frame-alist) (proc ...)) (if 
inferior-ess-own-frame (setq special-display-regexps ...)) (if (and proc ...) 
(pop-to-buffer ...) 
(let* ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ...) 
(if inferior-ess-same-window ... ...)))
  ess-multi("R" #<buffer "*R*"> "--no-readline ")
  (let ((ess-directory ...)) (ess-multi procname buf inferior-ess-start-args))
  (let* ((process-environment process-environment) (defdir ...) (temp-dialect 
temp-ess-dialect) (temp-lang temp-ess-lang) (procname ...) (startdir nil) 
(buf nil) (buf-name-str ...)) (ess-write-to-dribble-buffer (format "(inf-ess 
1.1): procname=%s temp-dialect=%s, buf-name=%s \n" procname temp-dialect 
buf-name-str)) (cond (... ... ... ...) (... ... ...) (... ... ... ...)) 
(set-buffer buf) (ess-setq-vars-local ess-customize-alist) (if ess-start-args 
(setq inferior-ess-start-args ess-start-args)) (ess-write-to-dribble-buffer 
(format "(inf-ess 2.1): ess-language=%s, ess-dialect=%s buf=%s \n" 
ess-language ess-dialect ...)) (ess-write-to-dribble-buffer (format "(inf-ess 
2.2): start args = %s, inf-ess-start-args=%s \n" ess-start-args 
inferior-ess-start-args)) (ess-write-to-dribble-buffer (format "(inf-ess 
finish [%s(%s), %s(%s,%s)]\n" ess-language ess-dialect inferior-ess-program 
ess-current-process-name ess-local-process-name)) (if startdir (setq 
default-directory startdir)) (setq-default ess-history-file (concat "." 
ess-dialect "history")) (let (...) (ess-multi procname buf 
inferior-ess-start-args)))
  (let ((temp-ess-dialect ...) (temp-ess-lang ...)) (save-excursion 
(set-buffer ess-dribble-buffer) (make-variable-buffer-local ...) 
(ess-setq-vars-default ess-customize-alist) (setq-default 
comint-use-prompt-regexp-instead-of-fields nil)) (run-hooks (quote 
ess-pre-run-hook)) (ess-write-to-dribble-buffer (format "(inf-ess 1): 
lang=%s, dialect=%s, tmp-dialect=%s, buf=%s\n" ess-language ess-dialect 
temp-ess-dialect ...)) (let* (... ... ... ... ... ... ... ...) 
(ess-write-to-dribble-buffer ...) (cond ... ... ...) (set-buffer buf) 
(ess-setq-vars-local ess-customize-alist) (if ess-start-args ...) 
(ess-write-to-dribble-buffer ...) (ess-write-to-dribble-buffer ...) 
(ess-write-to-dribble-buffer ...) (if startdir ...) (setq-default 
ess-history-file ...) (let ... ...)))
  inferior-ess("--no-readline ")
  (let* ((r-always-arg ...) (r-start-args ...) default-process-coding-system) 
(if ess-microsoft-p (setq default-process-coding-system ...)) (inferior-ess 
r-start-args) (ess-write-to-dribble-buffer (format "(R): 
inferior-ess-language-start=%s\n" inferior-ess-language-start)) (if 
inferior-ess-language-start (ess-eval-linewise inferior-ess-language-start)))
  R(nil)
  call-interactively(R)
  command-execute(R t)
  execute-extended-command(nil)
  call-interactively(execute-extended-command)%s\n" inf-ess-start-args 
comint-process-echoes)) (setq ess-local-process-name proc-name) (goto-char 
(point-max)) (setq comint-input-ring-file-name (expand-file-name 
ess-history-file ess-directory)) (comint-read-input-ring) 
(ess-write-to-dribble-buffer (format "(ess-multi 1):  start-args=%s \n" 
inf-ess-start-args)) (set-buffer (if switches ... ...)) (set-process-sentinel 
(get-process proc-name) (quote ess-process-sentinel)) (let (...) (if conselt 
nil ...)) (ess-make-buffer-current) (inferior-ess-wait-for-prompt) (goto-char 
(point-max)) (setq ess-sl-modtime-alist nil) (setq ess-sp-change t) 
(run-hooks (quote ess-post-run-hook)))
  (if (and proc (comint-check-proc ...)) (pop-to-buffer (process-buffer proc)) 
(let* (... ... ... ...) (ess-write-to-dribble-buffer ...) (set-buffer buffer) 
(setq-default inferior-ess-prompt ...) (inferior-ess-mode) 
(ess-write-to-dribble-buffer ...) (setq ess-local-process-name proc-name) 
(goto-char ...) (setq comint-input-ring-file-name ...) 
(comint-read-input-ring) (ess-write-to-dribble-buffer ...) (set-buffer ...) 
(set-process-sentinel ... ...) (let ... ...) (ess-make-buffer-current) 
(inferior-ess-wait-for-prompt) (goto-char ...) (setq ess-sl-modtime-alist 
nil) (setq ess-sp-change t) (run-hooks ...)) (if inferior-ess-same-window 
(switch-to-buffer ...) (pop-to-buffer ...)))
  (let* ((proc-name name) (special-display-regexps nil) 
(special-display-frame-alist inferior-ess-frame-alist) (proc ...)) (if 
inferior-ess-own-frame (setq special-display-regexps ...)) (if (and proc ...) 
(pop-to-buffer ...) 
(let* ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ...) 
(if inferior-ess-same-window ... ...)))
  ess-multi("R" #<buffer "*R*"> "--no-readline ")
  (let ((ess-directory ...)) (ess-multi procname buf inferior-ess-start-args))
  (let* ((process-environment process-environment) (defdir ...) (temp-dialect 
temp-ess-dialect) (temp-lang temp-ess-lang) (procname ...) (startdir nil) 
(buf nil) (buf-name-str ...)) (ess-write-to-dribble-buffer (format "(inf-ess 
1.1): procname=%s temp-dialect=%s, buf-name=%s \n" procname temp-dialect 
buf-name-str)) (cond (... ... ... ...) (... ... ...) (... ... ... ...)) 
(set-buffer buf) (ess-setq-vars-local ess-customize-alist) (if ess-start-args 
(setq inferior-ess-start-args ess-start-args)) (ess-write-to-dribble-buffer 
(format "(inf-ess 2.1): ess-language=%s, ess-dialect=%s buf=%s \n" 
ess-language ess-dialect ...)) (ess-write-to-dribble-buffer (format "(inf-ess 
2.2): start args = %s, inf-ess-start-args=%s \n" ess-start-args 
inferior-ess-start-args)) (ess-write-to-dribble-buffer (format "(inf-ess 
finish [%s(%s), %s(%s,%s)]\n" ess-language ess-dialect inferior-ess-program 
ess-current-process-name ess-local-process-name)) (if startdir (setq 
default-directory startdir)) (setq-default ess-history-file (concat "." 
ess-dialect "history")) (let (...) (ess-multi procname buf 
inferior-ess-start-args)))
  (let ((temp-ess-dialect ...) (temp-essSignaling: (error "Timeout waiting for 
prompt. Check inferior-ess-prompt or ess-loop-timeout.")
  signal(error ("Timeout waiting for prompt. Check inferior-ess-prompt or 
ess-loop-timeout."))
  cerror("Timeout waiting for prompt. Check inferior-ess-prompt or 
ess-loop-timeout.")
  apply(cerror "Timeout waiting for prompt. Check inferior-ess-prompt or 
ess-loop-timeout." nil)
  error("Timeout waiting for prompt. Check inferior-ess-prompt or 
ess-loop-timeout.")
  ess-error("Timeout waiting for prompt. Check inferior-ess-prompt or 
ess-loop-timeout.")
  (if (> (setq timeout ...) ess-loop-timeout) (ess-error "Timeout waiting for 
prompt. Check inferior-ess-prompt or ess-loop-timeout."))
  (if (not (eq ... ...)) (ess-error "ESS process has died unexpectedly.") (if 
(> ... ess-loop-timeout) (ess-error "Timeout waiting for prompt. Check 
inferior-ess-prompt or ess-loop-timeout.")) (accept-process-output) 
(goto-char (point-max)) (beginning-of-line) (setq r (looking-at 
inferior-ess-prompt)) (not (or r ...)))
  (progn (if (not ...) (ess-error "ESS process has died unexpectedly.") 
(if ... ...) (accept-process-output) (goto-char ...) (beginning-of-line) 
(setq r ...) (not ...)))
  (while (progn (if ... ... ... ... ... ... ... ...)))
  (let* ((cbuffer ...) (sprocess ...) (sbuffer ...) (r nil) (timeout 0)) 
(set-buffer sbuffer) (while (progn ...)) (goto-char (point-max)) (set-buffer 
cbuffer) (symbol-value r))
  inferior-ess-wait-for-prompt()
  (let* ((symbol-string ...) (switches-symbol ...) (switches ...) 
(buf-name-str ...)) (ess-write-to-dribble-buffer (format "(ess-multi 0):  
inf-ess-start-args=%s, comint-..echoes=%s\n" inf-ess-start-args 
comint-process-echoes)) (set-buffer buffer) (setq-default inferior-ess-prompt 
(concat "\\(" inferior-ess-primary-prompt "\\|" inferior-ess-secondary-prompt 
"\\)")) (inferior-ess-mode) (ess-write-to-dribble-buffer (format "(ess-multi 
post inf-ess: start-args=%s, comint-echoes=%s\n" inf-ess-start-args 
comint-process-echoes)) (setq ess-local-process-name proc-name) (goto-char 
(point-max)) (setq comint-input-ring-file-name (expand-file-name 
ess-history-file ess-directory)) (comint-read-input-ring) 
(ess-write-to-dribble-buffer (format "(ess-multi 1):  start-args=%s \n" 
inf-ess-start-args)) (set-buffer (if switches ... ...)) (set-process-sentinel 
(get-process proc-name) (quote ess-process-sentinel)) (let (...) (if conselt 
nil ...)) (ess-make-buffer-current) (inferior-ess-wait-for-prompt) (goto-char 
(point-max)) (setq ess-sl-modtime-alist nil) (setq ess-sp-change t) 
(run-hooks (quote ess-post-run-hook)))
  (if (and proc (comint-check-proc ...)) (pop-to-buffer (process-buffer proc)) 
(let* (... ... ... ...) (ess-write-to-dribble-buffer ...) (set-buffer buffer) 
(setq-default inferior-ess-prompt ...) (inferior-ess-mode) 
(ess-write-to-dribble-buffer ...) (setq ess-local-process-name proc-name) 
(goto-char ...) (setq comint-input-ring-file-name ...) 
(comint-read-input-ring) (ess-write-to-dribble-buffer ...) (set-buffer ...) 
(set-process-sentinel ... ...) (let ... ...) (ess-make-buffer-current) 
(inferior-ess-wait-for-prompt) (goto-char ...) (setq ess-sl-modtime-alist 
nil) (setq ess-sp-change t) (run-hooks ...)) (if inferior-ess-same-window 
(switch-to-buffer ...) (pop-to-buffer ...)))
  (let* ((proc-name name) (special-display-regexps nil) 
(special-display-frame-alist inferior-ess-frame-alist) (proc ...)) (if 
inferior-ess-own-frame (setq special-display-regexps ...)) (if (and proc ...) 
(pop-to-buffer ...) 
(let* ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ...) 
(if inferior-ess-same-window ... ...)))
  ess-multi("R" #<buffer "*R*"> "--no-readline ")
  (let ((ess-directory ...)) (ess-multi procname buf inferior-ess-start-args))
  (let* ((process-environment process-environment) (defdir ...) (temp-dialect 
temp-ess-dialect) (temp-lang temp-ess-lang) (procname ...) (startdir nil) 
(buf nil) (buf-name-str ...)) (ess-write-to-dribble-buffer (format "(inf-ess 
1.1): procname=%s temp-dialect=%s, buf-name=%s \n" procname temp-dialect 
buf-name-str)) (cond (... ... ... ...) (... ... ...) (... ... ... ...)) 
(set-buffer buf) (ess-setq-vars-local ess-customize-alist) (if ess-start-args 
(setq inferior-ess-start-args ess-start-args)) (ess-write-to-dribble-buffer 
(format "(inf-ess 2.1): ess-language=%s, ess-dialect=%s buf=%s \n" 
ess-language ess-dialect ...)) (ess-write-to-dribble-buffer (format "(inf-ess 
2.2): start args = %s, inf-ess-start-args=%s \n" ess-start-args 
inferior-ess-start-args)) (ess-write-to-dribble-buffer (format "(inf-ess 
finish [%s(%s), %s(%s,%s)]\n" ess-language ess-dialect inferior-ess-program 
ess-current-process-name ess-local-process-name)) (if startdir (setq 
default-directory startdir)) (setq-default ess-history-file (concat "." 
ess-dialect "history")) (let (...) (ess-multi procname buf 
inferior-ess-start-args)))
  (let ((temp-ess-dialect ...) (temp-ess-lang ...)) (save-excursion 
(set-buffer ess-dribble-buffer) (make-variable-buffer-local ...) 
(ess-setq-vars-default ess-customize-alist) (setq-default 
comint-use-prompt-regexp-instead-of-fields nil)) (run-hooks (quote 
ess-pre-run-hook)) (ess-write-to-dribble-buffer (format "(inf-ess 1): 
lang=%s, dialect=%s, tmp-dialect=%s, buf=%s\n" ess-language ess-dialect 
temp-ess-dialect ...)) (let* (... ... ... ... ... ... ... ...) 
(ess-write-to-dribble-buffer ...) (cond ... ... ...) (set-buffer buf) 
(ess-setq-vars-local ess-customize-alist) (if ess-start-args ...) 
(ess-write-to-dribble-buffer ...) (ess-write-to-dribble-buffer ...) 
(ess-write-to-dribble-buffer ...) (if startdir ...) (setq-default 
ess-history-file ...) (let ... ...)))
  inferior-ess("--no-readline ")
  (let* ((r-always-arg ...) (r-start-args ...) default-process-coding-system) 
(if ess-microsoft-p (setq default-process-coding-system ...)) (inferior-ess 
r-start-args) (ess-write-to-dribble-buffer (format "(R): 
inferior-ess-language-start=%s\n" inferior-ess-language-start)) (if 
inferior-ess-language-start (ess-eval-linewise inferior-ess-language-start)))
  R(nil)
  call-interactively(R)
  command-execute(R t)
  execute-extended-command(nil)
  call-interactively(execute-extended-command)-lang ...)) (save-excursion 
(set-buffer ess-dribble-buffer) (make-variable-buffer-local ...) 
(ess-setq-vars-default ess-customize-alist) (setq-default 
comint-use-prompt-regexp-instead-of-fields nil)) (run-hooks (quote 
ess-pre-run-hook)) (ess-write-to-dribble-buffer (format "(inf-ess 1): 
lang=%s, dialect=%s, tmp-dialect=%s, buf=%s\n" ess-language ess-dialect 
temp-ess-dialect ...)) (let* (... ... ... ... ... ... ... ...) 
(ess-write-to-dribble-buffer ...) (cond ... ... ...) (set-buffer buf) 
(ess-setq-vars-local ess-customize-alist) (if ess-start-args ...) 
(ess-write-to-dribble-buffer ...) (ess-write-to-dribble-buffer ...) 
(ess-write-to-dribble-buffer ...) (if startdir ...) (setq-default 
ess-history-file ...) (let ... ...)))
  inferior-ess("--no-readline ")
  (let* ((r-always-arg ...) (r-start-args ...) default-process-coding-system) 
(if ess-microsoft-p (setq default-process-coding-system ...)) (inferior-ess 
r-start-args) (ess-write-to-dribble-buffer (format "(R): 
inferior-ess-language-start=%s\n" inferior-ess-language-start)) (if 
inferior-ess-language-start (ess-eval-linewise inferior-ess-language-start)))
  R(nil)
  call-interactively(R)
  command-execute(R t)
  execute-extended-command(nil)
  call-interactively(execute-extended-command)


----------  Weitergeleitete Nachricht  ----------

Subject: Eval region didn't work?
Date: Mittwoch, 26. Januar 2005 11:31
From: christian schulz <ozric at web.de>
To: ess-help at stat.math.ethz.ch

Hi

know  anybody why  xemacs allways hang  if i'm trying eval a region?
Eval a line works well and i'm using R-2.01, ess5.2.4 and  suse9.2.

I ve been attempt to recognize the problem using older ess-versions but
getting no succes until yet.

Many  thanks for hints and help
Christian