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

Restricted MlaCmp>Mlas optimization to only work in ARM mode.

Browse Source 
git-svn-id: trunk@36602 -
This commit is contained in:
Jeppe Johansen 2017-06-26 18:14:46 +00:00
parent 8935b3c05c
commit 09a8cafcd7
1 changed files with 3 additions and 0 deletions

3
compiler/arm/aoptcpu.pas
View File

@ -654,6 +654,9 @@ Implementation
if MatchInstruction(p, [A_ADC,A_ADD,A_BIC,A_SUB,A_MUL,A_MVN,A_MOV,A_ORR,A_EOR,A_AND,
A_RSB,A_RSC,A_SBC,A_MLA], [C_None], [PF_None]) and
GetNextInstruction(p, hp1) and
{ mlas is only allowed in arm mode }
((taicpu(p).opcode<>A_MLA) or
(current_settings.instructionset<>is_thumb)) and
MatchInstruction(hp1, A_CMP, [C_None], [PF_None]) and
(taicpu(hp1).oper[1]^.typ = top_const) and
(taicpu(p).oper[0]^.reg = taicpu(hp1).oper[0]^.reg) and