diff options
author | Paul Eggert <eggert@cs.ucla.edu> | 2019-06-20 00:05:28 -0700 |
---|---|---|
committer | Paul Eggert <eggert@cs.ucla.edu> | 2019-06-20 00:41:13 -0700 |
commit | 4e8083ec81106eedbecb12799823044dbd05bc7e (patch) | |
tree | aab33b48cd85a3dd6d97deff71c3e9182947af43 | |
parent | 5f32ac13c8b42e2a4eaadea1c4d0888ef341c9cd (diff) | |
download | emacs-4e8083ec81106eedbecb12799823044dbd05bc7e.tar.gz |
Fix arbitrary INT_MAX limit on referrer repr
* src/pdumper.c (print_paths_to_root_1):
Don’t assume strlen (repr) < INT_MAX.
-rw-r--r-- | src/pdumper.c | 3 |
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, Lisp_Object repr = Fprin1_to_string (referrer, Qnil); for (int i = 0; i < level; ++i) fputc (' ', stderr); - fprintf (stderr, "%s\n", SDATA (repr)); + fwrite (SDATA (repr), 1, SBYTES (repr), stderr); + fputc ('\n', stderr); print_paths_to_root_1 (ctx, referrer, level + 1); } } |