bug#53497: 29.0.50; native-compile after restarting Emacs

[Arash Esbati <arash@gnu.org>]

Eli Zaretskii <eliz@gnu.org> writes:

> Strange, it sounds like GDB cannot access macros,which -g3 should
> allow.

This is Windows after all ;-)

> And it stays nil afterwards?

No, it doesn't (see below)

> Or does it grow to include all the files you expect to be
> natively-compiled as part of the session?  Is
> maybe_defer_native_compilation called more than just once?  If so,
> what is the value of Vcomp__delayed_sources for those other calls?

maybe_defer_native_compilation is called more than once.  This is the
result of multiple runs.  What remains is that the part to
"native--compile-async" is never called.

Below, [...] is always the repetition between
if (!load_gccjit_if_necessary (false))
and
if (comp__loadable)
which I've deleted.

--8<---------------cut here---------------start------------->8---
-> gdb ./emacs
GNU gdb (GDB) 11.1
[snipped]
(gdb) break maybe_defer_native_compilation
Breakpoint 1 at 0x400241af0: file comp.c, line 5104.
(gdb) source .gdbinit
SIGINT is used by the debugger.
Are you sure you want to change it? (y or n) [answered Y; input not from terminal]
Environment variable "DISPLAY" not defined.
TERM = xterm-256color
Breakpoint 2 at 0x4001174a4: file emacs.c, line 406.
(gdb) run -Q
Starting program: Z:\path\to\emacs\src\emacs.exe -Q
[New Thread 8928.0x5f50]
[New Thread 8928.0xf60]
[New Thread 8928.0x5a44]
[New Thread 8928.0x4008]
[New Thread 8928.0x15bc]

Thread 1 hit Breakpoint 1, maybe_defer_native_compilation (function_name=XIL(0xffff82ed63e350a0), definition=XIL(0x2e480e76535)) at comp.c:5104
5104      if (!load_gccjit_if_necessary (false))
(gdb) n
5107      if (!native_comp_deferred_compilation
(gdb) n
5108          || noninteractive
(gdb) n
5109          || !NILP (Vpurify_flag)
(gdb) n
5110          || !COMPILEDP (definition)
(gdb) n
5111          || !STRINGP (Vload_true_file_name)
(gdb) n
5112          || !suffix_p (Vload_true_file_name, ".elc")
(gdb) n
5113          || !NILP (Fgethash (Vload_true_file_name, V_comp_no_native_file_h, Qnil)))
(gdb) n
5117        concat2 (CALL1I (file-name-sans-extension, Vload_true_file_name),
(gdb) n
5119      if (NILP (Ffile_exists_p (src)))
(gdb) n
5128      if (comp__loadable)
(gdb) n
5137        Vcomp__delayed_sources = Fcons (src, Vcomp__delayed_sources);
(gdb) pp globals.f_Vcomp__delayed_sources
[New Thread 8928.0x52dc]
nil
[New Thread 8928.0x3934]
(gdb) n
5138    }
(gdb) n
Fdefalias (symbol=XIL(0xffff82ed63e350a0), definition=XIL(0x2e480e76535), docstring=XIL(0)) at data.c:911
911       if (!NILP (docstring))
(gdb) c
Continuing.

Thread 1 hit Breakpoint 1, maybe_defer_native_compilation (function_name=XIL(0xffff82ed64253b58), definition=XIL(0x2e480e7fd85)) at comp.c:5104
5104      if (!load_gccjit_if_necessary (false))
[...]
5128      if (comp__loadable)
(gdb) n
5137        Vcomp__delayed_sources = Fcons (src, Vcomp__delayed_sources);
(gdb) pp globals.f_Vcomp__delayed_sources
("z:/path/to/emacs/lisp/international/latexenc.el")
(gdb) c
Continuing.

Thread 1 hit Breakpoint 1, maybe_defer_native_compilation (function_name=XIL(0xffff82ed63e6af00), definition=XIL(0x2e480e82325)) at comp.c:5104
5104      if (!load_gccjit_if_necessary (false))
[...]
5128      if (comp__loadable)
(gdb) n
5137        Vcomp__delayed_sources = Fcons (src, Vcomp__delayed_sources);
(gdb) pp globals.f_Vcomp__delayed_sources
("z:/path/to/emacs/lisp/international/latexenc.el" "z:/path/to/emacs/lisp/international/latexenc.el")
(gdb) c
Continuing.

Thread 1 hit Breakpoint 1, maybe_defer_native_compilation (function_name=XIL(0xffff82ed64238900), definition=XIL(0x2e48103dd85)) at comp.c:5104
5104      if (!load_gccjit_if_necessary (false))
[...]
5128      if (comp__loadable)
(gdb) n
5137        Vcomp__delayed_sources = Fcons (src, Vcomp__delayed_sources);
(gdb) pp globals.f_Vcomp__delayed_sources
("z:/path/to/emacs/lisp/international/latexenc.el" "z:/path/to/emacs/lisp/international/latexenc.el" "z:/path/to/emacs/lisp/international/latexenc.el")
(gdb) c
Continuing.

Thread 1 hit Breakpoint 1, maybe_defer_native_compilation (function_name=XIL(0xffff82ed63dd9318), definition=XIL(0x2e480f0ae75)) at comp.c:5104
5104      if (!load_gccjit_if_necessary (false))
[...]
5128      if (comp__loadable)
(gdb) n
5137        Vcomp__delayed_sources = Fcons (src, Vcomp__delayed_sources);
(gdb) pp globals.f_Vcomp__delayed_sources
("z:/path/to/emacs/lisp/emacs-lisp/ring.el" "z:/path/to/emacs/lisp/international/latexenc.el" "z:/path/to/emacs/lisp/international/latexenc.el" "z:/path/to/emacs/lisp/international/latexenc.el")
(gdb) c
Continuing.

Thread 1 hit Breakpoint 1, maybe_defer_native_compilation (function_name=XIL(0xffff82ed65497a20), definition=XIL(0x2e480fb9045)) at comp.c:5104
5104      if (!load_gccjit_if_necessary (false))
[...]
5128      if (comp__loadable)
(gdb) n
5137        Vcomp__delayed_sources = Fcons (src, Vcomp__delayed_sources);
(gdb) pp globals.f_Vcomp__delayed_sources
("z:/path/to/emacs/lisp/emacs-lisp/ring.el" "z:/path/to/emacs/lisp/emacs-lisp/ring.el" "z:/path/to/emacs/lisp/international/latexenc.el" "z:/path/to/emacs/lisp/international/latexenc.el" "z:/path/to/emacs/lisp/international/latexenc.el")
(gdb) c
Continuing.

Thread 1 hit Breakpoint 1, maybe_defer_native_compilation (function_name=XIL(0xffff82ed65497a80), definition=XIL(0x2e481019dd5)) at comp.c:5104
5104      if (!load_gccjit_if_necessary (false))
[...]
5128      if (comp__loadable)
(gdb) n
5137        Vcomp__delayed_sources = Fcons (src, Vcomp__delayed_sources);
(gdb) pp globals.f_Vcomp__delayed_sources
("z:/path/to/emacs/lisp/emacs-lisp/ring.el" "z:/path/to/emacs/lisp/emacs-lisp/ring.el" "z:/path/to/emacs/lisp/emacs-lisp/ring.el" "z:/path/to/emacs/lisp/international/latexenc.el" "z:/path/to/emacs/lisp/international/latexenc.el" "z:/path/to/emacs/lisp/international/latexenc.el")
(gdb) n
5138    }
(gdb) c
Continuing.

Thread 1 hit Breakpoint 1, maybe_defer_native_compilation (function_name=XIL(0xffff82ed65497a50), definition=XIL(0x2e481030f45)) at comp.c:5104
5104      if (!load_gccjit_if_necessary (false))
[...]
5128      if (comp__loadable)
(gdb) n
5137        Vcomp__delayed_sources = Fcons (src, Vcomp__delayed_sources);
(gdb) n
5138    }
(gdb) n
Fdefalias (symbol=XIL(0xffff82ed65497a50), definition=XIL(0x2e481030f45), docstring=XIL(0)) at data.c:911
911       if (!NILP (docstring))
(gdb) c
Continuing.

Thread 1 hit Breakpoint 1, maybe_defer_native_compilation (function_name=XIL(0xffff82ed65497ab0), definition=XIL(0x2e48104be45)) at comp.c:5104
5104      if (!load_gccjit_if_necessary (false))
[...]
5128      if (comp__loadable)
(gdb) n
5137        Vcomp__delayed_sources = Fcons (src, Vcomp__delayed_sources);
(gdb) pp globals.f_Vcomp__delayed_sources
("z:/path/to/emacs/lisp/emacs-lisp/ring.el" "z:/path/to/emacs/lisp/emacs-lisp/ring.el" "z:/path/to/emacs/lisp/emacs-lisp/ring.el" "z:/path/to/emacs/lisp/emacs-lisp/ring.el" "z:/path/to/emacs/lisp/emacs-lisp/ring.el" "z:/path/to/emacs/lisp/international/latexenc.el" "z:/path/to/emacs/lisp/international/latexenc.el" "z:/path/to/emacs/lisp/international/latexenc.el")
(gdb) c
Continuing.

Thread 1 hit Breakpoint 1, maybe_defer_native_compilation (function_name=XIL(0xffff82ed65497ae0), definition=XIL(0x2e48109dc45)) at comp.c:5104
5104      if (!load_gccjit_if_necessary (false))
(gdb) q
A debugging session is active.

        Inferior 1 [process 8928] will be killed.

Quit anyway? (y or n) y
--8<---------------cut here---------------end--------------->8---

Best, Arash