Mercurial > hg > xemacs-beta

comparison lisp/bytecomp-runtime.el @ 253:157b30c96d03 r20-5b25

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-5b25
author cvs
date Mon, 13 Aug 2007 10:20:27 +0200
parents 677f6a0ee643
children 6330739388db
comparison
equal deleted inserted replaced
252:afb15df44434 253:157b30c96d03
48 ;;; Interface to inline functions. 48 ;;; Interface to inline functions.
49 49
50 ;; FSF comments the next two out, but I see no reason to do so. --ben 50 ;; FSF comments the next two out, but I see no reason to do so. --ben
51 (defmacro proclaim-inline (&rest fns) 51 (defmacro proclaim-inline (&rest fns)
52 "Cause the named functions to be open-coded when called from compiled code. 52 "Cause the named functions to be open-coded when called from compiled code.
53 They will only be compiled open-coded when byte-optimize is true." 53 They will only be compiled open-coded when `byte-optimize' is true."
54 (cons 'eval-and-compile 54 (cons 'eval-and-compile
55 (apply 55 (apply
56 'nconc 56 'nconc
57 (mapcar 57 (mapcar
58 '(lambda (x) 58 '(lambda (x)