Mercurial > hg > xemacs-beta
diff src/specifier.h @ 3092:141c2920ea48
[xemacs-hg @ 2005-11-25 01:41:31 by crestani]
Incremental Garbage Collector
| author | crestani |
|---|---|
| date | Fri, 25 Nov 2005 01:42:08 +0000 |
| parents | 1e7cc382eb16 |
| children | 98af8a976fc3 |
line wrap: on
line diff
--- a/src/specifier.h Thu Nov 24 22:51:25 2005 +0000 +++ b/src/specifier.h Fri Nov 25 01:42:08 2005 +0000 @@ -423,6 +423,9 @@ struct specifier_caching { +#ifdef NEW_GC + struct lrecord_header header; +#endif /* NEW_GC */ int offset_into_struct_window; void (*value_changed_in_window) (Lisp_Object specifier, struct window *w, Lisp_Object oldval); @@ -432,6 +435,19 @@ int always_recompute; }; +#ifdef NEW_GC +DECLARE_LRECORD (specifier_caching, struct specifier_caching); +#define XSPECIFIER_CACHING(x) \ + XRECORD (x, specifier_caching, struct specifier_caching) +#define wrap_specifier_caching(p) \ + wrap_record (p, specifier_caching) +#define SPECIFIER_CACHINGP(x) RECORDP (x, specifier_caching) +#define CHECK_SPECIFIER_CACHING(x) \ + CHECK_RECORD (x, specifier_caching) +#define CONCHECK_SPECIFIER_CACHING(x) \ + CONCHECK_RECORD (x, specifier_caching) +#endif /* NEW_GC */ + /* #### get image instances out of domains! */ /* #### I think the following should ABORT() rather than return nil