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)