mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-07 07:28:26 +02:00
* extra "addr" parameters for get_caller_addr/frame (patch by
Jeppe Johansen, mantis #22727) git-svn-id: trunk@22252 -
This commit is contained in:
parent
a080669771
commit
2dbe48a76c
@ -84,7 +84,7 @@ end;
|
||||
}
|
||||
|
||||
{$define FPC_SYSTEM_HAS_GET_CALLER_ADDR}
|
||||
function get_caller_addr(framebp:pointer):pointer;assembler;
|
||||
function get_caller_addr(framebp:pointer;addr:pointer=nil):pointer;assembler;
|
||||
asm
|
||||
movs r0,r0
|
||||
beq .Lg_a_null
|
||||
@ -94,7 +94,7 @@ end;
|
||||
|
||||
|
||||
{$define FPC_SYSTEM_HAS_GET_CALLER_FRAME}
|
||||
function get_caller_frame(framebp:pointer):pointer;assembler;
|
||||
function get_caller_frame(framebp:pointer;addr:pointer=nil):pointer;assembler;
|
||||
asm
|
||||
movs r0,r0
|
||||
beq .Lgnf_null
|
||||
|
Loading…
Reference in New Issue
Block a user