feature/native-comp dd814b0 2/2: * lisp/emacs-lisp/bytecomp.el: Guard against double native compilation.

[Andrea Corallo]

branch: feature/native-comp
commit dd814b0a58aebe12168ffde946860e851ecf2b5b
Author: Andrea Corallo <akrl@sdf.org>
Commit: Andrea Corallo <akrl@sdf.org>

    * lisp/emacs-lisp/bytecomp.el: Guard against double native compilation.
---
 lisp/emacs-lisp/bytecomp.el | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index c5b086f..20a481a 100644
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -5269,9 +5269,10 @@ and corresponding effects."
       (let ((byte-optimize nil)                ; do it fast
            (byte-compile-warnings nil))
        (mapc (lambda (x)
-               (or noninteractive (message "compiling %s..." x))
-               (byte-compile x)
-               (or noninteractive (message "compiling %s...done" x)))
+                (unless (subr-native-elisp-p x)
+                 (or noninteractive (message "compiling %s..." x))
+                 (byte-compile x)
+                 (or noninteractive (message "compiling %s...done" x))))
              '(byte-compile-normal-call
                byte-compile-form
                byte-compile-body