diff options
| author | Paul Eggert <eggert@cs.ucla.edu> | 2011-06-18 09:07:41 -0700 |
|---|---|---|
| committer | Paul Eggert <eggert@cs.ucla.edu> | 2011-06-18 09:07:41 -0700 |
| commit | 436b4815ed0f616fba06a6ff3dfb44fade8b0321 (patch) | |
| tree | 319e29ee5fb5f4e7025c0a6202c8085a794b2268 /src/fns.c | |
| parent | a4cf38e4bad869b1dc6af9c0b61b3e06da157dd3 (diff) | |
| download | emacs-436b4815ed0f616fba06a6ff3dfb44fade8b0321.tar.gz emacs-436b4815ed0f616fba06a6ff3dfb44fade8b0321.tar.bz2 emacs-436b4815ed0f616fba06a6ff3dfb44fade8b0321.zip | |
* fns.c (Ffillarray): Use same idx as rest of code here.
Diffstat (limited to 'src/fns.c')
| -rw-r--r-- | src/fns.c | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/src/fns.c b/src/fns.c index 702ecbd7c63..32d96fbc94e 100644 --- a/src/fns.c +++ b/src/fns.c @@ -2169,13 +2169,12 @@ ARRAY is a vector, string, char-table, or bool-vector. */) unsigned char str[MAX_MULTIBYTE_LENGTH]; int len = CHAR_STRING (charval, str); EMACS_INT size_byte = SBYTES (array); - EMACS_INT i; if (INT_MULTIPLY_OVERFLOW (SCHARS (array), len) || SCHARS (array) * len != size_byte) error ("Attempt to change byte length of a string"); - for (i = 0; i < size_byte; i++) - *p++ = str[i % len]; + for (idx = 0; idx < size_byte; idx++) + *p++ = str[idx % len]; } else for (idx = 0; idx < size; idx++) |