From f72ec12c26c8618066de0c5deef5124a64d2031d Mon Sep 17 00:00:00 2001
From: joost <joost@lazarus-ide.org>
Date: Sun, 21 Jun 2015 15:42:16 +0000
Subject: [PATCH] DebuggerIntf: Set the RangeStartAddr when merging with an
 empty range

git-svn-id: trunk@49391 -
---
 components/debuggerintf/dbgintfdebuggerbase.pp | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/components/debuggerintf/dbgintfdebuggerbase.pp b/components/debuggerintf/dbgintfdebuggerbase.pp
index b4e075d2aa..c143dff99a 100644
--- a/components/debuggerintf/dbgintfdebuggerbase.pp
+++ b/components/debuggerintf/dbgintfdebuggerbase.pp
@@ -5073,6 +5073,8 @@ begin
     FCount := FCount + AnotherRange.Count - i;
     FRangeEndAddr := AnotherRange.FRangeEndAddr;
     FLastEntryEndAddr := AnotherRange.FLastEntryEndAddr;
+    if FRangeStartAddr = 0 then
+      FRangeStartAddr := AnotherRange.FRangeStartAddr;
   end;
   debugln(DBG_DISASSEMBLER, ['INFO: TDBGDisassemblerEntryRange.Merge AFTER MERGE: ', dbgs(self) ]);
 end;