From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: Arash Esbati Newsgroups: gmane.emacs.bugs Subject: bug#63365: 30.0.50; GCC 13.1 breaks building Emacs with native-compilation Date: Sat, 27 May 2023 19:35:12 +0200 Message-ID: <86zg5psmnj.fsf@gnu.org> References: <86wn1jtezk.fsf@gnu.org> <83jzxjcac9.fsf@gnu.org> <86h6smopo6.fsf@gnu.org> <835y92dfgd.fsf@gnu.org> <86v8h2k475.fsf@gnu.org> <83r0rqaycc.fsf@gnu.org> <86wn1h3dpz.fsf@gnu.org> <835y91brfv.fsf@gnu.org> <86fs849xb0.fsf@gnu.org> <83ild08i8j.fsf@gnu.org> <86y1lwmfcw.fsf@gnu.org> <83ild06sb5.fsf@gnu.org> <83a5yc6m2e.fsf@gnu.org> <86lehbi6pu.fsf@gnu.org> <83r0r3jjka.fsf@gnu.org> <86wn0unbjd.fsf@gnu.org> <83fs7ijou6.fsf@gnu.org> <867csujb31.fsf@gnu.org> <835y8ej9f3.fsf@gnu.org> Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" Injection-Info: ciao.gmane.io; posting-host="blaine.gmane.org:116.202.254.214"; logging-data="31249"; mail-complaints-to="usenet@ciao.gmane.io" User-Agent: Gnus/5.13 (Gnus v5.13) Cc: 63365@debbugs.gnu.org, akrl@sdf.org To: Eli Zaretskii Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org Sat May 27 19:37:20 2023 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane-mx.org Original-Received: from lists.gnu.org ([209.51.188.17]) by ciao.gmane.io with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.92) (envelope-from ) id 1q2xqy-0007r4-5l for geb-bug-gnu-emacs@m.gmane-mx.org; Sat, 27 May 2023 19:37:20 +0200 Original-Received: from localhost ([::1] helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1q2xqj-0007I7-Fp; Sat, 27 May 2023 13:37:05 -0400 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1q2xqh-0007Ht-N4 for bug-gnu-emacs@gnu.org; Sat, 27 May 2023 13:37:03 -0400 Original-Received: from debbugs.gnu.org ([209.51.188.43]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1q2xqg-00015d-7X for bug-gnu-emacs@gnu.org; Sat, 27 May 2023 13:37:02 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1q2xqg-0003ts-3W for bug-gnu-emacs@gnu.org; Sat, 27 May 2023 13:37:02 -0400 X-Loop: help-debbugs@gnu.org Resent-From: Arash Esbati Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Sat, 27 May 2023 17:37:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 63365 X-GNU-PR-Package: emacs Original-Received: via spool by 63365-submit@debbugs.gnu.org id=B63365.168520897414901 (code B ref 63365); Sat, 27 May 2023 17:37:02 +0000 Original-Received: (at 63365) by debbugs.gnu.org; 27 May 2023 17:36:14 +0000 Original-Received: from localhost ([127.0.0.1]:52534 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1q2xpt-0003sG-3s for submit@debbugs.gnu.org; Sat, 27 May 2023 13:36:13 -0400 Original-Received: from eggs.gnu.org ([209.51.188.92]:47180) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1q2xpq-0003s0-Km for 63365@debbugs.gnu.org; Sat, 27 May 2023 13:36:11 -0400 Original-Received: from fencepost.gnu.org ([2001:470:142:3::e]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1q2xpl-0000u7-Bx; Sat, 27 May 2023 13:36:05 -0400 DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; d=gnu.org; s=fencepost-gnu-org; h=MIME-Version:Date:References:In-Reply-To:Subject:To: From; bh=SqrNLmdamqSZz6rXGZM9JgX9xhhpXLtWumKhPEn4UQQ=; b=irRok+aVv5BN6xfehK3T d3wGaQYFB5WIH3nN1cSpmNy+jIUxjfglECWlr9LTQ1/gHFs1INL63tiYW8VvJL87yyQ+IwcAJ/yw0 0Ni3If0YQulCvyfFW3nYCytAhhLSjO60+rf87AX1AIUrCIo0ePyFysgJYS7Dp37Zhq+QtymthPDm/ jLKjU6rnYIGT6BvilftZY/3ce9df4a6LMOnQZy22Y3NaEfo+LUdqRH1wOh4HR5a82eAaNhiNsS3Tp OOydA/bOH9Jqu2/6don4pMHoMc7i0CoG4uQtWqA7OMZs65yJLdEbZZvp49hAVyMQsUxI8lvqKPWSD sCIXPXnpV6qcOw==; Original-Received: from p5b326c3d.dip0.t-ipconnect.de ([91.50.108.61] helo=MUTANT) by fencepost.gnu.org with esmtpsa (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1q2xpk-0005sl-SA; Sat, 27 May 2023 13:36:05 -0400 In-Reply-To: <835y8ej9f3.fsf@gnu.org> (Eli Zaretskii's message of "Sat, 27 May 2023 14:33:36 +0300") X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-BeenThere: bug-gnu-emacs@gnu.org List-Id: "Bug reports for GNU Emacs, the Swiss army knife of text editors" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org Original-Sender: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org Xref: news.gmane.io gmane.emacs.bugs:262485 Archived-At: --=-=-= Content-Type: text/plain Eli Zaretskii writes: > Yes, please. So these are the addresses I get for apropos.el: --8<---------------cut here---------------start------------->8--- '../src/emacs.exe' -batch --no-site-file --no-site-lisp \ --eval "(setq load-prefer-newer t byte-compile-warnings 'all)" \ --eval "(setq org--inhibit-version-check t)" \ -l comp -f batch-byte+native-compile apropos.el Backtrace: 00007ff75f71a12e 00007ff75f5e8be1 00007ff75f609601 00007ff75f77e84a 00007ffa21d07ff0 00007ffa21f923d7 00007ffa21f4149c 00007ffa21f90f06 00007ff75f66e1b0 00007ff75f6780fa 00007ff75f6786ca 00007ff9addf77d1 00007ff75f6780fa 00007ff75f6786ca 00007ff9addf78e0 00007ff75f6780fa 00007ff9add42e69 00007ff75f6780fa 00007ff9add4573b 00007ff75f6780fa 00007ff9add45692 00007ff75f6780fa 00007ff9ade068d2 00007ff75f67b88e 00007ff75f6780fa 00007ff9ade0599a 00007ff75f6780fa 00007ff9ade0257b 00007ff75f67b88e 00007ff75f6c3cb8 00007ff75f6780fa 00007ff9ade189ab 00007ff9ade18bff 00007ff9ade18f9a 00007ff75f6780fa 00007ff9ade00e6c 00007ff75f6780fa 00007ff9ade00cfe 00007ff75f6780fa 00007ff9addf1fab 00007ff75f6780fa 00007ff9ade00d96 00007ff75f6780fa 00007ff9addfee0c 00007ff75f6780fa 00007ff9addff82a 00007ff75f6780fa 00007ff9addfd95d 00007ff75f6780fa 00007ff9ade1c585 00007ff75f6780fa 00007ff9ade1bfff 00007ff75f6780fa 00007ff9adedc32f 00007ff75f6780fa 00007ff9ae7cf03b 00007ff75f6780fa 00007ff9ae7c724e 00007ff75f6780fa 00007ff9ae7c32b0 00007ff75f67c2aa 00007ff75f67e9aa ... make[3]: *** [Makefile:328: apropos.elc] Error 3 --8<---------------cut here---------------end--------------->8--- The corresponding results from GDB are attached. The compilation breaks for the following files: apropos.el checkdoc.el obsolete/vip.el progmodes/cc-langs.el Do you need the information attached for all of the files above? Best, Arash --=-=-= Content-Type: text/plain Content-Disposition: attachment; filename=apropos.el.txt (gdb) list *0x00007ff75f71a12e 0x7ff75f71a12e 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 *0x00007ff75f5e8be1 0x7ff75f5e8be1 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 *0x00007ff75f609601 0x7ff75f609601 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 *0x00007ff75f77e84a 0x7ff75f77e84a 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 *0x00007ff75f66e1b0 0x7ff75f66e1b0 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 *0x00007ff75f6780fa 0x7ff75f6780fa 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 *0x00007ff75f6786ca 0x7ff75f6786ca 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 *0x00007ff75f6780fa 0x7ff75f6780fa 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)); 0x7ff75f6786ca 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 *0x00007ff75f6780fa 0x7ff75f6780fa 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 *0x00007ff75f6780fa 0x7ff75f6780fa 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 *0x00007ff75f6780fa 0x7ff75f6780fa 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 *0x00007ff75f6780fa 0x7ff75f6780fa 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 *0x00007ff75f67b88e 0x7ff75f67b88e is in funcall_subr (eval.c:3055). 3050 case 3: 3051 return subr->function.a3 (a[0], a[1], a[2]); 3052 case 4: 3053 return subr->function.a4 (a[0], a[1], a[2], a[3]); 3054 case 5: 3055 return subr->function.a5 (a[0], a[1], a[2], a[3], a[4]); 3056 case 6: 3057 return subr->function.a6 (a[0], a[1], a[2], a[3], a[4], a[5]); 3058 case 7: 3059 return subr->function.a7 (a[0], a[1], a[2], a[3], a[4], a[5], (gdb) list *0x00007ff75f6780fa 0x7ff75f6780fa 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 *0x00007ff75f6780fa 0x7ff75f6780fa 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 *0x00007ff75f67b88e 0x7ff75f67b88e is in funcall_subr (eval.c:3055). 3050 case 3: 3051 return subr->function.a3 (a[0], a[1], a[2]); 3052 case 4: 3053 return subr->function.a4 (a[0], a[1], a[2], a[3]); 3054 case 5: 3055 return subr->function.a5 (a[0], a[1], a[2], a[3], a[4]); 3056 case 6: 3057 return subr->function.a6 (a[0], a[1], a[2], a[3], a[4], a[5]); 3058 case 7: 3059 return subr->function.a7 (a[0], a[1], a[2], a[3], a[4], a[5], (gdb) list *0x00007ff75f6c3cb8 0x7ff75f6c3cb8 is in exec_byte_code (bytecode.c:809). 804 goto setup_frame; 805 } 806 807 Lisp_Object val; 808 if (SUBRP (call_fun) && !SUBR_NATIVE_COMPILED_DYNP (call_fun)) 809 val = funcall_subr (XSUBR (call_fun), call_nargs, call_args); 810 else 811 val = funcall_general (original_fun, call_nargs, call_args); 812 813 lisp_eval_depth--; (gdb) list *0x00007ff75f6780fa 0x7ff75f6780fa 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 *0x00007ff75f6780fa 0x7ff75f6780fa 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 *0x00007ff75f6780fa 0x7ff75f6780fa 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 *0x00007ff75f6780fa 0x7ff75f6780fa 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 *0x00007ff75f6780fa 0x7ff75f6780fa 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 *0x00007ff75f6780fa 0x7ff75f6780fa 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 *0x00007ff75f6780fa 0x7ff75f6780fa 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 *0x00007ff75f6780fa 0x7ff75f6780fa 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 *0x00007ff75f6780fa 0x7ff75f6780fa 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 *0x00007ff75f6780fa 0x7ff75f6780fa 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 *0x00007ff75f6780fa 0x7ff75f6780fa 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 *0x00007ff75f6780fa 0x7ff75f6780fa 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 *0x00007ff75f6780fa 0x7ff75f6780fa 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 *0x00007ff75f6780fa 0x7ff75f6780fa 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 *0x00007ff75f67c2aa 0x7ff75f67c2aa is in eval_sub (eval.c:147). 142 static void 143 set_backtrace_args (union specbinding *pdl, Lisp_Object *args, ptrdiff_t nargs) 144 { 145 eassert (pdl->kind == SPECPDL_BACKTRACE); 146 pdl->bt.args = args; 147 pdl->bt.nargs = nargs; 148 } 149 150 static void 151 set_backtrace_debug_on_exit (union specbinding *pdl, bool doe) (gdb) list *0x00007ff75f67e9aa 0x7ff75f67e9aa is in Feval (eval.c:2375). 2370 (Lisp_Object form, Lisp_Object lexical) 2371 { 2372 specpdl_ref count = SPECPDL_INDEX (); 2373 specbind (Qinternal_interpreter_environment, 2374 CONSP (lexical) || NILP (lexical) ? lexical : list_of_t); 2375 return unbind_to (count, eval_sub (form)); 2376 } 2377 2378 void 2379 grow_specpdl_allocation (void) --=-=-=--