master fa567684fa: ; Fix comparisons in treesit.c

[Eli Zaretskii]

branch: master
commit fa567684fa276511ea981cd208f99b67c521d8aa
Author: Eli Zaretskii <eliz@gnu.org>
Commit: Eli Zaretskii <eliz@gnu.org>

    ; Fix comparisons in treesit.c
    
    * src/treesit.c (Ftreesit_parser_add_notifier)
    (Ftreesit_parser_remove_notifier): Fix comparison with Lisp
    objects.  (Bug#59483)
---
 src/treesit.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/treesit.c b/src/treesit.c
index 463e2458a6..835b07c931 100644
--- a/src/treesit.c
+++ b/src/treesit.c
@@ -1535,7 +1535,7 @@ positions.  PARSER is the parser issuing the 
notification.  */)
   CHECK_SYMBOL (function);
 
   Lisp_Object functions = XTS_PARSER (parser)->after_change_functions;
-  if (!Fmemq (function, functions))
+  if (NILP (Fmemq (function, functions)))
     XTS_PARSER (parser)->after_change_functions = Fcons (function, functions);
   return Qnil;
 }
@@ -1555,7 +1555,7 @@ positions.  PARSER is the parser issuing the 
notification.   */)
   CHECK_SYMBOL (function);
 
   Lisp_Object functions = XTS_PARSER (parser)->after_change_functions;
-  if (Fmemq (function, functions))
+  if (!NILP (Fmemq (function, functions)))
     XTS_PARSER (parser)->after_change_functions = Fdelq (function, functions);
   return Qnil;
 }