Mercurial > hg > xemacs-beta
comparison src/tooltalk.h @ 412:697ef44129c6 r21-2-14
Import from CVS: tag r21-2-14
author | cvs |
---|---|
date | Mon, 13 Aug 2007 11:20:41 +0200 |
parents | b8cc9ab3f761 |
children | 11054d720c21 |
comparison
equal
deleted
inserted
replaced
411:12e008d41344 | 412:697ef44129c6 |
---|---|
20 | 20 |
21 */ | 21 */ |
22 | 22 |
23 /* Synched up with: Not in FSF. */ | 23 /* Synched up with: Not in FSF. */ |
24 | 24 |
25 #ifndef INCLUDED_tooltalk_h_ | 25 #ifndef _XEMACS_TOOLTALK_H_ |
26 #define INCLUDED_tooltalk_h_ | 26 #define _XEMACS_TOOLTALK_H_ |
27 #include TT_C_H_FILE | 27 #include TT_C_H_PATH |
28 | 28 |
29 typedef struct Lisp_Tooltalk_Message Lisp_Tooltalk_Message; | 29 struct Lisp_Tooltalk_Message; |
30 DECLARE_LRECORD (tooltalk_message, Lisp_Tooltalk_Message); | 30 DECLARE_LRECORD (tooltalk_message, struct Lisp_Tooltalk_Message); |
31 #define XTOOLTALK_MESSAGE(x) XRECORD (x, tooltalk_message, Lisp_Tooltalk_Message) | 31 #define XTOOLTALK_MESSAGE(x) XRECORD (x, tooltalk_message, struct Lisp_Tooltalk_Message) |
32 #define XSETTOOLTALK_MESSAGE(x, p) XSETRECORD (x, p, tooltalk_message) | 32 #define XSETTOOLTALK_MESSAGE(x, p) XSETRECORD (x, p, tooltalk_message) |
33 #define TOOLTALK_MESSAGEP(x) RECORDP (x, tooltalk_message) | 33 #define TOOLTALK_MESSAGEP(x) RECORDP (x, tooltalk_message) |
34 #define GC_TOOLTALK_MESSAGEP(x) GC_RECORDP (x, tooltalk_message) | |
34 #define CHECK_TOOLTALK_MESSAGE(x) CHECK_RECORD (x, tooltalk_message) | 35 #define CHECK_TOOLTALK_MESSAGE(x) CHECK_RECORD (x, tooltalk_message) |
35 | 36 |
36 typedef struct Lisp_Tooltalk_Pattern Lisp_Tooltalk_Pattern; | 37 struct Lisp_Tooltalk_Pattern; |
37 DECLARE_LRECORD (tooltalk_pattern, Lisp_Tooltalk_Pattern); | 38 DECLARE_LRECORD (tooltalk_pattern, struct Lisp_Tooltalk_Pattern); |
38 #define XTOOLTALK_PATTERN(x) XRECORD (x, tooltalk_pattern, Lisp_Tooltalk_Pattern) | 39 #define XTOOLTALK_PATTERN(x) XRECORD (x, tooltalk_pattern, struct Lisp_Tooltalk_Pattern) |
39 #define XSETTOOLTALK_PATTERN(x, p) XSETRECORD (x, p, tooltalk_pattern) | 40 #define XSETTOOLTALK_PATTERN(x, p) XSETRECORD (x, p, tooltalk_pattern) |
40 #define TOOLTALK_PATTERNP(x) RECORDP (x, tooltalk_pattern) | 41 #define TOOLTALK_PATTERNP(x) RECORDP (x, tooltalk_pattern) |
42 #define GC_TOOLTALK_PATTERNP(x) GC_RECORDP (x, tooltalk_pattern) | |
41 #define CHECK_TOOLTALK_PATTERN(x) CHECK_RECORD (x, tooltalk_pattern) | 43 #define CHECK_TOOLTALK_PATTERN(x) CHECK_RECORD (x, tooltalk_pattern) |
42 | 44 |
43 #define TOOLTALK_MESSAGE_KEY 100 | 45 #define TOOLTALK_MESSAGE_KEY 100 |
44 #define TOOLTALK_PATTERN_KEY 101 | 46 #define TOOLTALK_PATTERN_KEY 101 |
45 | 47 |
57 Lisp_Object box_tooltalk_message (Tt_message m); | 59 Lisp_Object box_tooltalk_message (Tt_message m); |
58 Tt_message unbox_tooltalk_message (Lisp_Object msg); | 60 Tt_message unbox_tooltalk_message (Lisp_Object msg); |
59 | 61 |
60 extern Lisp_Object Qtooltalk_error; | 62 extern Lisp_Object Qtooltalk_error; |
61 | 63 |
62 #endif /* INCLUDED_tooltalk_h_ */ | 64 #endif /* _XEMACS_TOOLTALK_H_ */ |