summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--ddt180.z8024
1 files changed, 5 insertions, 19 deletions
diff --git a/ddt180.z80 b/ddt180.z80
index 937faa6..00b4220 100644
--- a/ddt180.z80
+++ b/ddt180.z80
@@ -82,14 +82,14 @@ cmde_clr:
; Determine current position
reloc:
- ld bc,(028h-2)
- ld de,(028h)
ld a,i ;get iff2
ex af,af'
di
- ld sp,028h ;rst instr needs a minimal stack
+ ld sp,028h-2 ;rst instr needs a minimal stack
+ pop bc ;save 026h,027h
+ pop de ;save 028h,029h
ld hl,0e9e1h ;opcpdes pop hl/jp (hl)
- ld (028h),hl
+ push hl
rst 028h
wearehere:
ld (028h-2),bc
@@ -1662,8 +1662,6 @@ cmde_bottom:
; Go [to start] [with temporary breakpoints]
cmd_G:
- sub a
- ld (bp_p_cpu_flag),a
call expr
jr c,l0740h
ld (reg.pc),hl
@@ -1878,8 +1876,6 @@ l090bh:
sub_0913h:
ld a,080h
ex af,af'
- sub a
- ld (bp_p_cpu_flag),a
call bpl_init
ld a,(ix+000h)
@@ -1979,9 +1975,6 @@ l0a1dh:
user_go:
sub a
ld (b_21e2_start),a
- ld a,(bp_p_cpu_flag)
- and a
- call nz,p_cpustat
call bp_tst_@pc
ld c,007h
jr nz,l0a41h
@@ -3975,8 +3968,6 @@ cmd_T:
ld hl,1 ;default: 1 step
call get_lastarg_def
ld (trace_cnt_or_ptr),hl
- sub a
- ld (bp_p_cpu_flag),a
call tc_set_bp
jr user_go1
@@ -3991,8 +3982,7 @@ l2151h:
call tc_set_bp
jp nc,do_break
- sbc a,a
- ld (bp_p_cpu_flag),a
+ call p_cpustat
user_go1:
jp user_go
@@ -4007,10 +3997,6 @@ b_21e2_start:
db 0
trace_cnt_or_ptr:
dw 0
-
-bp_p_cpu_flag:
- db 0
-
bp_tab:
rept BP_CNT
rept BP_SIZE