X-Git-Url: http://wien.tomnetworks.com/gitweb/?a=blobdiff_plain;f=debug.h;h=4277648767aa7e39d57576b5deb17bcbe374277f;hb=d3f63d65d80aaab4ad8eac43ee1caea7dea09fbd;hp=58fbf3b563da5ed97c5471030e7e928536dadf90;hpb=8d1996a73234eed84ba68dae7ef09b4faec2a7ea;p=mate.git diff --git a/debug.h b/debug.h index 58fbf3b..4277648 100644 --- a/debug.h +++ b/debug.h @@ -3,12 +3,16 @@ * DBG_MP ..... MethodPool.hs * DBG_CP ..... ClassPool.hs * DBG_STR .... Strings.hs - * // no printf_* defined + * // no printf* defined * DBG_TRAP ... show information @ trap.c * DBG_CLASS .. dump classfile */ /* ooops defines */ +#ifdef BG_ALL +#define DBG_ALL +#endif + #ifdef BG_JIT #define DBG_JIT #endif @@ -41,32 +45,44 @@ * libraries like Text.Printf * needed for gettting proper `-Wall' output on a release build */ -#if defined(DBG_JIT) || defined(DBG_BB) || defined(DBG_MP) || defined(DBG_CP) || defined(DBG_STR) +#if defined(DBG_ALL) || defined(DBG_JIT) || defined(DBG_BB) || defined(DBG_MP) || defined(DBG_CP) || defined(DBG_STR) #define DEBUG #endif +#if defined(DBG_ALL) +#define DBG_JIT +#define DBG_BB +#define DBG_MP +#define DBG_CP +#define DBG_STR +#define DBG_TRAP +#if 0 +#define DBG_CLASS +#endif +#endif + /* it would be awesome if we could just write - * > printf_fake = printf + * > printfFake = printf * here, but the type can't be infered, since `PrintfType' * isn't visible (at least this is my explanation :/). * if I'm wrong, move this to `Mate/Debug.hs' */ #ifdef DBG_JIT -#define printf_jit printf +#define printfJit printf #endif #ifdef DBG_BB -#define printf_bb printf +#define printfBb printf #endif #ifdef DBG_MP -#define printf_mp printf +#define printfMp printf #endif #ifdef DBG_CP -#define printf_cp printf +#define printfCp printf #endif #ifdef DBG_STR -#define printf_str printf +#define printfStr printf #endif