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.