#ifdef Buggy

FILE *BuggyFile;
int   BuggyI;  // Loop index
char *BuggyPC;
char  BuggyVC; 
int  *BuggyPI;
int   BuggyVI; 
#define BuggyClear              BuggyFile = fopen(Buggy,"w"); fclose(BuggyFile);
#define BuggyMessage(Bla)       BuggyFile = fopen(Buggy,"a"); fprintf(BuggyFile,"%s\n",Bla); fclose(BuggyFile);
#define BuggyArgs(Bla)          BuggyFile = fopen(Buggy,"a"); fprintf(BuggyFile,"%s argv[*]: ",Bla); for (BuggyI=0;BuggyI<argc;BuggyI++) {fprintf(BuggyFile,"%s ",argv[BuggyI]);} fprintf(BuggyFile,"\n"); fclose(BuggyFile);
#define BuggyRegs(Bla,Num)      BuggyFile = fopen(Buggy,"a"); fprintf(BuggyFile,"%s SWIRegs.r[*]:\n",Bla); for (BuggyI=0;BuggyI<=Num;BuggyI++) {fprintf(BuggyFile,"   R%2d: %5d = 0x%08X\n",BuggyI,SWIRegs.r[BuggyI],SWIRegs.r[BuggyI]);} fclose(BuggyFile);
#define BuggyText(Bla,Var)      BuggyFile = fopen(Buggy,"a"); fprintf(BuggyFile,"%s %s: %s\n",Bla,#Var,Var); fclose(BuggyFile);
#define BuggyInt(Bla,Var)       BuggyFile = fopen(Buggy,"a"); fprintf(BuggyFile,"%s %s: %d = 0x%X\n",Bla,#Var,Var,Var); fclose(BuggyFile);
#define BuggyError(Bla)         BuggyFile = fopen(Buggy,"a"); fprintf(BuggyFile,"%s %d = 0x%X: %s\n",Bla,OSError->errnum,OSError->errnum,OSError->errmess); fclose(BuggyFile);
#define BuggyBuffC(Bla,Var,Num) BuggyFile = fopen(Buggy,"a"); fprintf(BuggyFile,"%s %s (0x%X %d):\n",Bla,#Var,(int)Var,Num); BuggyPC = (char*)Var; for (BuggyI=0;BuggyI<Num;BuggyI++) {BuggyVC = *BuggyPC++; fprintf(BuggyFile,"   %3d: %3d = 0x%02X = %c\n",BuggyI,BuggyVC,BuggyVC,BuggyVC);} fclose(BuggyFile);
#define BuggyBuffI(Bla,Var,Num) BuggyFile = fopen(Buggy,"a"); fprintf(BuggyFile,"%s %s (0x%X %d):\n",Bla,#Var,(int)Var,Num); BuggyPI = (int*)Var;  for (BuggyI=0;BuggyI<Num;BuggyI++) {BuggyVI = *BuggyPI++; fprintf(BuggyFile,"   %3d: %5d = 0x%08X\n",BuggyI,BuggyVI,BuggyVI);}              fclose(BuggyFile);
#else

#define BuggyClear
#define BuggyMessage(Bla)
#define BuggyArgs(Bla)
#define BuggySWIRegs(Bla,Num)  
#define BuggyText(Bla,Var)
#define BuggyInt(Bla,Var)
#define BuggyError(Bla)
#define BuggyBuffC(Bla,Var,Num)
#define BuggyBuffI(Bla,Var,Num)
#endif
