From 4014c0f4fdc4f725fc3891b7aa35040c8cb7cb36 Mon Sep 17 00:00:00 2001 From: martin Date: Thu, 10 Jan 2019 12:29:18 +0000 Subject: [PATCH] Debugger: fix compile after r60049 #52e85d555e "keep register-names in register window, while debugger is running" Issue #0034844 git-svn-id: trunk@60052 - --- debugger/registersdlg.pp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/debugger/registersdlg.pp b/debugger/registersdlg.pp index 2f6f5c7ad9..5896e60a4d 100644 --- a/debugger/registersdlg.pp +++ b/debugger/registersdlg.pp @@ -397,7 +397,7 @@ begin Reg := GetCurrentRegisters; if (Reg = nil) or (reg.DataValidity<> ddsValid) then begin - if (DebugBoss.Debugger = nil) or not (DebugBoss.State in [dsPause, dsInternalPause, dsRun]) then + if (DebugBoss = nil) or not (DebugBoss.State in [dsPause, dsInternalPause, dsRun]) then lvRegisters.Items.Clear; if (reg <> nil) then