Подтвердить что ты не робот

Разница между (defalias 'A (символьная функция' B)) и (defalias 'A' B)

Я читал subr.el и видел этот код:

(defalias 'backward-delete-char 'delete-backward-char)
(defalias 'search-forward-regexp (symbol-function 're-search-forward))

Интересно, что первая строка не использует символьную функцию во второй строке. Единственное различие, которое я знаю об этих двух способах использования defalias, заключается в том, что help for backward-delete- char (первый) показывает, что он является псевдонимом для delete-backward- char, а помощь для поиска -regexp не делает.

Есть ли случай, когда второй способ лучше первого?

Ответ 1

Два метода defalias немного отличаются. Первая связывает функциональную ячейку для 'backward-delete-char с ячейкой функции 'delete-backward-char. Вторая связывает 'search-forward-regexp с функцией, которая в настоящее время вызывается 're-search-forward.

Разница в том, что если вы позже измените определение "delete-backward-char, 'backward-delete-char теперь будет иметь новое поведение. Если во втором случае изменение функции для 're-search-forward не влияет на поведение 'search-forward-regexp.

Возможно, какое-то искусство ascii может помочь:

+-------------------------+     +-----------------+
|#<subr re-search-forward>| <-- |re-search-forward|
+-------------------------+     +-----------------+
                        ^       +---------------------+
                        \------ |search-forward-regexp|
                                +---------------------+

+----------------------------+     +--------------------+     +--------------------+
|#<subr delete-backward-char>| <-- |delete-backward-char| <-- |backward-delete-char|
+----------------------------+     +--------------------+     +--------------------+

Эта документация может помочь прояснить ситуацию.

Ответ 2

Ну, это действительно не то же самое... Вот небольшая игра, которую я только что сыграл:

(defun a () (message "hello"))
a
(a)
"hello"
(defalias 'b (symbol-function 'a))
(lambda nil (message "hello"))
(defalias 'c 'a)
a
(b)
"hello"
(c)
"hello"
(defun a () (message "howdy"))
a
(a)
"howdy"
(b)
"hello"
(c)
"howdy" ' c changed meaning, b did not...