summaryrefslogtreecommitdiff
path: root/rtl/arm
diff options
context:
space:
mode:
authoryury <yury@3ad0048d-3df7-0310-abae-a5850022a9f2>2007-01-13 15:23:51 +0000
committeryury <yury@3ad0048d-3df7-0310-abae-a5850022a9f2>2007-01-13 15:23:51 +0000
commit157980db850cc2c9d3c11701b050be3d240cea84 (patch)
tree8fbc84d8f5633c6b4873fac9a3353e8915b833d9 /rtl/arm
parent66fae3913e0b4ba991bd41867cc84c50e59db998 (diff)
downloadfpc-157980db850cc2c9d3c11701b050be3d240cea84.tar.gz
* activated internal get_frame for ARM.
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@5945 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'rtl/arm')
-rw-r--r--rtl/arm/arm.inc3
1 files changed, 2 insertions, 1 deletions
diff --git a/rtl/arm/arm.inc b/rtl/arm/arm.inc
index 41c4ee4c30..f049bb4507 100644
--- a/rtl/arm/arm.inc
+++ b/rtl/arm/arm.inc
@@ -33,12 +33,13 @@ end;
stack frame related stuff
****************************************************************************}
+{$IFNDEF INTERNAL_BACKTRACE}
{$define FPC_SYSTEM_HAS_GET_FRAME}
function get_frame:pointer;assembler;nostackframe;{$ifdef SYSTEMINLINE}inline;{$endif}
asm
mov r0,r11
end ['R0'];
-
+{$ENDIF not INTERNAL_BACKTRACE}
{$define FPC_SYSTEM_HAS_GET_CALLER_ADDR}
function get_caller_addr(framebp:pointer):pointer;assembler;{$ifdef SYSTEMINLINE}inline;{$endif}