(declare-function): Add compatibility stub.

(delete-duplicates, mapcan, cl-macroexpand-all): Declare.

1 files changed, 10 insertions, 0 deletions

diff --git a/lisp/progmodes/cc-langs.el b/lisp/progmodes/cc-langs.el
index 3b6ed904eed..fc3dfde58ee 100644
--- a/lisp/progmodes/cc-langs.el
+++ b/lisp/progmodes/cc-langs.el
@@ -115,6 +115,10 @@
 
 ;;; Code:
 
+;; For Emacs < 22.2.
+(eval-and-compile
+  (unless (fboundp 'declare-function) (defmacro declare-function (&rest r))))
+
 (eval-when-compile
   (let ((load-path
 	 (if (and (boundp 'byte-compile-dest-file)
@@ -204,6 +208,12 @@ the evaluated constant value at compile time."
 (def-edebug-spec c-lang-defvar
   (&define name def-form &optional stringp)) ;)
 
+;; Suppress "might not be defined at runtime" warning.
+;; This file is only used when compiling other cc files.
+(declare-function delete-duplicates "cl-seq" (cl-seq &rest cl-keys))
+(declare-function mapcan "cl-extra" (cl-func cl-seq &rest cl-rest))
+(declare-function cl-macroexpand-all "cl-extra" (form &optional env))
+
 (eval-and-compile
   ;; Some helper functions used when building the language constants.