From a768c06283f4f92177fbeea7c1da0dcb83a165f1 Mon Sep 17 00:00:00 2001
From: Leo C
Date: Thu, 29 Nov 2018 20:16:37 +0100
Subject: bp_get_condition: eliminate expr_p2

---
 ddt180.z80 | 15 +++++++--------
 1 file changed, 7 insertions(+), 8 deletions(-)

diff --git a/ddt180.z80 b/ddt180.z80
index e624c8b..b7503fa 100644
--- a/ddt180.z80
+++ b/ddt180.z80
@@ -1780,20 +1780,19 @@ bp_get_condition:
 	ld de,expr_bufe
 	call cp_hl_de
 	jr nc,error12
-	pop hl
-	ld (expr_p2),hl
-	pop de
-	ex de,hl
+	pop	de
+	pop	hl
+	push	de
 	ldir
-	xor a
-	ld (de),a
-	inc de
 	ex de,hl
+	ld (hl),c		; trailing 0
+	inc hl
 	ld (expr_p1),hl
-	ld hl,(expr_p2)
+	pop	hl
 	ret
 
 ;-------------------------------------------------------------------------------
+; Breakpoint handling routine.
 
 bpddtz:
 	ld (reg.l),hl
-- 
cgit v1.2.3