Перейдите к определению символа в точке. Поддерживает глобальные определения, локальные определения и даже макро-тяжелый код!

elisp-def статически анализирует ваш код и возвращается к эвристике, где это невозможно. Он должен работать в 99% случаев, поэтому, пожалуйста, подайте ошибки, если он не может найти определения для вашего кода.
Установите из MELPA, затем добавьте следующее в конфигурацию EMACS:
( dolist (hook '(emacs-lisp-mode-hook ielm-mode-hook))
( add-hook hook # 'elisp-def-mode )) elisp-def найдет определение глобальных функций и глобальных переменных в точке.
( defun demo/foo ()
1 )
( defun demo/bar ()
; ; M-x eval-buffer, then elisp-def on this:
(demo/foo))Он также будет использовать информацию EDEBUG для поиска определений функций, поэтому он находит определения чаще, чем XREF.
elisp-def понимает разницу между символами и функциями и прыгает до правильного определения.
( require 'cc-mode )
; ; `c-version' is both a variable and a function.
( defun demo/foo ()
; ; `elisp-def` will find the function here.
( c-version ))
( defun demo/foo ()
; ; `elisp-def` will find the variable here.
( setq c-version t )) elisp-def понимает макросы, поэтому он может точно обнаружить ссылки на функции.
( require 'dash )
( defvar demo/foo nil )
( defun demo/foo ( x )
x)
( defun demo/bar ()
(-> > 123
; ; `elisp-def' knows that this is a function, even though there are
; ; no parens.
demo/foo))Он также может понимать макросы, которые определяют функции или переменные.
( define-derived-mode demo/foo-mode fundamental-mode " demo " )
; ; `elisp-def' will expand macros to discover where major mode hooks
; ; are defined.
demo/foo-mode-hook
( cl-defstruct demo/point x y)
; ; `elisp-def' can find this function even though the defstruct
; ; call doesn't contain this symbol name.
(make-demo/point 1 2 ) elisp-def найдет библиотеки, отображая заявления о provide , если это возможно.
; ; `elisp-def' will open python.el here.
( require 'python )
; ; Unlike `xref-find-definition' , `elisp-def' will not confuse this
; ; library name with the macro named `use-package' .
( require 'use-package )
; ; `elisp-def' will even find python.el here, because the macro
; ; expands to a call to `require' .
( use-package python
:config
( setq python-indent-guess-indent-offset-verbose nil )) elisp-def понимает локальные привязки и параметры.
( defun demo/foo ( bar )
( let ((foo 1 ))
; ; `elisp-def' on the FOO below will move point to the let
; ; binding.
( setq foo 2 )
; ; `elisp-def' on the BAR below will move point to the function
; ; parameters line.
( setq bar 3 )))
( defun demo/bar ()
( let* ((foo 1 )
(bar 2 )
(foo 3 )
; ; `elisp-def' on the second FOO on the following line will
; ; move point to the relevant binding, which is the line
; ; immediately above.
(foo ( + foo 1 ))
(foo 5 ))
nil ))Это даже работает с макросами, которые вводят привязки.
( require 'dash )
( eval-when-compile
( require 'cl-lib ))
( defun demo/foo ( items )
( cl-destructuring-bind ( first second) items
; ; `elisp-def' knowns that FIRST is bound on line above.
( message " first is %s " first))
(-let [( first . rest) items]
; ; `elisp-def' knowns that FIRST is bound on line above.
( message " first is %s " first))) elisp-def позволяет вам надеть точку на цитируемые символы, символы Docstring или обратные символы.
( defun demo/foo ( x )
; ; `elisp-def' on X in the docstring will find the parameter.
" Adds one to X and returns it. "
( 1+ x))
( defun demo/bar ()
; ; `elisp-def' can find demo/foo even when point is on the #.
( funcall # 'demo/foo 1 )
; ; `elisp-def' on demo/foo below will find the function.
; ;
; ; See `demo/foo' for more information.
nil )
( defun demo/baz ( foo )
; ; `elisp-def' understands that @ is not part of foo here.
`(blah ,@foo ))Когда он найдет символ, Elisp-def также временно выделяет его для видимости.
elisp-def ограничен в своей способности анализировать цитируемые символы.
; ; `elisp-def' is able to find these quoted symbols because they're
; ; only globally bound in one namespace.
( mapcar 'symbol-name '(foo bar baz))
( add-to-list 'auto-mode-alist '( " \ .java \ ' " . java-mode))
( require 'cc-mode )
( defun demo/calls-fn ( sym )
( funcall sym))
; ; Since `c-version' is both a function and a variable, and we're not
; ; using a sharp-quote #'c-version, we have to prompt the user.
(demo/calls-fn 'c-version )
( defun demo/foo ( c-version )
; ; Here we have no idea whether we're using `c-version' as a
; ; function (e.g. funcall), as a variable (e.g. set) or as a
; ; parameter (e.g. eval).
(bar 'c-version nil )) elisp-def не может найти определения на макросах с let* семантикой и дублированными переменными.
( require 'dash )
( defun demo/foo ()
(-let ((x 1 )
(x 2 ))
; ; `elisp-def' on X below will move to the first X binding, rather
; ; than the second.
x)) elisp-def также не может обрабатывать макросы, которые переписывают формы, так что символ полностью исчезает.
( eval-when-compile ( require 'cl-lib ))
( cl-labels ((foo (x y) ( + x y)))
; ; `cl-labels' completely rewrites this body to (--cl-foo-- 1 2), so
; ; `elisp-def' can't find the definition of FOO.
(foo 1 2 ))elisp-slime-nav-find-elisp-thing-at-point от elisp-slime-navxref-find-definitions в emacs-lisp-mode (часть ядра EMACS)semantic-ia-fast-jump из semantic/ia.el (включен в Emacs) Прекрасные люди на #emacs за то, что они ответили на мои вопросы о Elisp Esoterica, особенно Wasamasa.
Библиотека комплиментов для завершения Clojure имеет представление о контексте, которое очень похоже на то, как формы и анализ Elisp-Def.
Hacklang имеет аналогичное представление о заполнителе для анализа завершений в точке кода.
GPLV3+.
Я предоставляю вам код в репозитории по лицензии с открытым исходным кодом. Поскольку это мой личный репозиторий, лицензия, которую вы получаете от моего кода, от меня, а не моего работодателя.