emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master 4e5068b7b3a: Fix treesit_traverse_get_predicate (bug#68954)


From: Yuan Fu
Subject: master 4e5068b7b3a: Fix treesit_traverse_get_predicate (bug#68954)
Date: Fri, 9 Feb 2024 00:25:56 -0500 (EST)

branch: master
commit 4e5068b7b3a06aaba6b93dff759a93b385ab8fd0
Author: Dominique Quatravaux <dominique.quatravaux@epfl.ch>
Commit: Yuan Fu <casouri@gmail.com>

    Fix treesit_traverse_get_predicate (bug#68954)
    
    Commit d005e685e1df7692085378633348db39a5190374 should have used
    assq_no_signal, but didn't, this commit fixes that.
    
    * src/treesit.c (treesit_traverse_get_predicate): Replace assq_no_quit
    with assq_no_signal.
    
    Copyright-paperwork-exempt: yes
---
 src/treesit.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/treesit.c b/src/treesit.c
index 12915ea9a10..d86ab501187 100644
--- a/src/treesit.c
+++ b/src/treesit.c
@@ -3275,11 +3275,11 @@ treesit_traverse_child_helper (TSTreeCursor *cursor,
 static Lisp_Object
 treesit_traverse_get_predicate (Lisp_Object thing, Lisp_Object language)
 {
-  Lisp_Object cons = assq_no_quit (language, Vtreesit_thing_settings);
+  Lisp_Object cons = assq_no_signal (language, Vtreesit_thing_settings);
   if (NILP (cons))
     return Qnil;
   Lisp_Object definitions = XCDR (cons);
-  Lisp_Object entry = assq_no_quit (thing, definitions);
+  Lisp_Object entry = assq_no_signal (thing, definitions);
   if (NILP (entry))
     return Qnil;
   /* ENTRY looks like (THING PRED).  */



reply via email to

[Prev in Thread] Current Thread [Next in Thread]