--- M6502/config.h 2007/07/31 08:49:22 41 +++ M6502/config.h 2007/08/01 22:25:37 86 @@ -2,11 +2,30 @@ 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 +void push_R(void); +void pull_R(void); + +#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 +