Simply require 'cl (silences spurious warnings).
(cl-compile-time-init): Remove function.
This commit is contained in:
parent
7467c796a1
commit
56565c745b
1 changed files with 1 additions and 8 deletions
|
@ -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.
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue