Book a Demo!
CoCalc Logo Icon
StoreFeaturesDocsShareSupportNewsAboutPoliciesSign UpSign In
att
GitHub Repository: att/ast
Path: blob/master/src/lib/libtksh/include/debug.h
1810 views
1
#ifdef DEBUG
2
#if 0
3
extern Interp *__Tksh_Interp;
4
extern int __Tksh_DebugOn;
5
# define dprintf(x) while (__Tksh_DebugOn) { fprintf(stderr, \
6
"[%d]%s:%d: ", __Tksh_Interp ? \
7
__Tksh_Interp->interpType : -1, \
8
__FILE__, __LINE__); fprintf x; break; }
9
# define dprintf2(x) if (__Tksh_DebugOn == 2) dprintf(x)
10
#else
11
extern int __dprintfOK(char *, int, int);
12
extern void __dprintf();
13
extern int __dprintfLevel(void);
14
extern void __dprintfArgs(char *string, int argc, char *argv[]);
15
extern void __dprintfNum(char *, int, char *);
16
extern void __dprintfInterp();
17
# define dprintf(x) do { if (__dprintfOK(__FILE__, __LINE__, 1)) \
18
__dprintf x ; } while(0)
19
# define dprintf2(x) do { if (__dprintfOK(__FILE__, __LINE__, 2)) \
20
__dprintf x ; } while(0)
21
# define dprintfArgs(s,c,v) do { if (__dprintfOK(__FILE__,__LINE__,1))\
22
__dprintfArgs(s,c,v); } while(0)
23
# define dprintfNum(b,n,a) do { if (__dprintfOK(__FILE__,__LINE__,1))\
24
__dprintfNum(b,n,a); } while(0)
25
# define dprintfInterp(i) __dprintfInterp(i)
26
# define debugon() (__dprintfLevel())
27
#endif
28
#else
29
# define dprintf(x)
30
# define dprintf2(x)
31
# define dprintfArgs(s,c,v)
32
# define dprintfNum(b,n,a)
33
# define dprintfInterp(i)
34
#endif
35
36