paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-06-22 11:58:21 +02:00
Code Issues Packages Projects Releases Wiki Activity

* MIPS: added a couple of important capabilities and made them available for big-endian targets as well.

Browse Source 
git-svn-id: trunk@28581 -
This commit is contained in:
sergei 2014-09-02 12:51:48 +00:00
parent 9b41b10350
commit 02f39c667a
1 changed files with 14 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
compiler/mips/cpuinfo.pas
View File

@ -104,9 +104,11 @@ Const
mips_abi : tabitype = abi_default; mips_abi : tabitype = abi_default;
{$ifdef MIPSEL}
type type
tcpuflags=(CPUMIPS_HAS_XXXX); //Todo: Does this need to be filled? tcpuflags=(
CPUMIPS_HAS_CMOV, { conditional move instructions (mips4+) }
CPUMIPS_HAS_ISA32R2 { mips32r2 instructions (also on PIC32) }
);
const const
cpu_capabilities : array[tcputype] of set of tcpuflags = cpu_capabilities : array[tcputype] of set of tcpuflags =
@ -114,14 +116,14 @@ const
{ cpu_mips1 } [], { cpu_mips1 } [],
{ cpu_mips2 } [], { cpu_mips2 } [],
{ cpu_mips3 } [], { cpu_mips3 } [],
{ cpu_mips4 } [], { cpu_mips4 } [CPUMIPS_HAS_CMOV],
{ cpu_mips5 } [], { cpu_mips5 } [CPUMIPS_HAS_CMOV],
{ cpu_mips32 } [], { cpu_mips32 } [CPUMIPS_HAS_CMOV],
{ cpu_mips32r2 } [], { cpu_mips32r2 } [CPUMIPS_HAS_CMOV,CPUMIPS_HAS_ISA32R2],
{ cpu_pic32mx } [] { cpu_pic32mx } [CPUMIPS_HAS_CMOV,CPUMIPS_HAS_ISA32R2]
); );
{$ifdef MIPSEL}
type type
tcontrollertype = tcontrollertype =
(ct_none, (ct_none,