From 4642d7c1790f3c26ad985ffecadb9011580e4416 Mon Sep 17 00:00:00 2001
From: martin <laz.git@mfriebe.de>
Date: Tue, 16 Nov 2010 15:26:45 +0000
Subject: [PATCH] DBg: Disassembler, don't request with outdated address

git-svn-id: trunk@28272 -
---
 debugger/assemblerdlg.pp | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/debugger/assemblerdlg.pp b/debugger/assemblerdlg.pp
index 4510ac8e6a..416244bb79 100644
--- a/debugger/assemblerdlg.pp
+++ b/debugger/assemblerdlg.pp
@@ -243,10 +243,11 @@ begin
   then begin
     // only for F9, not for F8,F7 single stepping with assembler is no good, if it clears all the time
     //ClearLineMap;
+    FLocation := 0;
   end
   else begin
     // Check if anything is there, update BaseAddr
-    if FDisassembler <> nil
+    if (FDisassembler <> nil) and (FLocation <> 0)
     then FDisassembler.PrepareRange(FLocation, Max(0, -(FTopLine - 5)), Max(0, FTopLine + FLineCount + 1 + 5));
     UpdateLineData;
   end;