Mercurial > hg > xemacs-beta
comparison src/rangetab.h @ 5133:444a448b2f53
Merge branch ben-lisp-object into default branch
author | Ben Wing <ben@xemacs.org> |
---|---|
date | Sun, 07 Mar 2010 06:47:37 -0600 |
parents | a9c41067dd88 |
children | cf900a2f1fa3 |
comparison
equal
deleted
inserted
replaced
5113:b2dcf6a6d8ab | 5133:444a448b2f53 |
---|---|
47 RANGE_START_OPEN_END_OPEN | 47 RANGE_START_OPEN_END_OPEN |
48 }; | 48 }; |
49 | 49 |
50 struct Lisp_Range_Table | 50 struct Lisp_Range_Table |
51 { | 51 { |
52 struct LCRECORD_HEADER header; | 52 NORMAL_LISP_OBJECT_HEADER header; |
53 range_table_entry_dynarr *entries; | 53 range_table_entry_dynarr *entries; |
54 enum range_table_type type; | 54 enum range_table_type type; |
55 }; | 55 }; |
56 typedef struct Lisp_Range_Table Lisp_Range_Table; | 56 typedef struct Lisp_Range_Table Lisp_Range_Table; |
57 | 57 |
58 DECLARE_LRECORD (range_table, Lisp_Range_Table); | 58 DECLARE_LISP_OBJECT (range_table, Lisp_Range_Table); |
59 #define XRANGE_TABLE(x) XRECORD (x, range_table, Lisp_Range_Table) | 59 #define XRANGE_TABLE(x) XRECORD (x, range_table, Lisp_Range_Table) |
60 #define wrap_range_table(p) wrap_record (p, range_table) | 60 #define wrap_range_table(p) wrap_record (p, range_table) |
61 #define RANGE_TABLEP(x) RECORDP (x, range_table) | 61 #define RANGE_TABLEP(x) RECORDP (x, range_table) |
62 #define CHECK_RANGE_TABLE(x) CHECK_RECORD (x, range_table) | 62 #define CHECK_RANGE_TABLE(x) CHECK_RECORD (x, range_table) |
63 | 63 |