diff options
Diffstat (limited to 'src/data.c')
| -rw-r--r-- | src/data.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/data.c b/src/data.c index c84b137b5d6..9a0788ae719 100644 --- a/src/data.c +++ b/src/data.c | |||
| @@ -350,7 +350,8 @@ DEFUN ("arrayp", Farrayp, Sarrayp, 1, 1, 0, "T if OBJECT is an array (string or | |||
| 350 | (object) | 350 | (object) |
| 351 | Lisp_Object object; | 351 | Lisp_Object object; |
| 352 | { | 352 | { |
| 353 | if (VECTORP (object) || STRINGP (object)) | 353 | if (VECTORP (object) || STRINGP (object) |
| 354 | || CHAR_TABLE_P (object) || BOOL_VECTOR_P (object)) | ||
| 354 | return Qt; | 355 | return Qt; |
| 355 | return Qnil; | 356 | return Qnil; |
| 356 | } | 357 | } |