masscollaborationlabs/emacs
2
0
Fork 0
mirror of https://github.com/masscollaborationlabs/emacs.git synced 2025-07-04 03:13:24 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

; Fix treesit.c printing

Browse source 
* src/treesit.c (treesit_debug_print_parser_list): Use PRIuPTR so 32bit
systems compile without warnings.
This commit is contained in:
Yuan Fu 2024-09-17 20:53:36 -07:00
parent 8771310a10
commit 035024b4e5
No known key found for this signature in database
GPG key ID: 56E19BC57664A442
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/treesit.c
View file

@ -494,7 +494,7 @@ treesit_debug_print_parser_list (char *msg, Lisp_Object parser)
{ {
struct buffer *buf = XBUFFER (XTS_PARSER (parser)->buffer); struct buffer *buf = XBUFFER (XTS_PARSER (parser)->buffer);
char *buf_name = SSDATA (BVAR (buf, name)); char *buf_name = SSDATA (BVAR (buf, name));
printf ("%s (%s) [%s] <%s>: %ld(%ld)-(%ld)%ld {\n", printf ("%s (%s) [%s] <%s>: %"PRIuPTR"(%"PRIuPTR")-(%"PRIuPTR")%"PRIuPTR" {\n",
msg == NULL ? "" : msg, msg == NULL ? "" : msg,
SSDATA (SYMBOL_NAME (Vthis_command)), SSDATA (SYMBOL_NAME (Vthis_command)),
SSDATA (SYMBOL_NAME (XTS_PARSER (parser)->language_symbol)), SSDATA (SYMBOL_NAME (XTS_PARSER (parser)->language_symbol)),
@ -505,7 +505,7 @@ treesit_debug_print_parser_list (char *msg, Lisp_Object parser)
FOR_EACH_TAIL (tail) FOR_EACH_TAIL (tail)
{ {
struct Lisp_TS_Parser *parser = XTS_PARSER (XCAR (tail)); struct Lisp_TS_Parser *parser = XTS_PARSER (XCAR (tail));
printf ("[%s %s %s %ld-%ld T:%ld]\n", SSDATA (SYMBOL_NAME (parser->language_symbol)), printf ("[%s %s %s %"PRIuPTR"-%"PRIuPTR" T:%"PRIuPTR"]\n", SSDATA (SYMBOL_NAME (parser->language_symbol)),
SSDATA (SYMBOL_NAME (parser->tag)), SSDATA (SYMBOL_NAME (parser->tag)),
parser->need_reparse ? "NEED-R" : "NONEED", parser->need_reparse ? "NEED-R" : "NONEED",
parser->visible_beg, parser->visible_end, parser->visible_beg, parser->visible_end,