comparison src/specifier.h @ 5120:d1247f3cc363 ben-lisp-object

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 b5df3737028a
comparison
equal deleted inserted replaced
5119:d877c14318b3 5120:d1247f3cc363
218 int extra_data_size; 218 int extra_data_size;
219 }; 219 };
220 220
221 struct Lisp_Specifier 221 struct Lisp_Specifier
222 { 222 {
223 struct LCRECORD_HEADER header; 223 LISP_OBJECT_HEADER header;
224 struct specifier_methods *methods; 224 struct specifier_methods *methods;
225 225
226 /* we keep a chained list of all current specifiers, for GC cleanup 226 /* we keep a chained list of all current specifiers, for GC cleanup
227 purposes. Do NOT mark through this, or specifiers will never 227 purposes. Do NOT mark through this, or specifiers will never
228 be GC'd. */ 228 be GC'd. */
426 }; 426 };
427 427
428 struct specifier_caching 428 struct specifier_caching
429 { 429 {
430 #ifdef NEW_GC 430 #ifdef NEW_GC
431 struct lrecord_header header; 431 LISP_OBJECT_HEADER header;
432 #endif /* NEW_GC */ 432 #endif /* NEW_GC */
433 int offset_into_struct_window; 433 int offset_into_struct_window;
434 void (*value_changed_in_window) (Lisp_Object specifier, struct window *w, 434 void (*value_changed_in_window) (Lisp_Object specifier, struct window *w,
435 Lisp_Object oldval); 435 Lisp_Object oldval);
436 int offset_into_struct_frame; 436 int offset_into_struct_frame;