Mercurial > hg > xemacs-beta
comparison src/debug.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 | 74fd4e045ea6 |
children | 11054d720c21 |
comparison
equal
deleted
inserted
replaced
411:12e008d41344 | 412:697ef44129c6 |
---|---|
20 | 20 |
21 /* Synched up with: Not in FSF. */ | 21 /* Synched up with: Not in FSF. */ |
22 | 22 |
23 /* Written by Chuck Thompson */ | 23 /* Written by Chuck Thompson */ |
24 | 24 |
25 #ifndef INCLUDED_debug_h_ | 25 #ifndef _XEMACS_DEBUG_H_ |
26 #define INCLUDED_debug_h_ | 26 #define _XEMACS_DEBUG_H_ |
27 | 27 |
28 #define DEBUG_STDERR 1 | 28 #define DEBUG_STDERR 1 |
29 #define DEBUG_ABORT 2 | 29 #define DEBUG_ABORT 2 |
30 | 30 |
31 #ifdef DEBUG_XEMACS | 31 #ifdef DEBUG_XEMACS |
51 unsigned int types_of_frames; | 51 unsigned int types_of_frames; |
52 unsigned int types_of_devices; | 52 unsigned int types_of_devices; |
53 unsigned int types_of_byte_code; | 53 unsigned int types_of_byte_code; |
54 }; | 54 }; |
55 | 55 |
56 extern Lisp_Object Qbuffers, Qdevices, Qfaces, Qframes, Qredisplay, Qwindows; | |
57 | |
56 extern struct debug_classes active_debug_classes; | 58 extern struct debug_classes active_debug_classes; |
57 | 59 |
58 #define DASSERT(class, desired_type, action, assertion) do \ | 60 #define DASSERT(class, desired_type, action, assertion) do \ |
59 { \ | 61 { \ |
60 if (active_debug_classes.##class \ | 62 if (active_debug_classes.##class \ |
74 | 76 |
75 #define DASSERT(class, desired_type, action, assertion) ((void) 0) | 77 #define DASSERT(class, desired_type, action, assertion) ((void) 0) |
76 | 78 |
77 #endif /* !DEBUG_XEMACS */ | 79 #endif /* !DEBUG_XEMACS */ |
78 | 80 |
79 #endif /* INCLUDED_debug_h_ */ | 81 #endif /* _XEMACS_DEBUG_H_ */ |