This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
regen_perly.pl: remove extraneous comments from bison 3.x
[perl5.git] / NetWare / deb.h
1
2 /*
3  * Copyright © 2001 Novell, Inc. All Rights Reserved.
4  *
5  * You may distribute under the terms of either the GNU General Public
6  * License or the Artistic License, as specified in the README file.
7  *
8  */
9
10 /*
11  * FILENAME             :       deb.h
12  * DESCRIPTION  :       Defines Breakpoint macro.
13  * Author               :       SGP
14  * Date                 :       January 2001.
15  *
16  */
17
18
19
20 #ifndef __Inc__deb___
21 #define __Inc__deb___
22
23
24 #include <nwconio.h>
25
26
27 #if defined(DEBUGON) && !defined(USE_D2)
28         //debug build and d1 flag is used, so enable IDB
29         #define DBGMESG ConsolePrintf
30         #define IDB(x)                                  \
31                                 ConsolePrintf(x);       \
32                                 _asm {int 3}
33 #else
34         #if defined(USE_D2)
35                 //debug build and d2 flag is used, so disable IDB
36                 #define DBGMESG ConsolePrintf
37                 #define IDB ConsolePrintf
38         #else
39                 //release build, so disable DBGMESG and IDB
40                 #define DBGMESG 
41                 #define IDB 
42         #endif  //if defined(USE_D2)
43 #endif  //if defined(DEBUGON) && !defined(USE_D2)
44
45
46 #endif  /*__Inc__deb___*/
47