Mercurial > emacs

comparison lisp/emacs-lisp/bytecomp.el @ 83532:b19aaf4ab0ee

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merged from emacs@sv.gnu.org. Patches applied: * emacs@sv.gnu.org/emacs--devo--0--patch-331 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-332 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-333 Merge from gnus--rel--5.10 * emacs@sv.gnu.org/emacs--devo--0--patch-334 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-335 Add note about "link" button-class to etc/TODO * emacs@sv.gnu.org/emacs--devo--0--patch-336 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-337 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-338 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-339 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-340 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-341 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-342 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-343 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-344 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-345 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-346 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-347 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-348 Update for ERC 5.1.3. * emacs@sv.gnu.org/emacs--devo--0--patch-349 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-350 Merge from gnus--rel--5.10 * emacs@sv.gnu.org/gnus--rel--5.10--patch-111 Update from CVS: texi/gnus.texi (Summary Buffer Lines): Fix typo. * emacs@sv.gnu.org/gnus--rel--5.10--patch-112 Update from CVS * emacs@sv.gnu.org/gnus--rel--5.10--patch-113 Merge from emacs--devo--0 * emacs@sv.gnu.org/gnus--rel--5.10--patch-114 Update from CVS git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-572
author Karoly Lorentey <lorentey@elte.hu>
date Fri, 14 Jul 2006 05:56:32 +0000
parents b6689e223e2f c64592812a59
children c71725faff1a
comparison
equal deleted inserted replaced
83531:a387c138b28e 83532:b19aaf4ab0ee
2789 ;; Make sure that function exists. This is important 2789 ;; Make sure that function exists. This is important
2790 ;; for CL compiler macros since the symbol may be 2790 ;; for CL compiler macros since the symbol may be
2791 ;; `cl-byte-compile-compiler-macro' but if CL isn't 2791 ;; `cl-byte-compile-compiler-macro' but if CL isn't
2792 ;; loaded, this function doesn't exist. 2792 ;; loaded, this function doesn't exist.
2793 (or (not (memq handler '(cl-byte-compile-compiler-macro))) 2793 (or (not (memq handler '(cl-byte-compile-compiler-macro)))
2794 (fboundp handler)) 2794 (functionp handler))
2795 (not (and (byte-compile-version-cond 2795 (not (and (byte-compile-version-cond
2796 byte-compile-compatibility) 2796 byte-compile-compatibility)
2797 (get (get fn 'byte-opcode) 'emacs19-opcode)))) 2797 (get (get fn 'byte-opcode) 'emacs19-opcode))))
2798 (funcall handler form) 2798 (funcall handler form)
2799 (when (memq 'callargs byte-compile-warnings) 2799 (when (memq 'callargs byte-compile-warnings)