Mercurial > emacs

changeset 50461:6a4e89f0d078

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Flength): Return SUB_CHAR_TABLE_ORDINARY_SLOTS for sub char tables.
author Juanma Barranquero <lekktu@gmail.com>
date Sun, 06 Apr 2003 13:31:40 +0000
parents 4ed7bb80efbe
children c56acfe75212
files src/fns.c
diffstat 1 files changed, 2 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/fns.c	Sun Apr 06 12:35:33 2003 +0000
+++ b/src/fns.c	Sun Apr 06 13:31:40 2003 +0000
@@ -142,6 +142,8 @@
     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))