diff options
| author | Richard M. Stallman <rms@gnu.org> | 1997-06-02 00:33:14 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1997-06-02 00:33:14 +0000 |
| commit | 4d575e28dbe6fdbff3e23e7b2e264c93bbe8f27a (patch) | |
| tree | c997a51655811e9239242180368aba3b97fb2886 | |
| parent | 9c88a4f7bb81dcc973dc7a6b43572f687de66af9 (diff) | |
| download | emacs-4d575e28dbe6fdbff3e23e7b2e264c93bbe8f27a.tar.gz | |
(map_char_table): Use XSETFASTINT.
| -rw-r--r-- | src/fns.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/fns.c b/src/fns.c index 69bcb6f7d86..24c737141cc 100644 --- a/src/fns.c +++ b/src/fns.c @@ -1457,7 +1457,7 @@ map_char_table (c_function, function, subtable, arg, depth, indices) { Lisp_Object elt = XCHAR_TABLE (subtable)->contents[i]; - indices[depth] = i; + XSETFASTINT (indices[depth], i); if (SUB_CHAR_TABLE_P (elt)) { |