[ESS-bugs] ess-mode 5.3.7; ess-eval-visibly-p nil leaves artifacts in process buffer

Martin Maechler maechler at stat.math.ethz.ch
Mon Apr 7 12:46:52 CEST 2008


>>>>> "TS" == tyler  <tyler.smith at mail.mcgill.ca>
>>>>>     on Fri, 04 Apr 2008 23:33:58 -0300 writes:

    TS> Here's today's problem: I have ess-eval-visibly set to nil, to speed up
    TS> submission of code to the R process. However, this leaves a + for
    TS> every line in the submitted code:

    >> + + + + + + + + + + >

Yes.  We (our group) have 
ess-eval-visibly-p (sic!) set to nil ``since ever'' ( > 15 years).
So I love it and am entirely used to using it.


    TS> For some reason, this plays havoc with the command-line history.
    TS> C-<up> and C-<down> a few times, and those pluses seem to propagate
    TS> themselves, and it also interferes with sending commands from further
    TS> up the transcript on occasion.

Well, if you are used to work with *.R files, you are not so
much interested in the command-line history.
But in the other cases (and some of "my" group users are
different than me here as well),
I recall that I haven't really suffered from any "havoc"

As I try now, I don't see real problems.
Of course, the invisibly sent commands are not in the command
line history,
but I see no problems with the "+".

I use  M-p (and M-n) instead of your C-<up>  {they are faster
once you have re-trained your fingers!}
but these are absolutelly equivalent.

    TS> One possible solution to this is to add a few lines to
    TS> ess-eval-region, to clean out the last line of the process buffer. I
    TS> had to wait a second to make this work, as the + symbols apparently
    TS> don't actually return immediately, so it is possible to clean the
    TS> prompt line before they arrive.

Waiting one second for every  ( ess-eval-region )
seems not acceptable to me at all;  e-e-r is *the* basic
building block for many ess-eval calls.

But we should try to solve your problem, hopefully quite differently.

Maybe you could expose it in a bit more details
and ask about similar problems and solutions on ESS-help ?

Best regards,
Martin Maechler

    TS> This has solved my problem, but with the side-effect that sending
    TS> regions from a .R file to the process causes the .R file to bounce
    TS> around a bit, sometimes just recentering, sometimes actually moving
    TS> point. I've tried both save-excursion and save-current-buffer, and
    TS> both have this behaviour.

    TS> Since sending code to the process visibly leaves a blank line after
    TS> evaluation, this code doesn't change the apparent behaviour of sending
    TS> code visibly. However, due to the strange movement in the source
    TS> buffer, it might be preferable to wrap the new code in an 

    TS> (if (not (ess-eval-visibly-p))
    TS> ...
    TS> )

    TS> Anyways, here's my code. Let me know if anyone else has had this
    TS> problem, if this is a reasonable approach to fix it, and if there's a
    TS> better way to do it.

    TS> Thanks,

    TS> Tyler

    TS> ;; From ess-inf.el, ca. line 1050
    TS> (defun ess-eval-region (start end toggle &optional message)
    TS> "Send the current region to the inferior ESS process.
    TS> With prefix argument toggle the meaning of `ess-eval-visibly-p';
    TS> this does not apply when using the S-plus GUI, see `ess-eval-region-ddeclient'."
    TS> (interactive "r\nP")
    TS> ;;(untabify (point-min) (point-max))
    TS> ;;(untabify start end); do we really need to save-excursion?
    TS> (ess-force-buffer-current "Process to load into: ")
    TS> (message "Starting evaluation...")

    TS> (if (ess-ddeclient-p)
    TS> (ess-eval-region-ddeclient start end 'even-empty)
    TS> ;; else: "normal", non-DDE behavior:
    TS> (let ((visibly (if toggle (not ess-eval-visibly-p) ess-eval-visibly-p)))
    TS> (if visibly
    TS> (ess-eval-linewise (buffer-substring start end))
    TS> (if ess-synchronize-evals
    TS> (ess-eval-linewise (buffer-substring start end)
    TS> (or message "Eval region"))
    TS> ;; else [almost always!]
    TS> (let ((sprocess (get-ess-process ess-current-process-name)))
    TS> (process-send-region sprocess start end)
    TS> (process-send-string sprocess "\n"))))))

    TS> ;; begin Tyler's modification:
    TS> (sleep-for 1)
    TS> (save-current-buffer
    TS> (set-buffer (get-ess-buffer ess-current-process-name))
    TS> (end-of-buffer)
    TS> (comint-bol)
    TS> (kill-line))
    TS> ;; end Tyler's modification

    TS> (message "Finished evaluation")
    TS> ;; return value
    TS> (list start end))


    TS> [ess-site.el]: ess-customize-alist=nil 
    TS> [ess-site.el _2_]: ess-customize-alist=nil 
    TS> (S): ess-s-versions-create making M-x defuns for 
 
    TS> (R): ess-r-versions-create making M-x defuns for 
 

    TS> (R): ess-dialect=nil, buf=*shell*, start-arg=nil
    TS> current-prefix-arg=nil
    TS> (inferior-ess 0): ess-start-args=--no-readline --no-restore  
    TS> ess-setq-vars-default 0: ess-language=Initial, -dialect=nil, buf=nil, comint..echoes=nil, comint..sender=comint-simple-send
    TS> ess-setq-vars-default 1: ess-language=S, -dialect=R, buf=nil, comint..echoes=nil, comint..sender=comint-simple-send
    TS> (inf-ess 1): lang=S, dialect=R, tmp-dialect=R, buf=*shell*
    TS> (inf-ess 1.1): procname=R temp-dialect=R, buf-name=*R* 
    TS> (inferior-ess) Method #3 start=/home/tyler/rworkingdirectory/ buf=*R*
    TS> (ess-setq-vars-LOCAL): language=S, dialect=R, buf=nil, comint..echoes=nil, comint..sender=comint-simple-send
    TS> (inf-ess 2.1): ess-language=S, ess-dialect=R buf=*R* 
    TS> (inf-ess 2.2): start args = --no-readline --no-restore , inf-ess-start-args=--no-readline --no-restore  
    TS> (inf-ess finish [S(R), R(nil,nil)]
    TS> (ess-multi 0):  inf-ess-start-args=--no-readline --no-restore , comint-..echoes=nil
    TS> (i-ess 1): buf=*R*, lang=S, comint..echo=nil, comint..sender=comint-simple-send,
    TS> (i-ess 2): buf=*R*, lang=S, comint..echo=t, comint..sender=inferior-R-input-sender,
    TS> (ess-setq-vars-LOCAL): language=S, dialect=R, buf=nil, comint..echoes=t, comint..sender=inferior-R-input-sender
    TS> (i-ess 3): curr-buf=*R*, comint..echo=t, comint..sender=inferior-R-input-sender,
    TS> (ess-multi post inf-ess: start-args=--no-readline --no-restore , comint-echoes=t
    TS> (ess-multi 1):  start-args=--no-readline --no-restore  
    TS> Making Process...Buf *R*, Proc R, Prog R
    TS> Start File=nil, Args= --no-readline --no-restore .
    TS> (R): inferior-ess-language-start=options(STERM='iESS', editor='emacsclient')
    TS> (ess-search-list: re-computing..) after 'search()
    TS> ', point-max=189
    TS> (get-object-list R) ..--> (ess-get-modtime-list)
    TS> (ess-object-names obj=.GlobalEnv): no directory - trying names
    TS> (ess-object-names obj=package:stats): no directory - trying names
    TS> (ess-object-names obj=package:graphics): no directory - trying names
    TS> (ess-object-names obj=package:grDevices): no directory - trying names
    TS> (ess-object-names obj=package:utils): no directory - trying names
    TS> (ess-object-names obj=package:datasets): no directory - trying names
    TS> (ess-object-names obj=package:methods): no directory - trying names
    TS> (ess-object-names obj=Autoloads): no directory - trying names
    TS> (ess-object-names obj=package:base): no directory - trying names
    TS> ess-get-modtime-list: new alist of length 9
    TS> (length alist) : 9
    TS> (ess-object-names obj=.GlobalEnv): no directory - trying names
    TS> have re-read pos=1: -> length 0
    TS> (ess-search-list: re-computing..) after 'search()
    TS> ', point-max=211
    TS> (get-object-list R) .. using existing ess-*-alist
    TS> (length alist) : 9
    TS> (ess-object-names obj=.GlobalEnv): no directory - trying names
    TS> have re-read pos=1: -> length 0
    TS> (ess-setq-vars-LOCAL): language=S, dialect=R, buf=nil, comint..echoes=nil, comint..sender=comint-simple-send
    TS> (get-object-list R) .. using existing ess-*-alist
    TS> (length alist) : 9
    TS> (ess-object-names obj=.GlobalEnv): no directory - trying names
    TS> have re-read pos=1: -> length 9
    TS> (ess-setq-vars-LOCAL): language=S, dialect=R, buf=nil, comint..echoes=nil, comint..sender=comint-simple-send
    TS> (ess-mode-1): ess-language=S, ess-dialect=R buf=bell2003.R 
    TS> (ess-mode-1.5): alist=((ess-local-customize-alist quote R-customize-alist) (ess-dialect . R) (ess-suffix . R) (ess-dump-filename-template ess-replace-regexp-in-string S$ ess-suffix ess-dump-filename-template-proto) (ess-mode-syntax-table . R-syntax-table) (ess-mode-editing-alist . R-editing-alist) (ess-change-sp-regexp . ess-R-change-sp-regexp) (ess-help-sec-regex . ess-help-R-sec-regex) (ess-help-sec-keys-alist . ess-help-R-sec-keys-alist) (ess-loop-timeout . ess-S-loop-timeout) (ess-cmd-delay . ess-R-cmd-delay) (ess-function-pattern . ess-R-function-pattern) (ess-object-name-db-file . ess-r-namedb.el) (ess-imenu-mode-function quote ess-imenu-R) (inferior-ess-program . inferior-R-program-name) (inferior-ess-objects-command . inferior-R-objects-command) (inferior-ess-font-lock-keywords . inferior-ess-R-font-lock-keywords) (inferior-ess-search-list-command . search()
    TS> ) (inferior-ess-help-command . help("%s", htmlhelp=FALSE)
    TS> ) (inferior-ess-help-filetype) (inferior-ess-exit-command . q()) (inferior-ess-exit-prompt . Save workspace image? [y/n/c]: ) (inferior-ess-primary-prompt . \([A-Z][][A-Za-z0-9.]*\)?> ) (inferior-ess-secondary-prompt . + ?) (inferior-ess-start-file) (inferior-ess-start-args . ) (ess-STERM . iESS) (ess-editor . R-editor) (ess-pager . R-pager) (ess-language . S) (inferior-ess-exit-command . q()
    TS> ) (inferior-ess-language-start eval inferior-S-language-start) (comint-use-prompt-regexp-instead-of-fields . t)) 
    TS> (ess-mode-1.6): editing-alist=((paragraph-start concat \s-*$\| page-delimiter) (paragraph-separate concat \s-*$\| page-delimiter) (paragraph-ignore-fill-prefix . t) (require-final-newline . t) (comment-start . #) (comment-add . 1) (comment-start-skip . #+ *) (comment-column . 40) (indent-line-function quote S-indent-line) (parse-sexp-ignore-comments . t) (ess-style . ess-default-style) (ess-local-process-name) (ess-mode-syntax-table . S-syntax-table) (add-log-current-defun-header-regexp . ^\(.+\)\s-+<-[ 	
    TS> ]*function) (font-lock-defaults quote (ess-R-mode-font-lock-keywords nil nil ((46 . w) (95 . w))))) 
    TS> (ess-setq-vars-LOCAL): language=S, dialect=R, buf=nil, comint..echoes=nil, comint..sender=comint-simple-send

    TS> Finished setting up ESS-mode.
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 1538, (p)-Ini-pt = 78
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(1416,1437),1416
    TS> ess-END-of-fun: S4=nil, beginning = 1416
    TS> (ess-setq-vars-LOCAL): language=S, dialect=R, buf=*ESS-errors*, comint..echoes=nil, comint..sender=comint-simple-send
    TS> (ess-setq-vars-LOCAL): language=S, dialect=R, buf=nil, comint..echoes=nil, comint..sender=comint-simple-send
    TS> (ess-mode-1): ess-language=S, ess-dialect=R buf=neut_ord.R 
    TS> (ess-mode-1.5): alist=((ess-local-customize-alist quote R-customize-alist) (ess-dialect . R) (ess-suffix . R) (ess-dump-filename-template ess-replace-regexp-in-string S$ ess-suffix ess-dump-filename-template-proto) (ess-mode-syntax-table . R-syntax-table) (ess-mode-editing-alist . R-editing-alist) (ess-change-sp-regexp . ess-R-change-sp-regexp) (ess-help-sec-regex . ess-help-R-sec-regex) (ess-help-sec-keys-alist . ess-help-R-sec-keys-alist) (ess-loop-timeout . ess-S-loop-timeout) (ess-cmd-delay . ess-R-cmd-delay) (ess-function-pattern . ess-R-function-pattern) (ess-object-name-db-file . ess-r-namedb.el) (ess-imenu-mode-function quote ess-imenu-R) (inferior-ess-program . inferior-R-program-name) (inferior-ess-objects-command . inferior-R-objects-command) (inferior-ess-font-lock-keywords . inferior-ess-R-font-lock-keywords) (inferior-ess-search-list-command . search()
    TS> ) (inferior-ess-help-command . help("%s", htmlhelp=FALSE)
    TS> ) (inferior-ess-help-filetype) (inferior-ess-exit-command . q()) (inferior-ess-exit-prompt . Save workspace image? [y/n/c]: ) (inferior-ess-primary-prompt . \([A-Z][][A-Za-z0-9.]*\)?> ) (inferior-ess-secondary-prompt . + ?) (inferior-ess-start-file) (inferior-ess-start-args . ) (ess-STERM . iESS) (ess-editor . R-editor) (ess-pager . R-pager) (ess-language . S) (inferior-ess-exit-command . q()
    TS> ) (inferior-ess-language-start eval inferior-S-language-start) (comint-use-prompt-regexp-instead-of-fields . t)) 
    TS> (ess-mode-1.6): editing-alist=((paragraph-start concat \s-*$\| page-delimiter) (paragraph-separate concat \s-*$\| page-delimiter) (paragraph-ignore-fill-prefix . t) (require-final-newline . t) (comment-start . #) (comment-add . 1) (comment-start-skip . #+ *) (comment-column . 40) (indent-line-function quote S-indent-line) (parse-sexp-ignore-comments . t) (ess-style . ess-default-style) (ess-local-process-name) (ess-mode-syntax-table . S-syntax-table) (add-log-current-defun-header-regexp . ^\(.+\)\s-+<-[ 	
    TS> ]*function) (font-lock-defaults quote (ess-R-mode-font-lock-keywords nil nil ((46 . w) (95 . w))))) 
    TS> (ess-setq-vars-LOCAL): language=S, dialect=R, buf=nil, comint..echoes=nil, comint..sender=comint-simple-send

    TS> Finished setting up ESS-mode.
    TS> (get-object-list R) .. using existing ess-*-alist
    TS> (length alist) : 9
    TS> (ess-object-names obj=.GlobalEnv): no directory - trying names
    TS> have re-read pos=1: -> length 22
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 4686, (p)-Ini-pt = 0
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(4570,4594),4570
    TS> ess-END-of-fun: S4=nil, beginning = 4570
    TS> (get-object-list R) .. using existing ess-*-alist
    TS> (length alist) : 9
    TS> (ess-object-names obj=.GlobalEnv): no directory - trying names
    TS> have re-read pos=1: -> length 23
    TS> (get-object-list R) .. using existing ess-*-alist
    TS> (length alist) : 9
    TS> (ess-object-names obj=.GlobalEnv): no directory - trying names
    TS> have re-read pos=1: -> length 24
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 4655, (p)-Ini-pt = 0
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(4570,4594),4570
    TS> ess-END-of-fun: S4=nil, beginning = 4570
    TS> (get-object-list R) .. using existing ess-*-alist
    TS> (length alist) : 9
    TS> (ess-object-names obj=.GlobalEnv): no directory - trying names
    TS> have re-read pos=1: -> length 25
    TS> (get-object-list R) .. using existing ess-*-alist
    TS> (length alist) : 9
    TS> (ess-object-names obj=.GlobalEnv): no directory - trying names
    TS> have re-read pos=1: -> length 25
    TS> (get-object-list R) .. using existing ess-*-alist
    TS> (length alist) : 9
    TS> (ess-object-names obj=.GlobalEnv): no directory - trying names
    TS> have re-read pos=1: -> length 26
    TS> (get-object-list R) .. using existing ess-*-alist
    TS> (length alist) : 9
    TS> (ess-object-names obj=.GlobalEnv): no directory - trying names
    TS> have re-read pos=1: -> length 26
    TS> (ess-setq-vars-LOCAL): language=S, dialect=R, buf=nil, comint..echoes=nil, comint..sender=comint-simple-send
    TS> (get-object-list R) .. using existing ess-*-alist
    TS> (length alist) : 9
    TS> (ess-object-names obj=.GlobalEnv): no directory - trying names
    TS> have re-read pos=1: -> length 26
    TS> (ess-object-names obj=bell.10): no directory - trying names
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 1104, (p)-Ini-pt = 0
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(864,880),864
    TS> Match,Pt:(279,299),279
    TS> ess-END-of-fun: S4=nil, beginning = 279
    TS> (get-object-list R) .. using existing ess-*-alist
    TS> (length alist) : 9
    TS> (ess-object-names obj=.GlobalEnv): no directory - trying names
    TS> have re-read pos=1: -> length 26
    TS> (ess-object-names obj=bell.10): no directory - trying names
    TS> (ess-object-names obj=bell.10): no directory - trying names
    TS> (ess-object-names obj=bell.10): no directory - trying names
    TS> (ess-object-names obj=bell.01): no directory - trying names
    TS> (ess-object-names obj=bell.01): no directory - trying names
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 1256, (p)-Ini-pt = 0
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(864,880),864
    TS> Match,Pt:(279,299),279
    TS> ess-END-of-fun: S4=nil, beginning = 279
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 1035, (p)-Ini-pt = 0
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(864,880),864
    TS> Match,Pt:(279,299),279
    TS> ess-END-of-fun: S4=nil, beginning = 279
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 1035, (p)-Ini-pt = 0
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(864,880),864
    TS> Match,Pt:(279,299),279
    TS> ess-END-of-fun: S4=nil, beginning = 279
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 1035, (p)-Ini-pt = 0
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(864,880),864
    TS> Match,Pt:(279,299),279
    TS> ess-END-of-fun: S4=nil, beginning = 279
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 1035, (p)-Ini-pt = 0
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(864,880),864
    TS> Match,Pt:(279,299),279
    TS> ess-END-of-fun: S4=nil, beginning = 279
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 5167, (p)-Ini-pt = 24
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(5036,5062),5036
    TS> ess-END-of-fun: S4=nil, beginning = 5036
    TS> (get-object-list R) .. using existing ess-*-alist
    TS> (length alist) : 9
    TS> (ess-object-names obj=.GlobalEnv): no directory - trying names
    TS> have re-read pos=1: -> length 32
    TS> (get-object-list R) .. using existing ess-*-alist
    TS> (length alist) : 9
    TS> (ess-object-names obj=.GlobalEnv): no directory - trying names
    TS> have re-read pos=1: -> length 37
    TS> (get-object-list R) .. using existing ess-*-alist
    TS> (length alist) : 9
    TS> (ess-object-names obj=.GlobalEnv): no directory - trying names
    TS> have re-read pos=1: -> length 38
    TS> (ess-object-names obj=bell.01vp): no directory - trying names
    TS> (ess-object-names obj=bell.01vp): no directory - trying names
    TS> (ess-object-names obj=bell.01vp$part): no directory - trying names
    TS> (ess-object-names obj=bell.01vp$part): no directory - trying names
    TS> (ess-object-names obj=bell.01vp$part$fract): no directory - trying names
    TS> (ess-object-names obj=bell.01vp$part$fract): no directory - trying names
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 6660, (p)-Ini-pt = 23
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(6501,6521),6501
    TS> ess-END-of-fun: S4=nil, beginning = 6501
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 6703, (p)-Ini-pt = 4
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(6501,6521),6501
    TS> ess-END-of-fun: S4=nil, beginning = 6501
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 6773, (p)-Ini-pt = 0
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(6501,6521),6501
    TS> ess-END-of-fun: S4=nil, beginning = 6501
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 6817, (p)-Ini-pt = 0
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(6501,6521),6501
    TS> ess-END-of-fun: S4=nil, beginning = 6501
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 6817, (p)-Ini-pt = 0
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(6501,6521),6501
    TS> ess-END-of-fun: S4=nil, beginning = 6501
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 6809, (p)-Ini-pt = 0
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(6501,6521),6501
    TS> ess-END-of-fun: S4=nil, beginning = 6501
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 6809, (p)-Ini-pt = 0
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(6501,6521),6501
    TS> ess-END-of-fun: S4=nil, beginning = 6501
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 6768, (p)-Ini-pt = 0
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(6501,6521),6501
    TS> ess-END-of-fun: S4=nil, beginning = 6501
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 6768, (p)-Ini-pt = 0
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(6501,6521),6501
    TS> ess-END-of-fun: S4=nil, beginning = 6501
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 6821, (p)-Ini-pt = 12
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(6501,6521),6501
    TS> ess-END-of-fun: S4=nil, beginning = 6501
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 6762, (p)-Ini-pt = 0
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(6501,6521),6501
    TS> ess-END-of-fun: S4=nil, beginning = 6501
    TS> (get-object-list R) .. using existing ess-*-alist
    TS> (length alist) : 9
    TS> (ess-object-names obj=.GlobalEnv): no directory - trying names
    TS> have re-read pos=1: -> length 24
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 6716, (p)-Ini-pt = 11
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(6501,6521),6501
    TS> ess-END-of-fun: S4=nil, beginning = 6501
    TS> (get-object-list R) .. using existing ess-*-alist
    TS> (length alist) : 9
    TS> (ess-object-names obj=.GlobalEnv): no directory - trying names
    TS> have re-read pos=1: -> length 25
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 6414, (p)-Ini-pt = 12
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(5983,6003),5983
    TS> ess-END-of-fun: S4=nil, beginning = 5983
    TS> (ess-object-names obj=bell.01): no directory - trying names
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 6457, (p)-Ini-pt = 75
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(5983,6003),5983
    TS> ess-END-of-fun: S4=nil, beginning = 5983
    TS> (ess-object-names obj=bell.02): no directory - trying names
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 4868, (p)-Ini-pt = 16
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(4337,4365),4337
    TS> ess-END-of-fun: S4=nil, beginning = 4337
    TS> (get-object-list R) .. using existing ess-*-alist
    TS> (length alist) : 9
    TS> (ess-object-names obj=.GlobalEnv): no directory - trying names
    TS> have re-read pos=1: -> length 33
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 4772, (p)-Ini-pt = 35
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(4337,4365),4337
    TS> ess-END-of-fun: S4=nil, beginning = 4337
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 5533, (p)-Ini-pt = 10
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(4337,4365),4337
    TS> ess-END-of-fun: S4=nil, beginning = 4337
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 5691, (p)-Ini-pt = 0
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(4337,4365),4337
    TS> ess-END-of-fun: S4=nil, beginning = 4337
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 5509, (p)-Ini-pt = 19
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(4337,4365),4337
    TS> ess-END-of-fun: S4=nil, beginning = 4337
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 5631, (p)-Ini-pt = 0
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(4337,4365),4337
    TS> ess-END-of-fun: S4=nil, beginning = 4337
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 3483, (p)-Ini-pt = 24
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(3289,3310),3289
    TS> ess-END-of-fun: S4=nil, beginning = 3289
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 3483, (p)-Ini-pt = 24
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(3289,3310),3289
    TS> ess-END-of-fun: S4=nil, beginning = 3289
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 3481, (p)-Ini-pt = 26
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(3289,3310),3289
    TS> ess-END-of-fun: S4=nil, beginning = 3289
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 3404, (p)-Ini-pt = 12
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(3289,3310),3289
    TS> ess-END-of-fun: S4=nil, beginning = 3289
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 3712, (p)-Ini-pt = 26
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(3656,3677),3656
    TS> ess-END-of-fun: S4=nil, beginning = 3656
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 3557, (p)-Ini-pt = 41
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(3289,3310),3289
    TS> ess-END-of-fun: S4=nil, beginning = 3289
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 3557, (p)-Ini-pt = 41
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(3289,3310),3289
    TS> ess-END-of-fun: S4=nil, beginning = 3289
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 3557, (p)-Ini-pt = 41
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(3289,3310),3289
    TS> ess-END-of-fun: S4=nil, beginning = 3289
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 3481, (p)-Ini-pt = 26
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(3289,3310),3289
    TS> ess-END-of-fun: S4=nil, beginning = 3289
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 3074, (p)-Ini-pt = 21
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(2937,2953),2937
    TS> Match,Pt:(1632,1653),1632
    TS> ess-END-of-fun: S4=nil, beginning = 1632
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 3588, (p)-Ini-pt = 10
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(3289,3310),3289
    TS> ess-END-of-fun: S4=nil, beginning = 3289
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 3588, (p)-Ini-pt = 10
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(3289,3310),3289
    TS> ess-END-of-fun: S4=nil, beginning = 3289
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 3588, (p)-Ini-pt = 10
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(3289,3310),3289
    TS> ess-END-of-fun: S4=nil, beginning = 3289
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 3682, (p)-Ini-pt = 21
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(3656,3677),3656
    TS> ess-END-of-fun: S4=nil, beginning = 3656
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 3682, (p)-Ini-pt = 21
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(3656,3677),3656
    TS> ess-END-of-fun: S4=nil, beginning = 3656
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 3682, (p)-Ini-pt = 21
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(3656,3677),3656
    TS> ess-END-of-fun: S4=nil, beginning = 3656
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 3481, (p)-Ini-pt = 26
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(3289,3310),3289
    TS> ess-END-of-fun: S4=nil, beginning = 3289
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 3557, (p)-Ini-pt = 41
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(3289,3310),3289
    TS> ess-END-of-fun: S4=nil, beginning = 3289
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 3557, (p)-Ini-pt = 41
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(3289,3310),3289
    TS> ess-END-of-fun: S4=nil, beginning = 3289
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 3557, (p)-Ini-pt = 41
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(3289,3310),3289
    TS> ess-END-of-fun: S4=nil, beginning = 3289
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 3404, (p)-Ini-pt = 12
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(3289,3310),3289
    TS> ess-END-of-fun: S4=nil, beginning = 3289
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 3404, (p)-Ini-pt = 12
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(3289,3310),3289
    TS> ess-END-of-fun: S4=nil, beginning = 3289
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 3712, (p)-Ini-pt = 26
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(3656,3677),3656
    TS> ess-END-of-fun: S4=nil, beginning = 3656
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 3897, (p)-Ini-pt = 15
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(3802,3826),3802
    TS> ess-END-of-fun: S4=nil, beginning = 3802
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 4349, (p)-Ini-pt = 8
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(4166,4188),4166
    TS> ess-END-of-fun: S4=nil, beginning = 4166
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 4349, (p)-Ini-pt = 8
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(4166,4188),4166
    TS> ess-END-of-fun: S4=nil, beginning = 4166
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 3955, (p)-Ini-pt = 0
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(3802,3826),3802
    TS> ess-END-of-fun: S4=nil, beginning = 3802
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 3557, (p)-Ini-pt = 41
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(3289,3310),3289
    TS> ess-END-of-fun: S4=nil, beginning = 3289
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 3481, (p)-Ini-pt = 26
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(3289,3310),3289
    TS> ess-END-of-fun: S4=nil, beginning = 3289
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 3712, (p)-Ini-pt = 26
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(3656,3677),3656
    TS> ess-END-of-fun: S4=nil, beginning = 3656
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 3712, (p)-Ini-pt = 26
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(3656,3677),3656
    TS> ess-END-of-fun: S4=nil, beginning = 3656
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 3955, (p)-Ini-pt = 0
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(3802,3826),3802
    TS> ess-END-of-fun: S4=nil, beginning = 3802
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 3682, (p)-Ini-pt = 21
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(3656,3677),3656
    TS> ess-END-of-fun: S4=nil, beginning = 3656
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 3682, (p)-Ini-pt = 21
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(3656,3677),3656
    TS> ess-END-of-fun: S4=nil, beginning = 3656
    TS> ess-BEG-of-fun after 'search-FWD (': Ini-pt 3682, (p)-Ini-pt = 21
    TS> ELSE  not in setMethod() header ...
    TS> Match,Pt:(3656,3677),3656
    TS> ess-END-of-fun: S4=nil, beginning = 3656



    TS> Emacs  : GNU Emacs 22.2.1 (i686-pc-linux-gnu, X toolkit)
    TS> of 2008-03-28 on blackbart
    TS> Package: ess-mode 5.3.7

    TS> current state:
    TS> ==============
    TS> (setq
    TS> ess-language "S"
    TS> ess-dialect "R"
    TS> ess-ask-for-ess-directory nil
    TS> ess-ask-about-transfile nil
    TS> ess-directory "/home/tyler/rworkingdirectory/"
    TS> ess-keep-dump-files "always"
    TS> ess-source-directory "/tmp/"
    TS> )

    TS> _______________________________________________
    TS> ESS-bugs ESS-bugs at stat.math.ethz.ch
    TS> https://stat.ethz.ch/mailman/listinfo/ess-bugs

    TS> _______________________________________________
    TS> ESS-core list: https://stat.ethz.ch/mailman/listinfo/ess-core



More information about the ESS-bugs mailing list