Mercurial > emacs
comparison src/data.c @ 68497:a224550f3e25
(Flistp): Doc fix.
author | Luc Teirlinck <teirllm@auburn.edu> |
---|---|
date | Mon, 30 Jan 2006 23:40:49 +0000 |
parents | 8ad0f8c7115f |
children | 3bd95f4f2941 38c49afb29d9 7432ca837c8d |
comparison
equal
deleted
inserted
replaced
68496:ffc5a0380db7 | 68497:a224550f3e25 |
---|---|
272 return Qnil; | 272 return Qnil; |
273 return Qt; | 273 return Qt; |
274 } | 274 } |
275 | 275 |
276 DEFUN ("listp", Flistp, Slistp, 1, 1, 0, | 276 DEFUN ("listp", Flistp, Slistp, 1, 1, 0, |
277 doc: /* Return t if OBJECT is a list. This includes nil. */) | 277 doc: /* Return t if OBJECT is a list, that is, a cons cell or nil. |
278 Otherwise, return nil. */) | |
278 (object) | 279 (object) |
279 Lisp_Object object; | 280 Lisp_Object object; |
280 { | 281 { |
281 if (CONSP (object) || NILP (object)) | 282 if (CONSP (object) || NILP (object)) |
282 return Qt; | 283 return Qt; |