Mercurial > hg > xemacs-beta

comparison src/extents.h @ 647:b39c14581166

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2001-08-13 04:45:47 by ben] removal of unsigned, size_t, etc.
author ben
date Mon, 13 Aug 2001 04:46:48 +0000
parents af57a77cbc92
children fdefd0186b75
comparison
equal deleted inserted replaced
646:00c54252fe4f 647:b39c14581166
209 209
210 #define set_extent_aux_field(e, field, value) \ 210 #define set_extent_aux_field(e, field, value) \
211 set_extent_no_chase_aux_field (extent_ancestor (e), field, value) 211 set_extent_no_chase_aux_field (extent_ancestor (e), field, value)
212 212
213 #define set_extent_normal_field(e, field, value) \ 213 #define set_extent_normal_field(e, field, value) \
214 set_extent_ancestor_normal_field (extent_no_chase (e), field, value) 214 set_extent_no_chase_normal_field (extent_ancestor (e), field, value)
215 215
216 /* The `parent' and `children' fields are not affected by any 216 /* The `parent' and `children' fields are not affected by any
217 parent links. We don't provide any settors for these fields 217 parent links. We don't provide any settors for these fields
218 because they need special handling and it's cleaner just to 218 because they need special handling and it's cleaner just to
219 do this in the particular functions that need to do this. */ 219 do this in the particular functions that need to do this. */
250 set_extent_aux_field (e, before_change_functions, value) 250 set_extent_aux_field (e, before_change_functions, value)
251 #define set_extent_after_change_functions(e, value) \ 251 #define set_extent_after_change_functions(e, value) \
252 set_extent_aux_field (e, after_change_functions, value) 252 set_extent_aux_field (e, after_change_functions, value)
253 253
254 #define extent_face(e) extent_normal_field (e, face) 254 #define extent_face(e) extent_normal_field (e, face)
255 #define extent_begin_glyph_layout(e) extent_normal_field (e, begin_glyph_layout) 255 #define extent_begin_glyph_layout(e) ((enum glyph_layout) extent_normal_field (e, begin_glyph_layout))
256 #define extent_end_glyph_layout(e) extent_normal_field (e, end_glyph_layout) 256 #define extent_end_glyph_layout(e) ((enum glyph_layout) extent_normal_field (e, end_glyph_layout))
257 #define extent_start_open_p(e) extent_normal_field (e, start_open) 257 #define extent_start_open_p(e) extent_normal_field (e, start_open)
258 #define extent_end_open_p(e) extent_normal_field (e, end_open) 258 #define extent_end_open_p(e) extent_normal_field (e, end_open)
259 #define extent_unique_p(e) extent_normal_field (e, unique) 259 #define extent_unique_p(e) extent_normal_field (e, unique)
260 #define extent_duplicable_p(e) extent_normal_field (e, duplicable) 260 #define extent_duplicable_p(e) extent_normal_field (e, duplicable)
261 #define extent_detachable_p(e) extent_normal_field (e, detachable) 261 #define extent_detachable_p(e) extent_normal_field (e, detachable)
262 #define extent_internal_p(e) extent_normal_field (e, internal) 262 #define extent_internal_p(e) extent_normal_field (e, internal)
263 #define extent_in_red_event_p(e) extent_normal_field (e, in_red_event) 263 #define extent_in_red_event_p(e) extent_normal_field (e, in_red_event)
264
265 #define set_extent_face(e, val) \
266 set_extent_normal_field (e, face, val)
267 #define set_extent_begin_glyph_layout(e, val) \
268 set_extent_normal_field (e, begin_glyph_layout, val)
269 #define set_extent_end_glyph_layout(e, val) \
270 set_extent_normal_field (e, end_glyph_layout, val)
271 #define set_extent_start_open_p(e, val) \
272 set_extent_normal_field (e, start_open, val)
273 #define set_extent_end_open_p(e, val) \
274 set_extent_normal_field (e, end_open, val)
275 #define set_extent_unique_p(e, val) \
276 set_extent_normal_field (e, unique, val)
277 #define set_extent_duplicable_p(e, val) \
278 set_extent_normal_field (e, duplicable, val)
279 #define set_extent_detachable_p(e, val) \
280 set_extent_normal_field (e, detachable, val)
281 #define set_extent_internal_p(e, val) \
282 set_extent_normal_field (e, internal, val)
283 #define set_extent_in_red_event_p(e, val) \
284 set_extent_normal_field (e, in_red_event, val)
264 285
265 INLINE_HEADER Lisp_Object * extent_no_chase_plist_addr (EXTENT e); 286 INLINE_HEADER Lisp_Object * extent_no_chase_plist_addr (EXTENT e);
266 INLINE_HEADER Lisp_Object * 287 INLINE_HEADER Lisp_Object *
267 extent_no_chase_plist_addr (EXTENT e) 288 extent_no_chase_plist_addr (EXTENT e)
268 { 289 {