emacs-28 ced72b6: * Fix `native-compile-target-directory' effectiveness on trampolines

[Andrea Corallo]

branch: emacs-28
commit ced72b6e4c03c75e99e828410c363eefd80fbf54
Author: Andrea Corallo <akrl@sdf.org>
Commit: Andrea Corallo <akrl@sdf.org>

    * Fix `native-compile-target-directory' effectiveness on trampolines
    
    * lisp/emacs-lisp/comp.el (comp-trampoline-compile): Fix
    `native-compile-target-directory' effectiveness on trampoline
    compilation.
---
 lisp/emacs-lisp/comp.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el
index 0e4e54b..7b5c5ad 100644
--- a/lisp/emacs-lisp/comp.el
+++ b/lisp/emacs-lisp/comp.el
@@ -3789,7 +3789,9 @@ Return the trampoline if found or nil otherwise."
     (comp--native-compile
      form nil
      (cl-loop
-      for dir in (comp-eln-load-path-eff)
+      for dir in (if native-compile-target-directory
+                     (list native-compile-target-directory)
+                   (comp-eln-load-path-eff))
       for f = (expand-file-name
                (comp-trampoline-filename subr-name)
                dir)