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/