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