bug#63365: 30.0.50; GCC 13.1 breaks building Emacs with native-compilation

[Arash Esbati <arash@gnu.org>]

[-- Attachment #1: Type: text/plain, Size: 778 bytes --]

Eli Zaretskii <eliz@gnu.org> writes:

> Is this what you get for all the addresses in emacs_backtrace.txt?
> Some of them, especially the ones close to the top, are expected to
> yield nothing, but not all of them.
>
> Also, try doing the same after letting the program run to the
> beginning of the 'main' function, like this:
>
>   cd emacs-build-test/src
>   gdb ./emacs.exe
>   (gdb) start run -batch --no-site-file --no-site-lisp ...
>
> (with the rest of the arguments you saw in the crashed command).

Ok, I tried it with the addresses emitted during compilation of
apropos.el and for some of them, the result of '(gdb) list *0xNNNN' is
attached.  Is this what you're looking for?  If so, I will do the
exercise for all of the addresses and post the result.

Best, Arash

[-- Attachment #2: addresses.txt --]
[-- Type: text/plain, Size: 3574 bytes --]

(gdb) list *0x00007ff60c14a12e
0x7ff60c14a12e is in emacs_abort (w32fns.c:11103).
11098         hm_kernel32 = LoadLibrary ("Kernel32.dll");
11099         s_pfn_CaptureStackBackTrace = (CaptureStackBackTrace_proc)
11100           get_proc_addr (hm_kernel32, "RtlCaptureStackBackTrace");
11101       }
11102     if (s_pfn_CaptureStackBackTrace)
11103       return s_pfn_CaptureStackBackTrace (0, min (BACKTRACE_LIMIT_MAX, limit),
11104                                           buffer, NULL);
11105     return 0;
11106   }
11107

(gdb) list *0x00007ff60c018be1
0x7ff60c018be1 is in terminate_due_to_signal (emacs.c:459).
454          have to unblock it if we want to really receive it.  */
455     #ifndef MSDOS
456       {
457         sigset_t unblocked;
458         sigemptyset (&unblocked);
459         sigaddset (&unblocked, sig);
460         pthread_sigmask (SIG_UNBLOCK, &unblocked, 0);
461       }
462     #endif
463

(gdb) list *0x00007ff60c039601
0x7ff60c039601 is at sysdep.c:1793.
1788    {
1789      deliver_process_signal (sig, handle_fatal_signal);
1790    }
1791
1792    static void
1793    deliver_fatal_thread_signal (int sig)
1794    {
1795      deliver_thread_signal (sig, handle_fatal_signal);
1796    }
1797

(gdb) list *0x00007ff60c1ae84a
0x7ff60c1ae84a is in _gnu_exception_handler (C:/M/B/src/mingw-w64/mingw-w64-crt/crt/crt_handler.c:210).
205     C:/M/B/src/mingw-w64/mingw-w64-crt/crt/crt_handler.c: No such file or directory.

(gdb) list *0x00007ff60c09e1b0
0x7ff60c09e1b0 is in styled_format (editfns.c:3460).
3455         and in that case, we won't know it here.  */
3456
3457      /* True if the output should be a multibyte string,
3458         which is true if any of the inputs is one.  */
3459      bool multibyte = multibyte_format;
3460      for (ptrdiff_t i = 1; !multibyte && i < nargs; i++)
3461        if (STRINGP (args[i]) && STRING_MULTIBYTE (args[i]))
3462          multibyte = true;
3463
3464      Lisp_Object quoting_style = message ? Ftext_quoting_style () : Qnil;

(gdb) list *0x00007ff60c0a80fa
0x7ff60c0a80fa is in Ffuncall (eval.c:3008).
3003      maybe_gc ();
3004
3005      if (debug_on_next_call)
3006        do_debug_on_call (Qlambda, count);
3007
3008      Lisp_Object val = funcall_general (args[0], nargs - 1, args + 1);
3009
3010      lisp_eval_depth--;
3011      if (backtrace_debug_on_exit (specpdl_ref_to_ptr (count)))
3012        val = call_debugger (list2 (Qexit, val));

(gdb) list *0x00007ff60c0a86ca
0x7ff60c0a86ca is in Fapply (eval.c:2635).
2630
2631      if (numargs == 0)
2632        return Ffuncall (max (1, nargs - 1), args);
2633      else if (numargs == 1)
2634        {
2635          args [nargs - 1] = XCAR (spread_arg);
2636          return Ffuncall (nargs, args);
2637        }
2638
2639      numargs += nargs - 2;

(gdb) list *0x00007ff60c0a80fa
0x7ff60c0a80fa is in Ffuncall (eval.c:3008).
3003      maybe_gc ();
3004
3005      if (debug_on_next_call)
3006        do_debug_on_call (Qlambda, count);
3007
3008      Lisp_Object val = funcall_general (args[0], nargs - 1, args + 1);
3009
3010      lisp_eval_depth--;
3011      if (backtrace_debug_on_exit (specpdl_ref_to_ptr (count)))
3012        val = call_debugger (list2 (Qexit, val));

(gdb) list *0x00007ff60c0a86ca
0x7ff60c0a86ca is in Fapply (eval.c:2635).
2630
2631      if (numargs == 0)
2632        return Ffuncall (max (1, nargs - 1), args);
2633      else if (numargs == 1)
2634        {
2635          args [nargs - 1] = XCAR (spread_arg);
2636          return Ffuncall (nargs, args);
2637        }
2638
2639      numargs += nargs - 2;