mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-25 07:28:20 +00:00
Code Issues Releases Activity

(backquote-backquote-symbol): Don't autoload defvar.

Browse Source 
(`): Write its name directly in the definition.  Use defalias.
This commit is contained in:
Richard M. Stallman 1994-05-07 00:18:35 +00:00
parent 9541216571
commit c9c7f2c49d
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/emacs-lisp/backquote.el
View File

@ -78,12 +78,11 @@ For example (backquote-list* 'a 'b 'c) => (a b . c)"
newlist)
first))
(fset 'backquote-list* (symbol-function 'backquote-list*-macro))
(defalias 'backquote-list* (symbol-function 'backquote-list*-macro))
;; A few advertised variables that control which symbols are used
;; to represent the backquote, unquote, and splice operations.
;;;###autoload
(defvar backquote-backquote-symbol '`
"*Symbol used to represent a backquote or nested backquote (e.g. `).")
@ -113,7 +112,7 @@ Vectors work just like lists. Nested backquotes are permitted."
;; GNU Emacs has no reader macros
;;;###autoload
(fset backquote-backquote-symbol (symbol-function 'backquote))
(defalias '` (symbol-function 'backquote))
;; backquote-process returns a dotted-pair of a tag (0, 1, or 2) and
;; the backquote-processed structure. 0 => the structure is