Commit 56565c74 authored by Glenn Morris's avatar Glenn Morris
Browse files

Simply require 'cl (silences spurious warnings).

(cl-compile-time-init): Remove function.
parent 7467c796
......@@ -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)
(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.
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment