From ddc9a46f1b87d72b4657b3e3859a5dd171f56472 Mon Sep 17 00:00:00 2001 From: martin Date: Sun, 14 Nov 2010 23:51:59 +0000 Subject: [PATCH] debugger: disassembler, fix display of top line git-svn-id: trunk@28235 - --- debugger/assemblerdlg.pp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/debugger/assemblerdlg.pp b/debugger/assemblerdlg.pp index 4a86a1fbeb..8cc76dd0b7 100644 --- a/debugger/assemblerdlg.pp +++ b/debugger/assemblerdlg.pp @@ -569,7 +569,7 @@ begin end else if (Line = 0) // but it's not LineIsSrc - and ( ( (Itm^.SrcFileName <> '') and (Itm^.SrcStatementIndex <> Itm^.SrcStatementCount) ) + and ( ( (Itm^.SrcFileName <> '') and (Itm^.SrcStatementIndex <> Itm^.SrcStatementCount-1) ) or ( (Itm^.SrcFileName = '') and (Itm^.FuncName <> '') and (NextItm <> nil) and (Itm^.Offset < NextItm^.Offset) ) ) then begin