paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-19 05:09:07 +02:00
Code Issues Packages Projects Releases Wiki Activity

Add -EB or -EL paramter to xtensa assembler call (Warning: this requires a patched 2.40 release\!)

Browse Source
This commit is contained in:
Pierre Muller 2023-04-13 13:03:48 +00:00
parent 4750840e89
commit 665670ae01
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
compiler/xtensa/agcpugas.pas
View File

@ -66,6 +66,11 @@ unit agcpugas;
function TXtensaGNUAssembler.MakeCmdLine: TCmdStr; function TXtensaGNUAssembler.MakeCmdLine: TCmdStr;
begin begin
result:=inherited MakeCmdLine; result:=inherited MakeCmdLine;
if target_info.endian=endian_little then
Replace(result,'$SHORTENDIAN','-EL')
else
Replace(result,'$SHORTENDIAN','-EB');
end; end;
{****************************************************************************} {****************************************************************************}
@ -178,7 +183,7 @@ unit agcpugas;
idtxt : 'AS'; idtxt : 'AS';
asmbin : 'as'; asmbin : 'as';
asmcmd : '-o $OBJ $EXTRAOPT $ASM --longcalls'; asmcmd : '-o $OBJ $SHORTENDIAN $EXTRAOPT $ASM --longcalls';
supported_targets : [system_xtensa_embedded,system_xtensa_linux,system_xtensa_freertos]; supported_targets : [system_xtensa_embedded,system_xtensa_linux,system_xtensa_freertos];
flags : [af_needar,af_smartlink_sections,af_supports_dwarf,af_stabs_use_function_absolute_addresses]; flags : [af_needar,af_smartlink_sections,af_supports_dwarf,af_stabs_use_function_absolute_addresses];
labelprefix : '.L'; labelprefix : '.L';