[ECB-list] XEmacs 21.5 beta hangs on ecb-activate

[fAX k.r. <fa...@01...>]

Symptoms: few seconds after ecb-activate, XEmacs 21.5 beta18 writes in=20
mini-buffer 'variable semantic--before-fetch-tags-hook is bound but not=20
referenced', then 'Error in pre-gc-hook: stack owerflow', then 'Error in =

`post-gc-hook': Attempt to throw outside the function call. All this=20
time XEmacs consumes all the CPU. ECB version 2.31, the latest one.

If I kill xemacs, I'm getting the following backtrace.
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D

Lisp backtrace follows:

# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# bind (/home/fax> left top right bottom buffer edges window)
root-window->saved-window(#<window on " *Minibuf-0*" 0x10c4>)
# bind (left top right bottom buffer edges window)
root-window->saved-window(#<window on "*scratch*" 0xf11>)
# bind (frame frame)
ad-Orig-current-window-configuration(nil)
# bind (ad-return-value frame)
current-window-configuration()
# bind (frame configuration)
ad-Orig-set-window-configuration([cl-struct-window-configuration=20
#<x-frame "emacs" 0xf10> 724 894 #<buffer "*Compile-Log*"> 13 10 4=20
[cl-struct-saved-window t nil nil #<buffer "*scratch*"> #<marker in no=20
buffer 0x8eef75c> #<marker at 1 in *scratch* 0x8eef78c> #<marker at 398=20
in *scratch* 0x8eef774> 0 0 716 852 0 0 nil nil nil=20
[cl-struct-saved-window nil t nil #<buffer " *Minibuf-0*"> #<marker in=20
no buffer 0x8eef7a4> #<marker at 1 in  *Minibuf-0* 0x8eef864> #<marker=20
at 1 in  *Minibuf-0* 0x8eef7bc> 0 852 716 865 0 0 nil nil nil nil]]])
# bind (ad-return-value configuration)
set-window-configuration([cl-struct-window-configuration #<x-frame=20
"emacs" 0xf10> 724 894 #<buffer "*Compile-Log*"> 13 10 4=20
[cl-struct-saved-window t nil nil #<buffer "*scratch*"> #<marker in no=20
buffer 0x8eef75c> #<marker at 1 in *scratch* 0x8eef78c> #<marker at 398=20
in *scratch* 0x8eef774> 0 0 716 852 0 0 nil nil nil=20
[cl-struct-saved-window nil t nil #<buffer " *Minibuf-0*"> #<marker in=20
no buffer 0x8eef7a4> #<marker at 1 in  *Minibuf-0* 0x8eef864> #<marker=20
at 1 in  *Minibuf-0* 0x8eef7bc> 0 852 716 865 0 0 nil nil nil nil]]])
# bind (G39906)
# (unwind-protect ...)
# bind (current-frame current-point list window minibuf frame)
ecb-window-list(#<x-frame "emacs" 0xf10> 0 #<window on "*scratch*" 0xf11>=
)
# bind (winlist)
ecb-canonical-ecb-windows-list()
ecb-get-current-visible-ecb-buffers()
# bind (f)
byte-code("..." [ecb-compile-window ad-return-value f frame=20
ecb-windows-hidden ecb-frame selected-frame ecb-window-config-cache-add=20
ecb-get-current-visible-ecb-buffers ecb-compile-window-live-p=20
ecb-position ecb-window-list 0 frame-first-window=20
ecb-window-configuration-data ecb-layout-name ecb-compile-window-height=20
ecb-compile-window-width ecb-windows-width ecb-windows-height=20
ecb-edit-area-creators] 10)
# (condition-case ... . ((error (byte-code "A#" [oops=20
ecb-layout-debug-error "advice of current-window-configuration failed:=20
(error-type: %S, error-data: %S)"] 4))))
# bind (ad-return-value frame)
current-window-configuration()
# bind (frame configuration)
ad-Orig-set-window-configuration([cl-struct-window-configuration=20
#<x-frame "emacs" 0xf10> 724 894 #<buffer "*Compile-Log*"> 13 10 4=20
[cl-struct-saved-window t nil nil #<buffer "*scratch*"> #<marker in no=20
buffer 0x8eb9bec> #<marker at 1 in *scratch* 0x8eb9c1c> #<marker at 398=20
in *scratch* 0x8eb9c04> 0 0 716 852 0 0 nil nil nil=20
[cl-struct-saved-window nil t nil #<buffer " *Minibuf-0*"> #<marker in=20
no buffer 0x8eb9c34> #<marker at 1 in  *Minibuf-0* 0x8eb9c64> #<marker=20
at 1 in  *Minibuf-0* 0x8eb9c4c> 0 852 716 865 0 0 nil nil nil nil]]])
# bind (ad-return-value configuration)
set-window-configuration([cl-struct-window-configuration #<x-frame=20
"emacs" 0xf10> 724 894 #<buffer "*Compile-Log*"> 13 10 4=20
[cl-struct-saved-window t nil nil #<buffer "*scratch*"> #<marker in no=20
buffer 0x8eb9bec> #<marker at 1 in *scratch* 0x8eb9c1c> #<marker at 398=20
in *scratch* 0x8eb9c04> 0 0 716 852 0 0 nil nil nil=20
[cl-struct-saved-window nil t nil #<buffer " *Minibuf-0*"> #<marker in=20
no buffer 0x8eb9c34> #<marker at 1 in  *Minibuf-0* 0x8eb9c64> #<marker=20
at 1 in  *Minibuf-0* 0x8eb9c4c> 0 852 716 865 0 0 nil nil nil nil]]])
# bind (G39906)
# (unwind-protect ...)
# bind (current-frame current-point list window minibuf frame)
ecb-window-list(#<x-frame "emacs" 0xf10> 0 #<window on "*scratch*" 0xf11>=
)
# bind (winlist)
ecb-canonical-edit-windows-list()
ecb-window-configuration-data()
# bind (f)
byte-code("..." [ecb-compile-window ad-return-value f frame=20
ecb-windows-hidden ecb-frame selected-frame ecb-window-config-cache-add=20
ecb-get-current-visible-ecb-buffers ecb-compile-window-live-p=20
ecb-position ecb-window-list 0 frame-first-window=20
ecb-window-configuration-data ecb-layout-name ecb-compile-window-height=20
ecb-compile-window-width ecb-windows-width ecb-windows-height=20
ecb-edit-area-creators] 10)
=2E...............
And so on.
=2E...............
byte-code("..." [ecb-compile-window ad-return-value f frame=20
ecb-windows-hidden ecb-frame selected-frame ecb-window-config-cache-add=20
ecb-get-current-visible-ecb-buffers ecb-compile-window-live-p=20
ecb-position ecb-window-list 0 frame-first-window=20
ecb-window-configuration-data ecb-layout-name ecb-compile-window-height=20
ecb-compile-window-width ecb-windows-width ecb-windows-height=20
ecb-edit-area-creators] 10)
# (condition-case ... . ((error (byte-code "A#" [oops=20
ecb-layout-debug-error "advice of current-window-configuration failed:=20
(error-type: %S, error-data: %S)"] 4))))
# bind (ad-return-value frame)
current-window-configuration()
# bind (shrink-to-fit override-frame not-this-window-p buffer)
display-buffer(#<buffer "*Compile-Log-Show*"> nil nil nil)
byte-code("..." [temp-buffer-shrink-to-fit buffer display-buffer nil] 5)
# (condition-case ... . ((wrong-number-of-arguments (byte-code=20
&#9618;=C0     \n#     &#399;#)" [temp-buffer-shrink-to-fit buffer=20
ecb-temp-buffer-shrink-to-fit ecb-layout-debug-error=20
"show-temp-buffer-in-current-frame for %s: we call a 3-arg=20
display-buffer: %s" display-buffer nil] 4)) (error (byte-code A\"" [oops =

signal] 3)) (quit (byte-code "@&#65533;"" [signal quit nil] 3))))
# (unwind-protect ...)
# bind (pre-display-buffer-function ad-return-value buffer)
show-temp-buffer-in-current-frame(#<buffer "*Compile-Log-Show*">)
# bind (show-buffer show-begin)
# (unwind-protect ...)
byte-code("..." [byte-compile-point-max-prev byte-compile-log-buffer=20
byte-compile-warnings-beginning temp-buffer-show-function show-begin=20
show-buffer "
                           \n" nil get-buffer-create=20
"*Compile-Log-Show*" erase-buffer copy-to-buffer select-window=20
selected-window display-buffer recenter 1 buffer-read-only] 5)
# bind (byte-compile-warnings-beginning byte-compile-point-max-prev=20
byte-compile-log-buffer form)
byte-compile(custom-save-all)
# bind (ad-activate-on-top-level function)
ad-compile-function(custom-save-all)
# bind (verified-cached-definition compile function)
ad-activate-advised-definition(custom-save-all nil)
# bind (ad-activate-on-top-level compile function)
ad-activate(custom-save-all)
# bind (--dolist-temp--39907 elem advice-list)
ecb-enable-advices(((delete-frame . around)=20
(compilation-set-window-height . around)=20
(shrink-window-if-larger-than-buffer . around)=20
(show-temp-buffer-in-current-frame . around) (pop-to-buffer . around)=20
(current-window-configuration . after) (set-window-configuration .=20
after) (scroll-other-window . around) (custom-save-all . around)=20
(count-windows . around) (scroll-all-mode . after)))
byte-code("..." [ecb-upgrade-check-done dummy-buf-name=20
ecb-running-xemacs --dolist-temp--39916 curr-buffer-list ecb-frame=20
ecb-check-requirements ecb-nav-initialize=20
ecb-check-not-compatible-options ecb-upgrade-not-compatible-options=20
ecb-upgrade-renamed-options t ecb-initialize-layout=20
ecb-clear-tag-tree-cache ecb-clear-files-and-subdirs-cache=20
ecb-clear-directory-empty-cache ecb-sources-cache-clear=20
ecb-reset-history-filter ecb-initialize-internal-vars ecb-enable-advices =

run-hooks ecb-activate-before-new-frame-created-hook make-frame put=20
ecb-new-frame-created selected-frame nil raise-frame select-frame=20
ecb-enable-own-temp-buffer-show-function mapcar #<compiled-function=20
(buff) "...(4)" [buff buffer-name] 2> buffer-list=20
ecb-create-directories-tree-buffer ecb-create-sources-tree-buffer=20
ecb-create-methods-tree-buffer ecb-create-history-tree-buffer=20
ecb-eshell-activate-integration add-hook=20
semantic-after-partial-cache-change-hook=20
ecb-update-after-partial-reparse=20
semantic-after-toplevel-cache-change-hook=20
ecb-rebuild-methods-buffer-with-tagcache=20
ecb-activate-ecb-autocontrol-functions ecb-tag-sync=20
ecb-window-sync-function ecb-compilation-buffer-list-changed-p post=20
ecb-layout-post-command-hook pre ...] 4)
# (condition-case ... . ((error (ecb-clean-up-after-activation-failure=20
"Errors during the basic setup of ECB." err-obj))))
ecb-activate--impl()
ecb-activate-internal()
# bind (new-state arg)
ecb-minor-mode(1)
#<compiled-function nil "...(4)" [ecb-minor-mode 1] 2=20
("/usr/share/xemacs/xemacs-packages/lisp/ecb/ecb.elc" . 69254) nil>()
call-interactively(ecb-activate)
command-execute(ecb-activate t)
# bind (_execute_command_keys_ _execute_command_name_ prefix-arg)
execute-extended-command(nil)
# bind (command-debug-status)
call-interactively(execute-extended-command)
# (condition-case ... . error)
# (catch top-level ...)


For now, I'm going to switch back to XEmacs 21.4 as I need ECB :).

--=20
With best regards.