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

* Fix compilation for ARM

Browse Source
This commit is contained in:
Michaël Van Canneyt 2023-06-19 11:38:23 +02:00 committed by FPK
parent 1930aaa340
commit 188fc9c112
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/options.pas
View File

@ -2526,7 +2526,7 @@ begin
{$ifdef arm}
'I' :
begin
if (upper(copy(more,j+1)='THUMB') and
if (upper(copy(more,j+1))='THUMB') and
{ does selected CPU really understand thumb? }
(init_settings.cputype in cpu_has_thumb) then
init_settings.instructionset:=is_thumb