From c021527f220ac99c883f931dd806bd4b9d756f3a Mon Sep 17 00:00:00 2001
From: joost <joost@lazarus-ide.org>
Date: Sat, 12 Jul 2014 21:36:50 +0000
Subject: [PATCH] FpDebugger (pure): Pass the right mode to the dissasembler
 when cross-debugging

git-svn-id: trunk@45849 -
---
 components/lazdebuggers/lazdebuggerfp/fpdebugdebugger.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/components/lazdebuggers/lazdebuggerfp/fpdebugdebugger.pas b/components/lazdebuggers/lazdebuggerfp/fpdebugdebugger.pas
index 3178532118..026ad6d3bf 100644
--- a/components/lazdebuggers/lazdebuggerfp/fpdebugdebugger.pas
+++ b/components/lazdebuggers/lazdebuggerfp/fpdebugdebugger.pas
@@ -624,7 +624,7 @@ begin
     else
       begin
       p := @CodeBin;
-      FpDbgDisasX86.Disassemble(p, GMode=dm64, ADump, AStatement);
+      FpDbgDisasX86.Disassemble(p, TFpDebugDebugger(Debugger).FDbgController.CurrentProcess.Mode=dm64, ADump, AStatement);
 
       Sym := TFpDebugDebugger(Debugger).FDbgController.CurrentProcess.FindSymbol(AnAddr);