From a32ac8e665c437da4eb2a7d1cde295aff6a2bc1b Mon Sep 17 00:00:00 2001 From: joost Date: Mon, 28 Dec 2020 21:33:51 +0000 Subject: [PATCH] FpDebug: support more function-arguments (x86_64) git-svn-id: trunk@64295 - --- components/fpdebug/fpdbglinuxclasses.pas | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/components/fpdebug/fpdbglinuxclasses.pas b/components/fpdebug/fpdbglinuxclasses.pas index a017f73a2a..5f4b3f8286 100644 --- a/components/fpdebug/fpdbglinuxclasses.pas +++ b/components/fpdebug/fpdbglinuxclasses.pas @@ -1026,11 +1026,18 @@ begin 0: Result := RegisterLoc(0); // EAX 1: Result := RegisterLoc(2); // EDX 2: Result := RegisterLoc(1); // ECX + else + Result := UnInitializedLoc; end; dm64: case AParamIdx of 0: Result := RegisterLoc(5); // RDI 1: Result := RegisterLoc(4); // RSI 2: Result := RegisterLoc(1); // RDX + 3: Result := RegisterLoc(2); // RCX + 4: Result := RegisterLoc(8); // R8 + 5: Result := RegisterLoc(9); // R9 + else + Result := UnInitializedLoc; end; end; end;