Mercurial > hg > xemacs-beta

comparison src/objects-tty-impl.h @ 5120:d1247f3cc363 ben-lisp-object

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
latest work on lisp-object workspace; more changes eliminating LCRECORD in place of LISP_OBJECT; now compiles and runs.
author Ben Wing <ben@xemacs.org>
date Mon, 28 Dec 2009 01:15:52 -0600
parents e0db3c197671
children a9c41067dd88
comparison
equal deleted inserted replaced
5119:d877c14318b3 5120:d1247f3cc363
28 #include "objects-tty.h" 28 #include "objects-tty.h"
29 29
30 struct tty_color_instance_data 30 struct tty_color_instance_data
31 { 31 {
32 #ifdef NEW_GC 32 #ifdef NEW_GC
33 struct lrecord_header header; 33 LISP_OBJECT_HEADER header;
34 #endif /* NEW_GC */ 34 #endif /* NEW_GC */
35 Lisp_Object symbol; /* so we don't have to constantly call Fintern() */ 35 Lisp_Object symbol; /* so we don't have to constantly call Fintern() */
36 }; 36 };
37 37
38 #ifdef NEW_GC 38 #ifdef NEW_GC
54 #define COLOR_INSTANCE_TTY_SYMBOL(c) (TTY_COLOR_INSTANCE_DATA (c)->symbol) 54 #define COLOR_INSTANCE_TTY_SYMBOL(c) (TTY_COLOR_INSTANCE_DATA (c)->symbol)
55 55
56 struct tty_font_instance_data 56 struct tty_font_instance_data
57 { 57 {
58 #ifdef NEW_GC 58 #ifdef NEW_GC
59 struct lrecord_header header; 59 LISP_OBJECT_HEADER header;
60 #endif /* NEW_GC */ 60 #endif /* NEW_GC */
61 Lisp_Object charset; 61 Lisp_Object charset;
62 }; 62 };
63 63
64 #ifdef NEW_GC 64 #ifdef NEW_GC