瀏覽代碼

powerpc: enable SUPPORT_GET_FRAME

git-svn-id: trunk@36698 -
Károly Balogh 8 年之前
父節點
當前提交
0b561b6c8f
共有 2 個文件被更改,包括 3 次插入0 次删除
  1. 1 0
      compiler/fpcdefs.inc
  2. 2 0
      rtl/powerpc/powerpc.inc

+ 1 - 0
compiler/fpcdefs.inc

@@ -137,6 +137,7 @@
   {$define cpumm}
   {$define cpurox}
   {$define cpurefshaveindexreg}
+  {$define SUPPORT_GET_FRAME}
 {$endif powerpc}
 
 {$ifdef powerpc64}

+ 2 - 0
rtl/powerpc/powerpc.inc

@@ -1047,12 +1047,14 @@ function fpc_pchar_length(p:pchar):sizeint;assembler;[public,alias:'FPC_PCHAR_LE
 {$endif FPC_SYSTEM_HAS_FPC_PCHAR_LENGTH}
 
 
+{$ifndef INTERNAL_BACKTRACE}
 {$define FPC_SYSTEM_HAS_GET_FRAME}
 function get_frame:pointer;assembler;{$ifdef SYSTEMINLINE}inline;{$endif} nostackframe;
 asm
   { all abi's I know use r1 as stack pointer }
   mr r3, r1
 end;
+{$endif INTERNAL_BACKTRACE}
 
 {NOTE: On MACOS, 68000 code might call powerpc code, through the MixedMode manager,
 (even in the OS in system 9). The pointer to the switching stack frame is then