Mercurial > hg > xemacs-beta
comparison src/casetab.h @ 5118:e0db3c197671 ben-lisp-object
merge up to latest default branch, doesn't compile yet
author | Ben Wing <ben@xemacs.org> |
---|---|
date | Sat, 26 Dec 2009 21:18:49 -0600 |
parents | 1e7cc382eb16 |
children | d1247f3cc363 |
comparison
equal
deleted
inserted
replaced
5117:3742ea8250b5 | 5118:e0db3c197671 |
---|---|
32 Lisp_Object case_eqv_table; | 32 Lisp_Object case_eqv_table; |
33 int dirty; | 33 int dirty; |
34 }; | 34 }; |
35 typedef struct Lisp_Case_Table Lisp_Case_Table; | 35 typedef struct Lisp_Case_Table Lisp_Case_Table; |
36 | 36 |
37 DECLARE_LRECORD (case_table, Lisp_Case_Table); | 37 DECLARE_LISP_OBJECT (case_table, Lisp_Case_Table); |
38 #define XCASE_TABLE(x) XRECORD (x, case_table, Lisp_Case_Table) | 38 #define XCASE_TABLE(x) XRECORD (x, case_table, Lisp_Case_Table) |
39 #define wrap_case_table(p) wrap_record (p, case_table) | 39 #define wrap_case_table(p) wrap_record (p, case_table) |
40 #define CASE_TABLEP(x) RECORDP (x, case_table) | 40 #define CASE_TABLEP(x) RECORDP (x, case_table) |
41 #define CHECK_CASE_TABLE(x) CHECK_RECORD (x, case_table) | 41 #define CHECK_CASE_TABLE(x) CHECK_RECORD (x, case_table) |
42 #define CONCHECK_CASE_TABLE(x) CONCHECK_RECORD (x, case_table) | 42 #define CONCHECK_CASE_TABLE(x) CONCHECK_RECORD (x, case_table) |