Inhibit GC in probably_quit (bug#58042)

1 files changed, 2 insertions, 0 deletions

diff --git a/src/eval.c b/src/eval.c
index 7da1d8fb989..8810136c041 100644
--- a/src/eval.c
+++ b/src/eval.c
@@ -1651,10 +1651,12 @@ process_quit_flag (void)
 void
 probably_quit (void)
 {
+  specpdl_ref gc_count = inhibit_garbage_collection ();
   if (!NILP (Vquit_flag) && NILP (Vinhibit_quit))
     process_quit_flag ();
   else if (pending_signals)
     process_pending_signals ();
+  unbind_to (gc_count, Qnil);
 }
 
 DEFUN ("signal", Fsignal, Ssignal, 2, 2, 0,