Mercurial > emacs
comparison lisp/emacs-lisp/bytecomp.el @ 8115:e45d541e55cf
(byte-compile-defalias): Fix typo in prev change.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sat, 02 Jul 1994 00:41:28 +0000 |
parents | 9f6348616e4d |
children | 0199ece40d91 |
comparison
equal
deleted
inserted
replaced
8114:bebf92e1b110 | 8115:e45d541e55cf |
---|---|
2848 (nth 1 (nth 2 form))) | 2848 (nth 1 (nth 2 form))) |
2849 (setq byte-compile-function-environment | 2849 (setq byte-compile-function-environment |
2850 (cons (cons (nth 1 (nth 1 form)) | 2850 (cons (cons (nth 1 (nth 1 form)) |
2851 (nth 1 (nth 2 form))) | 2851 (nth 1 (nth 2 form))) |
2852 byte-compile-function-environment)))) | 2852 byte-compile-function-environment)))) |
2853 (byte-compile-normal-call form))) | 2853 (byte-compile-normal-call form)) |
2854 | 2854 |
2855 ;; Turn off warnings about prior calls to the function being defalias'd. | 2855 ;; Turn off warnings about prior calls to the function being defalias'd. |
2856 ;; This could be smarter and compare those calls with | 2856 ;; This could be smarter and compare those calls with |
2857 ;; the function it is being aliased to. | 2857 ;; the function it is being aliased to. |
2858 (defun byte-compile-defalias-warn (new alias) | 2858 (defun byte-compile-defalias-warn (new alias) |