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_ */