diff options
| author | Juanma Barranquero <lekktu@gmail.com> | 2003-04-06 13:32:17 +0000 |
|---|---|---|
| committer | Juanma Barranquero <lekktu@gmail.com> | 2003-04-06 13:32:17 +0000 |
| commit | b1f81fc530edd396c57c8280054e6c263e7bcf19 (patch) | |
| tree | 3587db8a6e50b81353b71d48006d7212bc201dd8 /src/fns.c | |
| parent | d02fcd847e4d61be9e1dbd8506a6910166c8280f (diff) | |
| download | emacs-b1f81fc530edd396c57c8280054e6c263e7bcf19.tar.gz | |
(Flength): Return SUB_CHAR_TABLE_ORDINARY_SLOTS for sub char tables.
Diffstat (limited to 'src/fns.c')
| -rw-r--r-- | src/fns.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/fns.c b/src/fns.c index 6c752fc9dd9..8a70ed04053 100644 --- a/src/fns.c +++ b/src/fns.c @@ -142,6 +142,8 @@ To get the number of bytes, use `string-bytes'. */) XSETFASTINT (val, SCHARS (sequence)); else if (VECTORP (sequence)) XSETFASTINT (val, XVECTOR (sequence)->size); + else if (SUB_CHAR_TABLE_P (sequence)) + XSETFASTINT (val, SUB_CHAR_TABLE_ORDINARY_SLOTS); else if (CHAR_TABLE_P (sequence)) XSETFASTINT (val, MAX_CHAR); else if (BOOL_VECTOR_P (sequence)) |