X-Git-Url: https://notaz.gp2x.de/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=cpu%2FDrZ80%2Fdrz80.s;h=16f09afb7b09443f274259f631f5a0d907d48965;hb=0ffa8947eece7f3e4f568aeb6b8c51a135c605e8;hp=eba8b955ee9b0ba05ebec1366f946995d2eb2b8f;hpb=e5f426aa2e86d56357b8af2795e73cc0c9b17e8f;p=picodrive.git diff --git a/cpu/DrZ80/drz80.s b/cpu/DrZ80/drz80.s index eba8b95..16f09af 100644 --- a/cpu/DrZ80/drz80.s +++ b/cpu/DrZ80/drz80.s @@ -111,40 +111,37 @@ DrZ80Ver: .long 0x0001 .if DRZ80_FOR_PICODRIVE .macro YM2612Read_and_ret8 - stmfd sp!,{r3,r12,lr} + stmfd sp!,{r3,r12,lr} .if EXTERNAL_YM2612 ldr r1,=PicoOpt ldr r1,[r1] tst r1,#0x200 - bne 10f - bl YM2612Read_ - ldmfd sp!,{r3,r12,pc} -10: - bl YM2612Read_940 + ldrne r2, =YM2612Read_940 + ldreq r2, =YM2612Read_ + mov lr,pc + bx r2 .else bl YM2612Read_ .endif - ldmfd sp!,{r3,r12,pc} + ldmfd sp!,{r3,r12,pc} .endm .macro YM2612Read_and_ret16 - stmfd sp!,{r3,r12,lr} + stmfd sp!,{r3,r12,lr} .if EXTERNAL_YM2612 ldr r0,=PicoOpt ldr r0,[r0] tst r0,#0x200 - bne 10f - bl YM2612Read_ - orr r0,r0,r0,lsl #8 - ldmfd sp!,{r3,r12,pc} -10: - bl YM2612Read_940 + ldrne r2, =YM2612Read_940 + ldreq r2, =YM2612Read_ + mov lr,pc + bx r2 orr r0,r0,r0,lsl #8 .else bl YM2612Read_ orr r0,r0,r0,lsl #8 .endif - ldmfd sp!,{r3,r12,pc} + ldmfd sp!,{r3,r12,pc} .endm pico_z80_read8: @ addr @@ -173,7 +170,7 @@ pico_z80_read8: @ addr cmp r1,#2 @ YM2612 (0x4000-0x5fff) bne 0f and r0,r0,#3 - YM2612Read_and_ret8 + YM2612Read_and_ret8 0: cmp r0,#0x4000 movge r0,#0xff @@ -6672,11 +6669,14 @@ opcode_DD_NF: ;@ mov r0,#0xFD00 ;@ orr r0,r0,r1 ;@ b end_loop + opcode_DD_NF2: - mov r0,#0xDD0000 - orr r0,r0,#0xCB00 - orr r0,r0,r1 - b end_loop + fetch 15 +;@ notaz: we don't want to deadlock here +;@ mov r0,#0xDD0000 +;@ orr r0,r0,#0xCB00 +;@ orr r0,r0,r1 +;@ b end_loop ;@ADD IX,BC opcode_DD_09: @@ -8071,8 +8071,8 @@ opcode_ED_BB: ;@from the DD location but the address of the IY reg is passed instead ;@of IX -end_loop: - b end_loop +;@end_loop: +;@ b end_loop