* Fix a function for native compilation in cc-bytecomp.el

	* lisp/progmodes/cc-bytecomp.el
	(cc-bytecomp-compiling-or-loading): Update for native compilation.

diff --git a/lisp/progmodes/cc-bytecomp.el b/lisp/progmodes/cc-bytecomp.el
index ad884288a6dbba01e0ff627a40752cfdcb15385f..7798b49f3984d84e68e22e32cb01d51eaf00d069 100644 (file)
--- a/lisp/progmodes/cc-bytecomp.el
+++ b/lisp/progmodes/cc-bytecomp.el
@@ -110,14 +110,15 @@
                        (memq (cadr elt)
                              '(load require
                                byte-compile-file byte-recompile-directory
-                               batch-byte-compile)))))
+                               batch-byte-compile batch-native-compile)))))
        (setq n (1+ n)))
       (cond
        ((memq (cadr elt) '(load require))
        'loading)
        ((memq (cadr elt) '(byte-compile-file
                           byte-recompile-directory
-                          batch-byte-compile))
+                          batch-byte-compile
+                          batch-native-compile))
        'compiling)
        (t                              ; Can't happen.
        (message "cc-bytecomp-compiling-or-loading: System flags spuriously set")