Mercurial > emacs
changeset 96709:ca40084f11a0
Simply require 'cl (silences spurious warnings).
(cl-compile-time-init): Remove function.
| author | Glenn Morris <rgm@gnu.org> |
|---|---|
| date | Wed, 16 Jul 2008 02:50:00 +0000 |
| parents | ceb7b0d5c55f |
| children | e3b70303f1e9 |
| files | lisp/emacs-lisp/cl-macs.el |
| diffstat | 1 files changed, 1 insertions(+), 8 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emacs-lisp/cl-macs.el Wed Jul 16 02:49:35 2008 +0000 +++ b/lisp/emacs-lisp/cl-macs.el Wed Jul 16 02:50:00 2008 +0000 @@ -43,9 +43,7 @@ ;;; Code: -(or (memq 'cl-19 features) - (error "Tried to load `cl-macs' before `cl'!")) - +(require 'cl) (defmacro cl-pop2 (place) (list 'prog1 (list 'car (list 'cdr place)) @@ -73,11 +71,6 @@ (defvar cl-old-bc-file-form nil) -;;;###autoload -(defun cl-compile-time-init () - (run-hooks 'cl-hack-bytecomp-hook)) - - ;;; Some predicates for analyzing Lisp forms. These are used by various ;;; macro expanders to optimize the results in certain common cases.