Mercurial > emacs
changeset 53331:db670c1b5944
(IMAGEP): New macro to test for image object type.
(Qimage): Declare extern.
| author | Kim F. Storm <storm@cua.dk> |
|---|---|
| date | Sun, 28 Dec 2003 00:11:03 +0000 |
| parents | 2dfa97148836 |
| children | 21301d0e0505 |
| files | src/lisp.h |
| diffstat | 1 files changed, 5 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/src/lisp.h Sun Dec 28 00:10:41 2003 +0000 +++ b/src/lisp.h Sun Dec 28 00:11:03 2003 +0000 @@ -1381,6 +1381,10 @@ #define GC_FRAMEP(x) GC_PSEUDOVECTORP (x, PVEC_FRAME) #define SUB_CHAR_TABLE_P(x) (CHAR_TABLE_P (x) && NILP (XCHAR_TABLE (x)->top)) + +/* Test for image (image . spec) */ +#define IMAGEP(x) (CONSP (x) && EQ (XCAR (x), Qimage)) + #define GC_EQ(x, y) EQ (x, y) @@ -2283,6 +2287,7 @@ extern Lisp_Object Qinhibit_redisplay, Qdisplay; extern Lisp_Object Qinhibit_eval_during_redisplay; extern Lisp_Object Qmessage_truncate_lines; +extern Lisp_Object Qimage; extern Lisp_Object Vmessage_log_max; extern int message_enable_multibyte; extern Lisp_Object echo_area_buffer[2];