Mercurial > hg > xemacs-beta
comparison src/extents.h @ 189:489f57a838ef r20-3b21
Import from CVS: tag r20-3b21
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:57:07 +0200 |
parents | 3d6bfa290dbd |
children | e45d5e7c476e |
comparison
equal
deleted
inserted
replaced
188:e29a8e7498d9 | 189:489f57a838ef |
---|---|
77 unsigned int duplicable : 1; /* 11 copied to strings by kill/undo */ | 77 unsigned int duplicable : 1; /* 11 copied to strings by kill/undo */ |
78 unsigned int REPLICATING : 1; /* 12 invoke old extent-replica behav.*/ | 78 unsigned int REPLICATING : 1; /* 12 invoke old extent-replica behav.*/ |
79 /* Not used any more */ | 79 /* Not used any more */ |
80 unsigned int detachable : 1; /* 13 extent detaches if text deleted */ | 80 unsigned int detachable : 1; /* 13 extent detaches if text deleted */ |
81 unsigned int internal : 1; /* 14 used by map-extents etc. */ | 81 unsigned int internal : 1; /* 14 used by map-extents etc. */ |
82 unsigned int unused15 : 1; /* 15 unused */ | 82 unsigned int unused15 : 1; /* 15 unused */ |
83 unsigned int unused16 : 1; /* 16 unused */ | 83 unsigned int unused16 : 1; /* 16 unused */ |
84 /* --- Adding more flags will cause the extent struct grow by another | 84 /* --- Adding more flags will cause the extent struct grow by another |
85 word. It's not clear that this would make a difference, however, | 85 word. It's not clear that this would make a difference, however, |
86 because on 32-bit machines things tend to get allocated in chunks | 86 because on 32-bit machines things tend to get allocated in chunks |
87 of 4 bytes. */ | 87 of 4 bytes. */ |
130 avoid getting hosed by just-freed objects. */ | 130 avoid getting hosed by just-freed objects. */ |
131 Lisp_Object children; | 131 Lisp_Object children; |
132 Lisp_Object invisible; | 132 Lisp_Object invisible; |
133 Lisp_Object read_only; | 133 Lisp_Object read_only; |
134 Lisp_Object mouse_face; | 134 Lisp_Object mouse_face; |
135 Lisp_Object one_shot_function; | |
135 #ifdef ENERGIZE | 136 #ifdef ENERGIZE |
136 Energize_Extent_Data *energize_data; | 137 Energize_Extent_Data *energize_data; |
137 #endif | 138 #endif |
138 int priority; | 139 int priority; |
139 }; | 140 }; |
252 #define extent_end_glyph(e) extent_aux_field (e, end_glyph) | 253 #define extent_end_glyph(e) extent_aux_field (e, end_glyph) |
253 #define extent_priority(e) extent_aux_field (e, priority) | 254 #define extent_priority(e) extent_aux_field (e, priority) |
254 #define extent_invisible(e) extent_aux_field (e, invisible) | 255 #define extent_invisible(e) extent_aux_field (e, invisible) |
255 #define extent_read_only(e) extent_aux_field (e, read_only) | 256 #define extent_read_only(e) extent_aux_field (e, read_only) |
256 #define extent_mouse_face(e) extent_aux_field (e, mouse_face) | 257 #define extent_mouse_face(e) extent_aux_field (e, mouse_face) |
258 #define extent_one_shot_function(e) extent_aux_field (e, one_shot_function) | |
257 #ifdef ENERGIZE | 259 #ifdef ENERGIZE |
258 #define extent_energize_data(e) extent_aux_field (e, energize_data) | 260 #define extent_energize_data(e) extent_aux_field (e, energize_data) |
259 #endif | 261 #endif |
260 | 262 |
261 #define set_extent_begin_glyph(e, value) \ | 263 #define set_extent_begin_glyph(e, value) \ |
268 set_extent_aux_field (e, invisible, value) | 270 set_extent_aux_field (e, invisible, value) |
269 #define set_extent_read_only(e, value) \ | 271 #define set_extent_read_only(e, value) \ |
270 set_extent_aux_field (e, read_only, value) | 272 set_extent_aux_field (e, read_only, value) |
271 #define set_extent_mouse_face(e, value) \ | 273 #define set_extent_mouse_face(e, value) \ |
272 set_extent_aux_field (e, mouse_face, value) | 274 set_extent_aux_field (e, mouse_face, value) |
275 /* Use Fset_extent_one_shot_function unless you know what you are ding */ | |
276 #define set_extent_one_shot_function(e, value) \ | |
277 set_extent_aux_field (e, one_shot_function, value) | |
273 #ifdef ENERGIZE | 278 #ifdef ENERGIZE |
274 #define set_extent_energize_data(e, value) \ | 279 #define set_extent_energize_data(e, value) \ |
275 set_extent_aux_field (e, energize_data, value) | 280 set_extent_aux_field (e, energize_data, value) |
276 #endif | 281 #endif |
277 | 282 |