--- M6502/config.h 2007/07/31 11:14:19 50 +++ M6502/config.h 2007/08/01 21:40:17 82 @@ -2,11 +2,27 @@ EXTERN_C void xs_init (pTHX); // which module to bootstrap -#define EMU_START "use Arch;" +#define EMU_START "use blib; use Arch;" // do we want to dump our C debug? -//#define DEBUGF 1 +#define DEBUGF 1 // do we wont to dump registars? -//#define DUMP_R 1 +#define DUMP_R 1 + +#if DEBUGF +#define debugf(x) do { \ + PerlIO_stdoutf("#> "); \ + PerlIO_stdoutf x ; \ + PerlIO_stdoutf("\n"); \ +} while (0) +#else +#define debugf(x) +#endif + +#if 1 +#define dump_R printf("# PC: %04x A:%02x P:%02x X:%02x Y:%02x S:%02x\n", R->PC.W, R->A, R->P, R->X, R->Y, R->S ); +#else +#define dump_R +#endif