Re: [CEDET-devel] semantic-ia-fast-jump does not jump in some conditions

[yesan <xy...@gm...>]

On Wed, 2013-11-27 at 10:45 +0800, yesan wrote:
> ring-insert

sorry, my apology

i wrappered semantic-ia-fast-jump(for jump back easily), so the title
should be 'semantic-ia-fast-jump does not jump in some conditions'

(defun semantic-goto-definition (point)
  "Goto definition using semantic-ia-fast-jump   
save the pointer marker if tag is found"
  (interactive "d")
  (condition-case err
      (progn                            
        (ring-insert semantic-tags-location-ring (point-marker))  
        (semantic-ia-fast-jump point))
    (error
     ;;if not found remove the tag saved in the ring  
     (set-marker (ring-remove semantic-tags-location-ring 0) nil nil)
     (signal (car err) (cdr err)))))

(defun semantic-pop-tag-mark ()             
  "popup the tag save by semantic-goto-definition"   
  (interactive)                                                    
  (if (ring-empty-p semantic-tags-location-ring)                   
      (message "%s" "No more tags available")                      
    (let* ((marker (ring-remove semantic-tags-location-ring 0))    
              (buff (marker-buffer marker))                        
                 (pos (marker-position marker)))                   
      (if (not buff)                                               
            (message "Buffer has been deleted")                    
        (switch-to-buffer buff)                                    
        (goto-char pos))                                           
      (set-marker marker nil nil))))


(global-set-key (kbd "C-c C-]") 'semantic-goto-definition)
(global-set-key (kbd "\C-co") 'semantic-pop-tag-mark)

error info :

Debugger entered--Lisp error: (error "Could not find suitable jump point
for addrinfo")
  signal(error ("Could not find suitable jump point for addrinfo"))
  error("Could not find suitable jump point for %s" "addrinfo")
  semantic-ia-fast-jump(75)
  call-interactively(semantic-ia-fast-jump record nil)
  command-execute(semantic-ia-fast-jump record)
  (progn (setq prefix-arg current-prefix-arg) (setq this-command
chosen-item) (setq real-this-command chosen-item) (command-execute
chosen-item (quote record)))
  (unwind-protect (progn (setq prefix-arg current-prefix-arg) (setq
this-command chosen-item) (setq real-this-command chosen-item)
(command-execute chosen-item (quote record))) (smex-rank chosen-item)
(smex-show-key-advice chosen-item) (run-at-time 0.01 nil (function
(lambda (cmd) (setq last-repeatable-command cmd))) chosen-item))
  (if smex-custom-action (let ((action smex-custom-action)) (setq
smex-custom-action nil) (funcall action chosen-item)) (unwind-protect
(progn (setq prefix-arg current-prefix-arg) (setq this-command
chosen-item) (setq real-this-command chosen-item) (command-execute
chosen-item (quote record))) (smex-rank chosen-item)
(smex-show-key-advice chosen-item) (run-at-time 0.01 nil (function
(lambda (cmd) (setq last-repeatable-command cmd))) chosen-item)))
  (let ((chosen-item (intern (smex-completing-read commands
initial-input)))) (if smex-custom-action (let ((action
smex-custom-action)) (setq smex-custom-action nil) (funcall action
chosen-item)) (unwind-protect (progn (setq prefix-arg
current-prefix-arg) (setq this-command chosen-item) (setq
real-this-command chosen-item) (command-execute chosen-item (quote
record))) (smex-rank chosen-item) (smex-show-key-advice chosen-item)
(run-at-time 0.01 nil (function (lambda (cmd) (setq
last-repeatable-command cmd))) chosen-item))))
  smex-read-and-run(("semantic-ia-fast-jump" "semantic-goto-definition"
"toggle-debug-on-error" "woman" "highlight-parentheses-mode"
"replace-string" "visit-tags-table" "grep" "sr-speedbar-open"
"load-file" "diff-mode" "semantic-mrub-switch-tags" "gdb" "c-set-style"
"global-linum-mode" "comment-or-uncomment-region" "kill-ring-save"
"pop-global-mark" "window-number-select" "godoc" "server-start" "slime"
"color-theme-hober" "sr-speedbar-close" "c-mode" "select-current-line"
"color-theme-bharadwaj-slate" "imenu" "speedbar" "pop-tag-mark"
"browse-url-w3" "window-number-mode" "speedbar-toggle-etags"
"color-theme-aalto-light" "semantic-complete-symbol"
"global-semantic-mru-bookmark-mode" "menu-bar-mode" "c-indent-command"
"indent-code-rigidly" "speedbar-expand-line" "color-theme-bharadwaj"
"window-number-meta-mode" "semantic-mru-bookmark-mode"
"semantic-analyze-possible-completions" "man" "grep-mode" "linum-mode"
"multi-term" "end-of-line" "normal-mode" ...))
  (if (smex-already-running) (smex-update-and-rerun) (and
smex-auto-update (smex-detect-new-commands) (smex-update))
(smex-read-and-run smex-ido-cache))
  smex()
  call-interactively(smex nil nil)