Re: [ECB-list] ECB & Fresh CEDET

Alex Ott <[email protected]> Thu, 7 Jun 2012 21:12:57 +0200
Newsgroups gmane.emacs.cedet,gmane.emacs.code-browser
Message-ID <CALV1_=KOA_Bdj+_0cmV_KGCC25vFtMgiBi5etZqQYfw+NzosnQ@mail.gmail.com>
Please, try to compile ECB - I want also be sure that Makefile changes
were correct (it works on my Mac OS X, and I can check Linux only next
week)

On Thu, Jun 7, 2012 at 9:05 PM, Steve Molitor <[email protected]> wrot=
e:
> Doh! =A0Got the correct branch, working great so far!
>
> Thanks
>
>
> On Thu, Jun 7, 2012 at 1:51 PM, Alex Ott <[email protected]> wrote:
>>
>> you've used master, while changes were made in cedet-new branch
>>
>> On Thu, Jun 7, 2012 at 8:45 PM, Steve Molitor <[email protected]>
>> wrote:
>> > This sounds great. =A0However it didn't work for me on Aquamacs 24.0.9=
2.3
>> > on
>> > OS X Lion). =A0To install I did:
>> >
>> > # in my shell:
>> > cd ~/elisp
>> > git clone=A0https://github.com/alexott/ecb.git
>> >
>> > ;; added to my empty .emacs:
>> > (add-to-list 'load-path "~/elisp/ecb")
>> > (require 'ecb)
>> >
>> > Running ecb-activate gives me this stack race:
>> >
>> > Debugger entered--Lisp error: (void-variable stack-trace-on-error)
>> > =A0 apply(debug error (void-variable stack-trace-on-error))
>> > =A0 edebug(error (void-variable stack-trace-on-error))
>> > =A0 signal(void-variable (stack-trace-on-error))
>> > =A0 edebug-signal(void-variable (stack-trace-on-error))
>> > =A0 (let ((stack-trace-on-error stack-trace-on-error)) (when
>> > (run-hook-with-args-until-failure (quote ecb-before-activate-hook))
>> > (when (<
>> > max-specpdl-size 3000) (ecb-modify-emacs-variable (quote
>> > max-specpdl-size)
>> > (quote store) 3000)) (when (< max-lisp-eval-depth 1000)
>> > (ecb-modify-emacs-variable (quote max-lisp-eval-depth) (quote store)
>> > 1000))
>> > (when (and ecb-running-xemacs (boundp (quote
>> > progress-feedback-use-echo-area))) (ecb-modify-emacs-variable (quote
>> > progress-feedback-use-echo-area) (quote store) t))
>> > (ecb-check-cedet-load)
>> > (ecb-check-semantic-load) (ecb-check-requirements) (condition-case
>> > err-obj
>> > (progn (ecb-nav-initialize) (ecb-enable-advices (quote
>> > ecb-methods-browser-advices)) (when (and ecb-auto-compatibility-check
>> > (not
>> > ecb-upgrade-check-done)) (ecb-check-not-compatible-options)
>> > (ecb-upgrade-not-compatible-options) (ecb-upgrade-renamed-options) (se=
tq
>> > ecb-upgrade-check-done t)) (ecb-initialize-layout)
>> > (ecb-initialize-all-internals (not ecb-clear-caches-before-activate))
>> > (ecb-enable-advices (quote ecb-permanent-adviced-layout-functions))
>> > (ecb-enable-advices (quote ecb-winman-not-supported-function-advices))
>> > (ecb-enable-advices (quote ecb-compatibility-advices)) (let
>> > ((old-ecb-frame
>> > ecb-frame)) (if ecb-new-ecb-frame (progn (run-hooks ...) (setq ecb-fra=
me
>> > ...) (put ... ... t)) (setq ecb-frame (selected-frame)) (put (quote
>> > ecb-frame) (quote ecb-new-frame-created) nil)) (if (not (equal ecb-fra=
me
>> > old-ecb-frame)) (ecb-edit-area-creators-init))) (raise-frame ecb-frame)
>> > (select-frame ecb-frame) (ecb-enable-own-temp-buffer-show-function t)
>> > (ecb-tree-buffer-creators-run) (ecb-eshell-activate-integration)
>> > (add-hook
>> > (ecb--semantic-after-partial-cache-change-hook) (quote
>> > ecb-update-after-partial-reparse) t) (add-hook
>> > (ecb--semantic-after-toplevel-cache-change-hook) (quote
>> > ecb-rebuild-methods-buffer-with-tagcache) t)
>> > (ecb-activate-ecb-autocontrol-function
>> > ecb-highlight-tag-with-point-delay
>> > (quote ecb-tag-sync)) (ecb-activate-ecb-autocontrol-function
>> > ecb-basic-buffer-sync-delay (quote ecb-basic-buffer-sync))
>> > (ecb-activate-ecb-autocontrol-function ecb-compilation-update-idle-time
>> > (quote ecb-compilation-buffer-list-changed-p))
>> > (ecb-activate-ecb-autocontrol-function (quote post) (quote
>> > ecb-layout-post-command-hook)) (ecb-activate-ecb-autocontrol-function
>> > (quote
>> > pre) (quote ecb-layout-pre-command-hook))
>> > (ecb-activate-ecb-autocontrol-function 0.5 (quote
>> > ecb-repair-only-ecb-window-layout))
>> > (ecb-activate-ecb-autocontrol-function
>> > (quote post) (quote ecb-handle-major-mode-visibilty)) (add-hook (quote
>> > after-save-hook) (quote ecb-update-methods-after-saving)) (add-hook
>> > (quote
>> > kill-buffer-hook) (quote ecb-kill-buffer-hook)) (add-hook (quote
>> > find-file-hooks) (quote ecb-find-file-hook))
>> > (ecb-activate-ecb-autocontrol-function 1 (quote
>> > ecb-monitor-autocontrol-functions)) (ecb-stealthy-function-state-init)
>> > (ecb-activate-ecb-autocontrol-function ecb-stealthy-tasks-delay (quote
>> > ecb-stealthy-updates)) (ecb-compilation-buffer-list-init)
>> > (ecb-activate-ediff-compatibility) (ecb-vc-enable-internals 1) (when
>> > ecb-running-xemacs (let ((dummy-buf-name " *dummytogetglobalmap*"))
>> > (with-current-buffer (get-buffer-create dummy-buf-name) (add-submenu n=
il
>> > ecb-minor-menu) (kill-buffer dummy-buf-name))) (save-excursion (dolist
>> > (buf
>> > ...) (set-buffer buf) (if ... ...)))) (add-hook (if ecb-running-xemacs
>> > (quote activate-menubar-hook) (quote menu-bar-update-hook)) (quote
>> > ecb-compilation-update-menu))) (error
>> > (ecb-clean-up-after-activation-failure
>> > "Errors during the basic setup of ECB." err-obj))) (condition-case
>> > err-obj
>> > (run-hooks (quote ecb-activate-before-layout-draw-hook)) (error
>> > (ecb-clean-up-after-activation-failure "Errors during the hooks of
>> > ecb-activate-before-layout-draw-hook." err-obj))) (setq ecb-minor-mode
>> > t)
>> > (condition-case err-obj (let ((ecb-redraw-layout-quickly nil)
>> > (use-last-win-conf (and ecb-last-window-config-before-deactivation
>> > (equal
>> > ecb-split-edit-window-after-start ...) (not ...))))
>> > (ecb-enable-temp-buffer-shrink-to-fit ecb-compile-window-height) (if
>> > use-last-win-conf (setq ecb-edit-area-creators (nth 4
>> > ecb-last-window-config-before-deactivation))) (ecb-redraw-layout-full
>> > (quote
>> > no-buffer-sync) nil (and use-last-win-conf (nth 6
>> > ecb-last-window-config-before-deactivation)) (and use-last-win-conf (n=
th
>> > 5
>> > ecb-last-window-config-before-deactivation))) (if (and use-last-win-co=
nf
>> > (null (nth 2 ecb-last-window-config-before-deactivation)))
>> > (ecb-toggle-compile-window -1)) (when (member
>> > ecb-split-edit-window-after-start (quote (vertical horizontal nil)))
>> > (delete-other-windows) (case ecb-split-edit-window-after-start
>> > (horizontal
>> > (split-window-horizontally)) (vertical (split-window-vertically))))
>> > (ecb-window-sync) (ecb-mode-line-format)) (error
>> > (ecb-clean-up-after-activation-failure "Errors during the layout setup
>> > of
>> > ECB." err-obj))) (condition-case err-obj (let ((edit-window (car
>> > (ecb-canonical-edit-windows-list)))) (when (and
>> > ecb-display-default-dir-after-start (null (ecb-buffer-file-name ...)))
>> > (ecb-set-selected-directory (ecb-fix-filename (with-current-buffer ...
>> > default-directory))))) (error (ecb-clean-up-after-activation-failure
>> > "Errors
>> > during setting the default directory." err-obj))) (condition-case
>> > err-obj
>> > (run-hooks (quote ecb-activate-hook)) (error
>> > (ecb-clean-up-after-activation-failure "Errors during the hooks of
>> > ecb-activate-hook." err-obj))) (condition-case err-obj (if
>> > (ecb-show-any-node-info-by-mouse-moving-p)
>> > (tree-buffer-activate-follow-mouse)) (error
>> > (ecb-clean-up-after-activation-failure "Errors during the mouse-tracki=
ng
>> > activation." err-obj))) (setq ecb-minor-mode t) (message "The ECB is n=
ow
>> > activated.") (condition-case err-obj (if (and
>> > ecb-auto-compatibility-check
>> > (or (ecb-not-compatible-or-renamed-options-detected) (not
>> > (ecb-options-version=3Decb-version-p)))) (ecb-run-with-idle-timer 0.25=
 nil
>> > (quote ecb-display-upgraded-options)) (ecb-display-news-for-upgrade))
>> > (error
>> > (ecb-clean-up-after-activation-failure "Error during the
>> > compatibility-check
>> > of ECB." err-obj))) (ignore-errors (when (null ecb-source-path) (let
>> > ((ecb-show-help-format (quote info))) (ecb-show-help) (Info-goto-node
>> > "First
>> > steps")))) (ignore-errors (ecb-show-tip-of-the-day)) (ecb-enable-advic=
es
>> > (quote ecb-layout-basic-adviced-functions)) (condition-case err-obj
>> > (setq
>> > ecb-activated-window-configuration (ecb-current-window-configuration))
>> > (error (ecb-clean-up-after-activation-failure "Errors during the
>> > snapshot of
>> > the windows-configuration." err-obj)))))
>> > =A0 (if ecb-minor-mode (when (and (not (equal (selected-frame) ecb-fra=
me))
>> > (or
>> > (equal ecb-activation-selects-ecb-frame-if-already-active t) (and (equ=
al
>> > ecb-activation-selects-ecb-frame-if-already-active (quote ask))
>> > (y-or-n-p
>> > "ECB is already active in another frame. Select it? "))))
>> > (ecb-select-ecb-frame) (ecb-update-directories-buffer)) (let
>> > ((stack-trace-on-error stack-trace-on-error)) (when
>> > (run-hook-with-args-until-failure (quote ecb-before-activate-hook))
>> > (when (<
>> > max-specpdl-size 3000) (ecb-modify-emacs-variable (quote
>> > max-specpdl-size)
>> > (quote store) 3000)) (when (< max-lisp-eval-depth 1000)
>> > (ecb-modify-emacs-variable (quote max-lisp-eval-depth) (quote store)
>> > 1000))
>> > (when (and ecb-running-xemacs (boundp (quote
>> > progress-feedback-use-echo-area))) (ecb-modify-emacs-variable (quote
>> > progress-feedback-use-echo-area) (quote store) t))
>> > (ecb-check-cedet-load)
>> > (ecb-check-semantic-load) (ecb-check-requirements) (condition-case
>> > err-obj
>> > (progn (ecb-nav-initialize) (ecb-enable-advices (quote
>> > ecb-methods-browser-advices)) (when (and ecb-auto-compatibility-check
>> > (not
>> > ecb-upgrade-check-done)) (ecb-check-not-compatible-options)
>> > (ecb-upgrade-not-compatible-options) (ecb-upgrade-renamed-options) (se=
tq
>> > ecb-upgrade-check-done t)) (ecb-initialize-layout)
>> > (ecb-initialize-all-internals (not ecb-clear-caches-before-activate))
>> > (ecb-enable-advices (quote ecb-permanent-adviced-layout-functions))
>> > (ecb-enable-advices (quote ecb-winman-not-supported-function-advices))
>> > (ecb-enable-advices (quote ecb-compatibility-advices)) (let
>> > ((old-ecb-frame
>> > ecb-frame)) (if ecb-new-ecb-frame (progn ... ... ...) (setq ecb-frame
>> > ...)
>> > (put ... ... nil)) (if (not ...) (ecb-edit-area-creators-init)))
>> > (raise-frame ecb-frame) (select-frame ecb-frame)
>> > (ecb-enable-own-temp-buffer-show-function t)
>> > (ecb-tree-buffer-creators-run)
>> > (ecb-eshell-activate-integration) (add-hook
>> > (ecb--semantic-after-partial-cache-change-hook) (quote
>> > ecb-update-after-partial-reparse) t) (add-hook
>> > (ecb--semantic-after-toplevel-cache-change-hook) (quote
>> > ecb-rebuild-methods-buffer-with-tagcache) t)
>> > (ecb-activate-ecb-autocontrol-function
>> > ecb-highlight-tag-with-point-delay
>> > (quote ecb-tag-sync)) (ecb-activate-ecb-autocontrol-function
>> > ecb-basic-buffer-sync-delay (quote ecb-basic-buffer-sync))
>> > (ecb-activate-ecb-autocontrol-function ecb-compilation-update-idle-time
>> > (quote ecb-compilation-buffer-list-changed-p))
>> > (ecb-activate-ecb-autocontrol-function (quote post) (quote
>> > ecb-layout-post-command-hook)) (ecb-activate-ecb-autocontrol-function
>> > (quote
>> > pre) (quote ecb-layout-pre-command-hook))
>> > (ecb-activate-ecb-autocontrol-function 0.5 (quote
>> > ecb-repair-only-ecb-window-layout))
>> > (ecb-activate-ecb-autocontrol-function
>> > (quote post) (quote ecb-handle-major-mode-visibilty)) (add-hook (quote
>> > after-save-hook) (quote ecb-update-methods-after-saving)) (add-hook
>> > (quote
>> > kill-buffer-hook) (quote ecb-kill-buffer-hook)) (add-hook (quote
>> > find-file-hooks) (quote ecb-find-file-hook))
>> > (ecb-activate-ecb-autocontrol-function 1 (quote
>> > ecb-monitor-autocontrol-functions)) (ecb-stealthy-function-state-init)
>> > (ecb-activate-ecb-autocontrol-function ecb-stealthy-tasks-delay (quote
>> > ecb-stealthy-updates)) (ecb-compilation-buffer-list-init)
>> > (ecb-activate-ediff-compatibility) (ecb-vc-enable-internals 1) (when
>> > ecb-running-xemacs (let (...) (with-current-buffer ... ... ...))
>> > (save-excursion (dolist ... ... ...))) (add-hook (if ecb-running-xemacs
>> > (quote activate-menubar-hook) (quote menu-bar-update-hook)) (quote
>> > ecb-compilation-update-menu))) (error
>> > (ecb-clean-up-after-activation-failure
>> > "Errors during the basic setup of ECB." err-obj))) (condition-case
>> > err-obj
>> > (run-hooks (quote ecb-activate-before-layout-draw-hook)) (error
>> > (ecb-clean-up-after-activation-failure "Errors during the hooks of
>> > ecb-activate-before-layout-draw-hook." err-obj))) (setq ecb-minor-mode
>> > t)
>> > (condition-case err-obj (let ((ecb-redraw-layout-quickly nil)
>> > (use-last-win-conf (and ecb-last-window-config-before-deactivation ...
>> > ...))) (ecb-enable-temp-buffer-shrink-to-fit ecb-compile-window-height)
>> > (if
>> > use-last-win-conf (setq ecb-edit-area-creators (nth 4
>> > ecb-last-window-config-before-deactivation))) (ecb-redraw-layout-full
>> > (quote
>> > no-buffer-sync) nil (and use-last-win-conf (nth 6
>> > ecb-last-window-config-before-deactivation)) (and use-last-win-conf (n=
th
>> > 5
>> > ecb-last-window-config-before-deactivation))) (if (and use-last-win-co=
nf
>> > (null ...)) (ecb-toggle-compile-window -1)) (when (member
>> > ecb-split-edit-window-after-start (quote ...)) (delete-other-windows)
>> > (case
>> > ecb-split-edit-window-after-start (horizontal ...) (vertical ...)))
>> > (ecb-window-sync) (ecb-mode-line-format)) (error
>> > (ecb-clean-up-after-activation-failure "Errors during the layout setup
>> > of
>> > ECB." err-obj))) (condition-case err-obj (let ((edit-window (car ...)))
>> > (when (and ecb-display-default-dir-after-start (null ...))
>> > (ecb-set-selected-directory (ecb-fix-filename ...)))) (error
>> > (ecb-clean-up-after-activation-failure "Errors during setting the
>> > default
>> > directory." err-obj))) (condition-case err-obj (run-hooks (quote
>> > ecb-activate-hook)) (error (ecb-clean-up-after-activation-failure
>> > "Errors
>> > during the hooks of ecb-activate-hook." err-obj))) (condition-case
>> > err-obj
>> > (if (ecb-show-any-node-info-by-mouse-moving-p)
>> > (tree-buffer-activate-follow-mouse)) (error
>> > (ecb-clean-up-after-activation-failure "Errors during the mouse-tracki=
ng
>> > activation." err-obj))) (setq ecb-minor-mode t) (message "The ECB is n=
ow
>> > activated.") (condition-case err-obj (if (and
>> > ecb-auto-compatibility-check
>> > (or (ecb-not-compatible-or-renamed-options-detected) (not ...)))
>> > (ecb-run-with-idle-timer 0.25 nil (quote ecb-display-upgraded-options))
>> > (ecb-display-news-for-upgrade)) (error
>> > (ecb-clean-up-after-activation-failure "Error during the
>> > compatibility-check
>> > of ECB." err-obj))) (ignore-errors (when (null ecb-source-path) (let
>> > ((ecb-show-help-format ...)) (ecb-show-help) (Info-goto-node "First
>> > steps")))) (ignore-errors (ecb-show-tip-of-the-day)) (ecb-enable-advic=
es
>> > (quote ecb-layout-basic-adviced-functions)) (condition-case err-obj
>> > (setq
>> > ecb-activated-window-configuration (ecb-current-window-configuration))
>> > (error (ecb-clean-up-after-activation-failure "Errors during the
>> > snapshot of
>> > the windows-configuration." err-obj))))))
>> > =A0 ecb-activate--impl()
>> > =A0 (if ecb-use-recursive-edit (if ecb-minor-mode (progn (message "ECB
>> > already
>> > activated. Drawing layout.") (ecb-redraw-layout)) (catch (quote exit)
>> > (progn
>> > (ecb-activate--impl) (recursive-edit)) (ecb-deactivate-internal)))
>> > (ecb-activate--impl))
>> > =A0 ecb-activate-internal()
>> > =A0 (if new-state (ecb-activate-internal) (ecb-deactivate-internal))
>> > =A0 (let ((new-state (if (null arg) (not ecb-minor-mode) (>
>> > (prefix-numeric-value arg) 0)))) (if new-state (ecb-activate-internal)
>> > (ecb-deactivate-internal)))
>> > =A0 ecb-minor-mode(1)
>> > =A0 (edebug-after (edebug-before 0) 1 (ecb-minor-mode 1))
>> > =A0 (lambda nil (edebug-after (edebug-before 0) 1 (ecb-minor-mode 1)))=
()
>> > =A0 edebug-enter(ecb-activate nil (lambda nil (edebug-after (edebug-be=
fore
>> > 0)
>> > 1 (ecb-minor-mode 1))))
>> > =A0 edebug-enter(ecb-activate nil (lambda nil (edebug-after (edebug-be=
fore
>> > 0)
>> > 1 (ecb-minor-mode 1))))
>> > =A0 ecb-activate()
>> > =A0 call-interactively(ecb-activate t nil)
>> > =A0 execute-extended-command(nil)
>> > =A0 call-interactively(execute-extended-command nil nil)
>> > =A0 recursive-edit()
>> > =A0 edebug-recursive-edit()
>> > =A0 edebug-display()
>> > =A0 edebug-debugger(0 before nil)
>> > =A0 edebug-before(0)
>> > =A0 (edebug-after (edebug-before 0) 1 (ecb-minor-mode 1))
>> > =A0 (lambda nil (edebug-after (edebug-before 0) 1 (ecb-minor-mode 1)))=
()
>> > =A0 edebug-enter(ecb-activate nil (lambda nil (edebug-after (edebug-be=
fore
>> > 0)
>> > 1 (ecb-minor-mode 1))))
>> > =A0 edebug-enter(ecb-activate nil (lambda nil (edebug-after (edebug-be=
fore
>> > 0)
>> > 1 (ecb-minor-mode 1))))
>> > =A0 ecb-activate()
>> > =A0 call-interactively(ecb-activate t nil)
>> > =A0 execute-extended-command(nil)
>> > =A0 call-interactively(execute-extended-command nil nil)
>> >
>> >
>> > On Thu, Jun 7, 2012 at 12:35 PM, Alex Ott <[email protected]> wrote:
>> >>
>> >> Hi all
>> >>
>> >> I did some changes in ECB to make it working with fresh Emacs & CEDET.
>> >> =A0Changed version is available at
>> >> https://github.com/alexott/ecb/tree/new-cedet - I tested it with GNU
>> >> Emacs from trunk (Emacs 24.1) and CEDET both from bzr repository
>> >> (CEDET from Emacs gives strange error "Attempt to modify read-only
>> >> object" - I need time to investigate this)...
>> >>
>> >> If you're interested in testing, please run this version on your
>> >> machines & send me feedback
>> >>
>> >> P.S. Next steps that I want to make is to do more code cleanup...
>> >>
>> >> --
>> >> With best wishes,=A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 Alex Ott
>> >> http://alexott.net/
>> >> Tiwtter: alexott_en (English), alexott (Russian)
>> >> Skype: alex.ott
>> >>
>> >>
>> >>
>> >> ---------------------------------------------------------------------=
---------
>> >> Live Security Virtual Conference
>> >> Exclusive live event will cover all the ways today's security and
>> >> threat landscape has changed and how IT managers can respond.
>> >> Discussions
>> >> will include endpoint security, mobile security and the latest in
>> >> malware
>> >> threats. http://www.accelacomm.com/jaw/sfrnl04242012/114/50122263/
>> >> _______________________________________________
>> >> Ecb-list mailing list
>> >> [email protected]
>> >> https://lists.sourceforge.net/lists/listinfo/ecb-list
>> >
>> >
>>
>>
>>
>> --
>> With best wishes,=A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 Alex Ott
>> http://alexott.net/
>> Tiwtter: alexott_en (English), alexott (Russian)
>> Skype: alex.ott
>
>



-- =

With best wishes,=A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 Alex Ott
http://alexott.net/
Tiwtter: alexott_en (English), alexott (Russian)
Skype: alex.ott

---------------------------------------------------------------------------=
---
Live Security Virtual Conference
Exclusive live event will cover all the ways today's security and =

threat landscape has changed and how IT managers can respond. Discussions =

will include endpoint security, mobile security and the latest in malware =

threats. http://www.accelacomm.com/jaw/sfrnl04242012/114/50122263/