--- M6502/perl.c 2007/07/30 21:53:04 35 +++ M6502/perl.c 2007/07/30 22:06:13 36 @@ -31,6 +31,7 @@ R->PC.W = atoi( SvPV_nolen( get_sv("M6502::PC", FALSE) ) ); R->IPeriod = atoi( SvPV_nolen( get_sv("M6502::IPeriod", FALSE) ) ); // ICount IRequest IAutoReset TrapBadOps Trap Trace + printf("update_r finished\n"); dump_R; } @@ -91,8 +92,7 @@ byte Op6502(register word Addr) { byte Op; Op = mem(Addr); - debugf(("Op6502(%04x,%02x)\n", Addr, Op)); - dump_R; + debugf(("Op6502(%04x,%02x) PC:%04x\n", Addr, Op, R->PC.W)); } /** Loop6502() ***********************************************/