paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-18 04:29:17 +02:00
Code Issues Packages Projects Releases Wiki Activity

* pass used tls model to the assembler

Browse Source 
git-svn-id: trunk@40677 -
This commit is contained in:
florian 2018-12-27 20:54:14 +00:00
parent 7f5c2fa3aa
commit a7c347fe56
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/arm/agarmgas.pas
View File

@ -101,7 +101,7 @@ unit agarmgas;
function TArmGNUAssembler.MakeCmdLine: TCmdStr; function TArmGNUAssembler.MakeCmdLine: TCmdStr;
begin begin
result:=inherited MakeCmdLine; result:='-mtls-dialect=gnu '+inherited MakeCmdLine;
if (current_settings.fputype = fpu_soft) then if (current_settings.fputype = fpu_soft) then
result:='-mfpu=softvfp '+result; result:='-mfpu=softvfp '+result;
if (current_settings.fputype = fpu_vfpv2) then if (current_settings.fputype = fpu_vfpv2) then