diff options
Diffstat (limited to 'src/buffer.c')
| -rw-r--r-- | src/buffer.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/buffer.c b/src/buffer.c index e9ff8f492ba..453ea838902 100644 --- a/src/buffer.c +++ b/src/buffer.c | |||
| @@ -841,8 +841,8 @@ it is in the sequence to be tried) even if a buffer with that name exists. */) | |||
| 841 | (register Lisp_Object name, Lisp_Object ignore) | 841 | (register Lisp_Object name, Lisp_Object ignore) |
| 842 | { | 842 | { |
| 843 | register Lisp_Object gentemp, tem; | 843 | register Lisp_Object gentemp, tem; |
| 844 | int count; | 844 | EMACS_INT count; |
| 845 | char number[10]; | 845 | char number[INT_BUFSIZE_BOUND (EMACS_INT) + sizeof "<>"]; |
| 846 | 846 | ||
| 847 | CHECK_STRING (name); | 847 | CHECK_STRING (name); |
| 848 | 848 | ||
| @@ -856,7 +856,7 @@ it is in the sequence to be tried) even if a buffer with that name exists. */) | |||
| 856 | count = 1; | 856 | count = 1; |
| 857 | while (1) | 857 | while (1) |
| 858 | { | 858 | { |
| 859 | sprintf (number, "<%d>", ++count); | 859 | sprintf (number, "<%"pI"d>", ++count); |
| 860 | gentemp = concat2 (name, build_string (number)); | 860 | gentemp = concat2 (name, build_string (number)); |
| 861 | tem = Fstring_equal (gentemp, ignore); | 861 | tem = Fstring_equal (gentemp, ignore); |
| 862 | if (!NILP (tem)) | 862 | if (!NILP (tem)) |