update.
[chise/xemacs-chise.git-] / src / debug.h
1 /* Debugging aids -- togglable assertions.
2    Copyright (C) 1994 Free Software Foundation, Inc.
3
4 This file is part of XEmacs.
5
6 XEmacs is free software; you can redistribute it and/or modify it
7 under the terms of the GNU General Public License as published by the
8 Free Software Foundation; either version 2, or (at your option) any
9 later version.
10
11 XEmacs is distributed in the hope that it will be useful, but WITHOUT
12 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
13 FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
14 for more details.
15
16 You should have received a copy of the GNU General Public License
17 along with XEmacs; see the file COPYING.  If not, write to
18 the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
19 Boston, MA 02111-1307, USA.  */
20
21 /* Synched up with: Not in FSF. */
22
23 /* Written by Chuck Thompson */
24
25 #ifndef INCLUDED_debug_h_
26 #define INCLUDED_debug_h_
27
28 #define DEBUG_STDERR    1
29 #define DEBUG_ABORT     2
30
31 #ifdef DEBUG_XEMACS
32
33 #include <stdio.h>
34
35 struct debug_classes
36 {
37   unsigned int redisplay :1;
38   unsigned int buffers :1;
39   unsigned int extents :1;
40   unsigned int faces :1;
41   unsigned int windows :1;
42   unsigned int frames :1;
43   unsigned int devices :1;
44   unsigned int byte_code :1;
45
46   unsigned int types_of_redisplay;
47   unsigned int types_of_buffers;
48   unsigned int types_of_extents;
49   unsigned int types_of_faces;
50   unsigned int types_of_windows;
51   unsigned int types_of_frames;
52   unsigned int types_of_devices;
53   unsigned int types_of_byte_code;
54 };
55
56 extern struct debug_classes active_debug_classes;
57
58 #define DASSERT(class, desired_type, action, assertion) do              \
59 {                                                                       \
60   if (active_debug_classes.##class                                      \
61       && (active_debug_classes.types_of_##class & desired_type))        \
62     {                                                                   \
63       if (! (assertion))                                                \
64         {                                                               \
65           if (action == DEBUG_STDERR)                                   \
66             stderr_out ("Assertion failed in %s at line %d\n",          \
67                         __FILE__, __LINE__);                            \
68           else                                                          \
69             abort ();                                                   \
70         }                                                               \
71     }                                                                   \
72 } while (0)
73 #else /* !DEBUG_XEMACS */
74
75 #define DASSERT(class, desired_type, action, assertion) ((void) 0)
76
77 #endif /* !DEBUG_XEMACS */
78
79 #endif /* INCLUDED_debug_h_ */