aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorPaul Eggert2019-06-20 00:05:28 -0700
committerPaul Eggert2019-06-20 00:41:13 -0700
commit4e8083ec81106eedbecb12799823044dbd05bc7e (patch)
treeaab33b48cd85a3dd6d97deff71c3e9182947af43 /src
parent5f32ac13c8b42e2a4eaadea1c4d0888ef341c9cd (diff)
downloademacs-4e8083ec81106eedbecb12799823044dbd05bc7e.tar.gz
emacs-4e8083ec81106eedbecb12799823044dbd05bc7e.zip
Fix arbitrary INT_MAX limit on referrer repr
* src/pdumper.c (print_paths_to_root_1): Don’t assume strlen (repr) < INT_MAX.
Diffstat (limited to 'src')
-rw-r--r--src/pdumper.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/pdumper.c b/src/pdumper.c
index a028600ea79..c00f8a0af54 100644
--- a/src/pdumper.c
+++ b/src/pdumper.c
@@ -1405,7 +1405,8 @@ print_paths_to_root_1 (struct dump_context *ctx,
1405 Lisp_Object repr = Fprin1_to_string (referrer, Qnil); 1405 Lisp_Object repr = Fprin1_to_string (referrer, Qnil);
1406 for (int i = 0; i < level; ++i) 1406 for (int i = 0; i < level; ++i)
1407 fputc (' ', stderr); 1407 fputc (' ', stderr);
1408 fprintf (stderr, "%s\n", SDATA (repr)); 1408 fwrite (SDATA (repr), 1, SBYTES (repr), stderr);
1409 fputc ('\n', stderr);
1409 print_paths_to_root_1 (ctx, referrer, level + 1); 1410 print_paths_to_root_1 (ctx, referrer, level + 1);
1410 } 1411 }
1411} 1412}