[ESS] error "Timeout waiting for prompt ( Eval region didn't work?)
christian schulz
ozric at web.de
Wed Feb 2 13:18:55 CET 2005
Hi,
the cursor is right side from the last line which i want evaluated.
i.e.
x <- 1:10
x(here is the cursor)
Below trick works and let me further work with xemacs and R
, but only the first line is evaluated.
>>x <- 1:10
many thanks
Christian
Where is the cursor when you get this problem?
Does C-g end the difficulty and allow you to type in the window?
---------- Weitergeleitete Nachricht ----------
Subject: error "Timeout waiting for prompt ( Eval region didn't work?)
Date: Sonntag, 30. Januar 2005 00:09
From: christian schulz <ozric at web.de>
To: ess-help at stat.math.ethz.ch
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
More information about the ESS-help
mailing list