Mercurial > hg > xemacs-beta

comparison src/tooltalk.c @ 5118:e0db3c197671 ben-lisp-object

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
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 3742ea8250b5
children d1247f3cc363
comparison
equal deleted inserted replaced
5117:3742ea8250b5 5118:e0db3c197671
177 177
178 write_fmt_string (printcharfun, "#<tooltalk_message id:0x%lx 0x%x>", 178 write_fmt_string (printcharfun, "#<tooltalk_message id:0x%lx 0x%x>",
179 (long) (p->m), p->header.uid); 179 (long) (p->m), p->header.uid);
180 } 180 }
181 181
182 DEFINE_NONDUMPABLE_LISP_OBJECT ("tooltalk-message", tooltalk_message, 182 DEFINE_NODUMP_LISP_OBJECT ("tooltalk-message", tooltalk_message,
183 mark_tooltalk_message, print_tooltalk_message, 183 mark_tooltalk_message, print_tooltalk_message,
184 0, 0, 0, 184 0, 0, 0,
185 tooltalk_message_description, 185 tooltalk_message_description,
186 Lisp_Tooltalk_Message); 186 Lisp_Tooltalk_Message);
187 187
253 253
254 write_fmt_string (printcharfun, "#<tooltalk_pattern id:0x%lx 0x%x>", 254 write_fmt_string (printcharfun, "#<tooltalk_pattern id:0x%lx 0x%x>",
255 (long) (p->p), p->header.uid); 255 (long) (p->p), p->header.uid);
256 } 256 }
257 257
258 DEFINE_NONDUMPABLE_LISP_OBJECT ("tooltalk-pattern", tooltalk_pattern, 258 DEFINE_NODUMP_LISP_OBJECT ("tooltalk-pattern", tooltalk_pattern,
259 mark_tooltalk_pattern, print_tooltalk_pattern, 259 mark_tooltalk_pattern, print_tooltalk_pattern,
260 0, 0, 0, 260 0, 0, 0,
261 tooltalk_pattern_description, 261 tooltalk_pattern_description,
262 Lisp_Tooltalk_Pattern); 262 Lisp_Tooltalk_Pattern);
263 263