; Fix wording and coding style of a recent commit

* src/treesit.c (treesit_traverse_match_predicate): Fix style.

* doc/lispref/parsing.texi (User-defined Things): Fix wording.

(cherry picked from commit e633bbfec0fe0fa436026d759132faa47b6b0dc4)

diff --git a/doc/lispref/parsing.texi b/doc/lispref/parsing.texi
index 3e44f31c12ca0e706d2ab9ded107595483c409d6..ba7fbca2de968e2e37ebd3b2fd4534aace94e5a9 100644 (file)
--- a/doc/lispref/parsing.texi
+++ b/doc/lispref/parsing.texi
@@ -1607,7 +1607,7 @@ that's either a @code{sexp} thing or a @code{sentence} thing, as defined
 by some other rule in the alist.
 
 There are two pre-defined predicates: @code{named} and @code{anonymous},
-that qualifies named and anonymous nodes, respectively.  They can be
+which qualify, respectively, named and anonymous nodes.  They can be
 combined with @code{and} to narrow down the match.
 
 Here's an example @code{treesit-thing-settings} for C and C++:

diff --git a/src/treesit.c b/src/treesit.c
index 439109e72db17e449932040cd826c309e8212044..0d878a580ebc6183ba195e67b8068b0c92d2abec 100644 (file)
--- a/src/treesit.c
+++ b/src/treesit.c
@@ -3733,13 +3733,9 @@ treesit_traverse_match_predicate (TSTreeCursor *cursor, Lisp_Object pred,
       return !NILP (calln (pred, lisp_node));
     }
   else if (SYMBOLP (pred) && BASE_EQ (pred, Qnamed))
-    {
-      return ts_node_is_named (node);
-    }
+    return ts_node_is_named (node);
   else if (SYMBOLP (pred) && BASE_EQ (pred, Qanonymous))
-    {
-      return !ts_node_is_named (node);
-    }
+    return !ts_node_is_named (node);
   else if (SYMBOLP (pred))
     {
       Lisp_Object language = XTS_PARSER (parser)->language_symbol;