paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-10-16 03:06:04 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ as_darwin assembler type (labels start with L)

Browse Source 
* never generate register->number mappings for Darwin
    * always use real register names for Darwin
This commit is contained in:
Jonas Maebe 2004-01-04 21:18:10 +00:00
parent 9e781b8c7b
commit bee5b615cf
1 changed files with 9 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
compiler/powerpc/itcpugas.pas
View File

@ -85,7 +85,7 @@ implementation
uses
globtype,globals,
cutils,verbose;
cutils,verbose, systems;
const
gas_regname_table : array[tregisterindex] of string[7] = (
@ -132,7 +132,8 @@ implementation
begin
p:=findreg_by_number(r);
if p<>0 then
if (cs_create_smart in aktmoduleswitches) then
if (cs_create_smart in aktmoduleswitches) and
(target_info.system <> system_powerpc_darwin) then
result:=gas_regname_short_table[p]
else
result:=gas_regname_table[p]
@ -143,7 +144,12 @@ implementation
end.
{
$Log$
Revision 1.3 2003-12-10 22:19:27 florian
Revision 1.4 2004-01-04 21:18:10 jonas
+ as_darwin assembler type (labels start with L)
* never generate register->number mappings for Darwin
* always use real register names for Darwin
Revision 1.3 2003/12/10 22:19:27 florian
+ short gas register names for smartlinking added
Revision 1.2 2003/11/15 19:00:10 florian