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

+ for loop optimizations can be controller by a switch (-Oo(no)forloop)

Browse Source
This commit is contained in:
florian 2021-09-12 10:54:09 +02:00
parent c30ce7108e
commit 1e072aef31
3 changed files with 10 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
compiler/globtype.pas
View File

@ -350,7 +350,8 @@ interface
cs_opt_forcenostackframe,
cs_opt_use_load_modify_store,
cs_opt_unused_para,
cs_opt_consts
cs_opt_consts,
cs_opt_forloop
);
toptimizerswitches = set of toptimizerswitch;
@ -415,7 +416,7 @@ interface
'ORDERFIELDS','FASTMATH','DEADVALUES','REMOVEEMPTYPROCS',
'CONSTPROP',
'DEADSTORE','FORCENOSTACKFRAME','USELOADMODIFYSTORE',
'UNUSEDPARA','CONSTS'
'UNUSEDPARA','CONSTS','FORLOOP'
);
WPOptimizerSwitchStr : array [twpoptimizerswitch] of string[14] = (
'DEVIRTCALLS','OPTVMTS','SYMBOLLIVENESS'
@ -441,7 +442,9 @@ interface
{ switches being applied to all CPUs at the given level }
genericlevel1optimizerswitches = [cs_opt_level1,cs_opt_peephole];
genericlevel2optimizerswitches = [cs_opt_level2,cs_opt_remove_empty_proc,cs_opt_unused_para];
genericlevel3optimizerswitches = [cs_opt_level3,cs_opt_constant_propagate,cs_opt_nodedfa{$ifndef llvm},cs_opt_use_load_modify_store{$endif},cs_opt_loopunroll];
genericlevel3optimizerswitches = [cs_opt_level3,cs_opt_constant_propagate,cs_opt_nodedfa
{$ifndef llvm},cs_opt_use_load_modify_store{$endif},
cs_opt_loopunroll,cs_opt_forloop];
genericlevel4optimizerswitches = [cs_opt_level4,cs_opt_reorder_fields,cs_opt_dead_values,cs_opt_fastmath];
{ whole program optimizations whose information generation requires

3
compiler/psub.pas
View File

@ -1223,7 +1223,8 @@ implementation
include(flags,pi_dfaavailable);
end;
RedoDFA:=OptimizeForLoop(code);
if cs_opt_forloop in current_settings.optimizerswitches then
RedoDFA:=OptimizeForLoop(code);
RedoDFA:=ConvertForLoops(code) or RedoDFA;

3
compiler/utils/ppuutils/ppudump.pp
View File

@ -2446,7 +2446,8 @@ const
'cs_opt_forcenostackframe',
'cs_opt_use_load_modify_store',
'cs_opt_unused_para',
'cs_opt_consts'
'cs_opt_consts',
'cs_opt_forloop'
);
var
globalswitch : tglobalswitch;