diff options
Diffstat (limited to 'src/process.c')
| -rw-r--r-- | src/process.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/process.c b/src/process.c index cab390c10c6..5f552675db6 100644 --- a/src/process.c +++ b/src/process.c | |||
| @@ -888,13 +888,13 @@ make_process (Lisp_Object name) | |||
| 888 | /* If name is already in use, modify it until it is unused. */ | 888 | /* If name is already in use, modify it until it is unused. */ |
| 889 | 889 | ||
| 890 | Lisp_Object name1 = name; | 890 | Lisp_Object name1 = name; |
| 891 | for (printmax_t i = 1; ; i++) | 891 | for (intmax_t i = 1; ; i++) |
| 892 | { | 892 | { |
| 893 | Lisp_Object tem = Fget_process (name1); | 893 | Lisp_Object tem = Fget_process (name1); |
| 894 | if (NILP (tem)) | 894 | if (NILP (tem)) |
| 895 | break; | 895 | break; |
| 896 | char const suffix_fmt[] = "<%"pMd">"; | 896 | char const suffix_fmt[] = "<%"PRIdMAX">"; |
| 897 | char suffix[sizeof suffix_fmt + INT_STRLEN_BOUND (printmax_t)]; | 897 | char suffix[sizeof suffix_fmt + INT_STRLEN_BOUND (i)]; |
| 898 | AUTO_STRING_WITH_LEN (lsuffix, suffix, sprintf (suffix, suffix_fmt, i)); | 898 | AUTO_STRING_WITH_LEN (lsuffix, suffix, sprintf (suffix, suffix_fmt, i)); |
| 899 | name1 = concat2 (name, lsuffix); | 899 | name1 = concat2 (name, lsuffix); |
| 900 | } | 900 | } |