# HG changeset patch
# User Glenn Morris <rgm@gnu.org>
# Date 1216176600 0
# Node ID ca40084f11a0a30e6a527e0a1d1243004b6a84f3
# Parent  ceb7b0d5c55ff74d18f83ba091d5cc7b2f9057be
Simply require 'cl (silences spurious warnings).
(cl-compile-time-init): Remove function.

diff -r ceb7b0d5c55f -r ca40084f11a0 lisp/emacs-lisp/cl-macs.el
--- 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.