Có thể có bí danh cho tên hàm trong Lisp không?

Question

... giống như các gói.

Tôi sử dụng Emacs (có thể, nó có thể cung cấp một số loại giải pháp).

Ví dụ (defun the-very-very-long-but-good-name() ...) không hữu ích sau này trong mã. Nhưng tên như Fn-15 hoặc chữ viết tắt đầu tiên cũng không hữu ích. Có thể có một bí danh như cho các gói hoặc truy cập chuỗi tài liệu trong khi cố gắng gọi lại tên của hàm không?

Nói cách khác, có thể cho các chức năng kết hợp bằng cách nào đó tự viết tên và viết tắt tên không?

Answer 1

Bạn muốn defalias. (defalias 'newname 'oldname) sẽ giữ nguyên tài liệu và thậm chí hiển thị "newname là bí danh cho` oldname '"khi tài liệu của nó được yêu cầu.

Answer 2

Nếu vấn đề của bạn là bạn không thể nhớ tên chức năng rất dài, nhưng bạn nhớ PART của tên, đó là những gì "apropos" là cho. Trong Emacs của tôi, tôi có "C-h a" bị ràng buộc với "hyper-apropos". Bạn nhập một chuỗi con của biểu tượng bạn đang tìm kiếm, và nó liệt kê tất cả các kết quả phù hợp.

Answer 3

Bạn có thể chỉ cần có một hàm chỉ gọi một hàm khác.

Answer 4

Tôi không biết Emacs, nhưng sẽ không (xác định shortname longnamefunctionblahblah) hoạt động?

Answer 5

bạn có thể sử dụng (defmacro ...) tới Alias ​​một hàm

Answer 6

Nếu đó là tất cả việc nhập liên tục sử dụng tên dài không mong muốn, thì có, emacs có thể trợ giúp. Hãy xem abbrev-mode. Ngoài ra ý tưởng tốt trong ngữ cảnh này là hippie-expand.

Nếu đó là câu hỏi dễ đọc, điều đó khó hơn. ?

Answer 7

từ "On Lisp" Đây là mã:

(defmacro alias (new-name prev-name) 
    `(defmacro ,new-name (&rest args) 
    `(,',prev-name ,@args))) 

; use: (alias df defun) 


(defun group (source n) 
    (if (zerop n) (error "zero length")) 
    (labels ((rec (source acc) 
     (let ((rest (nthcdr n source))) 
      (if (consp rest) 
      (rec rest (cons (subseq source 0 n) acc)) 
      (nreverse (cons source acc)))))) 
    (if source (rec source nil) nil))) 

(defmacro aliasx (&rest names) 
    `(alias 
    ,@(mapcar #'(lambda (pair) 
      `(alias ,@pair)) 
      (group names 2)))) 

; use: (aliasx df1 defun 
;    df2 defun 
;    df3 defun) 

Answer 8

Bạn có thể sử dụng setf để gán chức năng các tế bào chức năng khác, ví dụ:

(defmacro alias (new-name prev-name) 
    `(setf (symbol-function ,new-name) (symbol-function ,prev-name)))