Mercurial > hg > xemacs-beta

comparison src/extents.c @ 440:8de8e3f6228a r21-2-28

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-28
author cvs
date Mon, 13 Aug 2007 11:33:38 +0200
parents 84b14dcb0985
children abe6d1db359e
comparison
equal deleted inserted replaced
439:357dd071b03c 440:8de8e3f6228a
885 885
886 static Extent_List * 886 static Extent_List *
887 allocate_extent_list (void) 887 allocate_extent_list (void)
888 { 888 {
889 Extent_List *el = xnew (Extent_List); 889 Extent_List *el = xnew (Extent_List);
890 el->start = make_gap_array (sizeof(EXTENT)); 890 el->start = make_gap_array (sizeof (EXTENT));
891 el->end = make_gap_array (sizeof(EXTENT)); 891 el->end = make_gap_array (sizeof (EXTENT));
892 el->markers = 0; 892 el->markers = 0;
893 return el; 893 return el;
894 } 894 }
895 895
896 static void 896 static void
2920 Lisp_Object value); 2920 Lisp_Object value);
2921 static int extent_remprop (Lisp_Object obj, Lisp_Object prop); 2921 static int extent_remprop (Lisp_Object obj, Lisp_Object prop);
2922 static Lisp_Object extent_plist (Lisp_Object obj); 2922 static Lisp_Object extent_plist (Lisp_Object obj);
2923 2923
2924 static const struct lrecord_description extent_description[] = { 2924 static const struct lrecord_description extent_description[] = {
2925 { XD_LISP_OBJECT, offsetof(struct extent, object), 2 }, 2925 { XD_LISP_OBJECT, offsetof (struct extent, object) },
2926 { XD_LISP_OBJECT, offsetof(struct extent, plist), 1 }, 2926 { XD_LISP_OBJECT, offsetof (struct extent, flags.face) },
2927 { XD_LISP_OBJECT, offsetof (struct extent, plist) },
2927 { XD_END } 2928 { XD_END }
2928 }; 2929 };
2929 2930
2930 DEFINE_BASIC_LRECORD_IMPLEMENTATION_WITH_PROPS ("extent", extent, 2931 DEFINE_BASIC_LRECORD_IMPLEMENTATION_WITH_PROPS ("extent", extent,
2931 mark_extent, 2932 mark_extent,