Mercurial > hg > xemacs-beta

comparison src/extents-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 1e7cc382eb16
children a9c41067dd88
comparison
equal deleted inserted replaced
5119:d877c14318b3 5120:d1247f3cc363
25 25
26 #include "extents.h" 26 #include "extents.h"
27 27
28 struct extent 28 struct extent
29 { 29 {
30 struct lrecord_header lheader; 30 FROB_BLOCK_LISP_OBJECT_HEADER lheader;
31 31
32 Memxpos start; 32 Memxpos start;
33 Memxpos end; 33 Memxpos end;
34 Lisp_Object object; /* A buffer, string, Qnil (extent detached from no 34 Lisp_Object object; /* A buffer, string, Qnil (extent detached from no
35 buffer), Qt (destroyed extent) */ 35 buffer), Qt (destroyed extent) */
101 have this structure around and thus the size of an extent is smaller. */ 101 have this structure around and thus the size of an extent is smaller. */
102 102
103 typedef struct extent_auxiliary extent_auxiliary; 103 typedef struct extent_auxiliary extent_auxiliary;
104 struct extent_auxiliary 104 struct extent_auxiliary
105 { 105 {
106 struct LCRECORD_HEADER header; 106 LISP_OBJECT_HEADER header;
107 107
108 Lisp_Object begin_glyph; 108 Lisp_Object begin_glyph;
109 Lisp_Object end_glyph; 109 Lisp_Object end_glyph;
110 Lisp_Object parent; 110 Lisp_Object parent;
111 /* We use a weak list here. Originally I didn't do this and 111 /* We use a weak list here. Originally I didn't do this and
127 127
128 extern struct extent_auxiliary extent_auxiliary_defaults; 128 extern struct extent_auxiliary extent_auxiliary_defaults;
129 129
130 struct extent_info 130 struct extent_info
131 { 131 {
132 struct LCRECORD_HEADER header; 132 LISP_OBJECT_HEADER header;
133 133
134 struct extent_list *extents; 134 struct extent_list *extents;
135 struct stack_of_extents *soe; 135 struct stack_of_extents *soe;
136 }; 136 };
137 137