Mercurial > hg > xemacs-beta
comparison src/tooltalk.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 | e38acbeb1cae |
children | 308d34e9f07d |
comparison
equal
deleted
inserted
replaced
5117:3742ea8250b5 | 5118:e0db3c197671 |
---|---|
25 #ifndef INCLUDED_tooltalk_h_ | 25 #ifndef INCLUDED_tooltalk_h_ |
26 #define INCLUDED_tooltalk_h_ | 26 #define INCLUDED_tooltalk_h_ |
27 #include TT_C_H_FILE | 27 #include TT_C_H_FILE |
28 | 28 |
29 typedef struct Lisp_Tooltalk_Message Lisp_Tooltalk_Message; | 29 typedef struct Lisp_Tooltalk_Message Lisp_Tooltalk_Message; |
30 DECLARE_LRECORD (tooltalk_message, Lisp_Tooltalk_Message); | 30 DECLARE_LISP_OBJECT (tooltalk_message, Lisp_Tooltalk_Message); |
31 #define XTOOLTALK_MESSAGE(x) XRECORD (x, tooltalk_message, Lisp_Tooltalk_Message) | 31 #define XTOOLTALK_MESSAGE(x) XRECORD (x, tooltalk_message, Lisp_Tooltalk_Message) |
32 #define wrap_tooltalk_message(p) wrap_record (p, tooltalk_message) | 32 #define wrap_tooltalk_message(p) wrap_record (p, tooltalk_message) |
33 #define TOOLTALK_MESSAGEP(x) RECORDP (x, tooltalk_message) | 33 #define TOOLTALK_MESSAGEP(x) RECORDP (x, tooltalk_message) |
34 #define CHECK_TOOLTALK_MESSAGE(x) CHECK_RECORD (x, tooltalk_message) | 34 #define CHECK_TOOLTALK_MESSAGE(x) CHECK_RECORD (x, tooltalk_message) |
35 | 35 |
36 typedef struct Lisp_Tooltalk_Pattern Lisp_Tooltalk_Pattern; | 36 typedef struct Lisp_Tooltalk_Pattern Lisp_Tooltalk_Pattern; |
37 DECLARE_LRECORD (tooltalk_pattern, Lisp_Tooltalk_Pattern); | 37 DECLARE_LISP_OBJECT (tooltalk_pattern, Lisp_Tooltalk_Pattern); |
38 #define XTOOLTALK_PATTERN(x) XRECORD (x, tooltalk_pattern, Lisp_Tooltalk_Pattern) | 38 #define XTOOLTALK_PATTERN(x) XRECORD (x, tooltalk_pattern, Lisp_Tooltalk_Pattern) |
39 #define wrap_tooltalk_pattern(p) wrap_record (p, tooltalk_pattern) | 39 #define wrap_tooltalk_pattern(p) wrap_record (p, tooltalk_pattern) |
40 #define TOOLTALK_PATTERNP(x) RECORDP (x, tooltalk_pattern) | 40 #define TOOLTALK_PATTERNP(x) RECORDP (x, tooltalk_pattern) |
41 #define CHECK_TOOLTALK_PATTERN(x) CHECK_RECORD (x, tooltalk_pattern) | 41 #define CHECK_TOOLTALK_PATTERN(x) CHECK_RECORD (x, tooltalk_pattern) |
42 | 42 |