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

* Merge 40833 (without the riscvXX part)

Browse Source 
------------------------------------------------------------------------
r40833 | pierre | 2019-01-10 12:18:22 +0000 (Thu, 10 Jan 2019) | 1 line

 Add missing support for -PriscvXX and -Psparc64
------------------------------------------------------------------------
--- Merging r40833 into '.':
U    compiler/utils/fpc.pp
--- Recording mergeinfo for merge of r40833 into '.':
 U   .

git-svn-id: branches/fixes_3_2@40963 -
This commit is contained in:
pierre 2019-01-21 14:22:03 +00:00
parent e85a99b1f8
commit cdfefa381e
1 changed files with 8 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
compiler/utils/fpc.pp
View File

@ -223,8 +223,14 @@ program fpc;
cpusuffix:='a64'
else if processorstr='arm' then
cpusuffix:='arm'
else if processorstr='avr' then
cpusuffix:='avr'
else if processorstr='i386' then
cpusuffix:='386'
else if processorstr='i8086' then
cpusuffix:='8086'
else if processorstr='jvm' then
cpusuffix:='jvm'
else if processorstr='m68k' then
cpusuffix:='68k'
else if processorstr='mips' then
@ -237,14 +243,10 @@ program fpc;
cpusuffix:='ppc64'
else if processorstr='sparc' then
cpusuffix:='sparc'
else if processorstr='sparc64' then
cpusuffix:='sparc64'
else if processorstr='x86_64' then
cpusuffix:='x64'
else if processorstr='jvm' then
cpusuffix:='jvm'
else if processorstr='i8086' then
cpusuffix:='8086'
else if processorstr='avr' then
cpusuffix:='avr'
else
error('Illegal processor type "'+processorstr+'"');