paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-21 15:49:26 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixed powerpc compilation after r13760

Browse Source 
git-svn-id: trunk@13761 -
This commit is contained in:
Jonas Maebe 2009-09-27 14:01:41 +00:00
parent ec8fee45fe
commit 6c78ac9a78
2 changed files with 8 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
compiler/powerpc/agppcvasm.pas
View File

@ -66,13 +66,13 @@ unit agppcvasm;
{$ifdef cpu64bitaddr}
const
refaddr2str: array[trefaddr] of string[9] = ('', '', '', '@l', '@h', '@higher', '@highest', '@ha', '@highera', '@highesta');
refaddr2str: array[trefaddr] of string[9] = ('', '', '', '', '@l', '@h', '@higher', '@highest', '@ha', '@highera', '@highesta');
verbose_refaddrs = [addr_low, addr_high, addr_higher, addr_highest, addr_higha, addr_highera, addr_highesta];
refaddr2str_darwin: array[trefaddr] of string[4] = ('','','','lo16', 'hi16', '@err', '@err', 'ha16', '@err', '@err');
refaddr2str_darwin: array[trefaddr] of string[4] = ('','','','','lo16', 'hi16', '@err', '@err', 'ha16', '@err', '@err');
{$else cpu64bitaddr}
const
refaddr2str: array[trefaddr] of string[3] = ('','','','@l','@h','@ha');
refaddr2str_darwin: array[trefaddr] of string[4] = ('','','','lo16','hi16','ha16');
refaddr2str: array[trefaddr] of string[3] = ('','','','','@l','@h','@ha');
refaddr2str_darwin: array[trefaddr] of string[4] = ('','','','','lo16','hi16','ha16');
verbose_refaddrs = [addr_low,addr_high,addr_higha];
{$endif cpu64bitaddr}

8
compiler/ppcgen/agppcgas.pas
View File

@ -71,13 +71,13 @@ unit agppcgas;
{$ifdef cpu64bitaddr}
const
refaddr2str: array[trefaddr] of string[9] = ('', '', '', '@l', '@h', '@higher', '@highest', '@ha', '@highera', '@highesta');
refaddr2str: array[trefaddr] of string[9] = ('', '', '', '', '@l', '@h', '@higher', '@highest', '@ha', '@highera', '@highesta');
verbose_refaddrs = [addr_low, addr_high, addr_higher, addr_highest, addr_higha, addr_highera, addr_highesta];
refaddr2str_darwin: array[trefaddr] of string[4] = ('','','','lo16', 'hi16', '@err', '@err', 'ha16', '@err', '@err');
refaddr2str_darwin: array[trefaddr] of string[4] = ('','','','','lo16', 'hi16', '@err', '@err', 'ha16', '@err', '@err');
{$else cpu64bitaddr}
const
refaddr2str: array[trefaddr] of string[3] = ('','','','@l','@h','@ha');
refaddr2str_darwin: array[trefaddr] of string[4] = ('','','','lo16','hi16','ha16');
refaddr2str: array[trefaddr] of string[3] = ('','','','','@l','@h','@ha');
refaddr2str_darwin: array[trefaddr] of string[4] = ('','','','','lo16','hi16','ha16');
verbose_refaddrs = [addr_low,addr_high,addr_higha];
{$endif cpu64bitaddr}