paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-31 17:30:38 +02:00
Code Issues Packages Projects Releases Wiki Activity

switch all optimizations off

Browse Source
This commit is contained in:
Kirill Kranz 2024-10-02 20:04:08 +02:00
parent 1b26f5c3a3
commit 3431cf5bc0
1 changed files with 26 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

27
compiler/options.pas
View File

@ -5554,11 +5554,36 @@ begin
end; end;
system_mipsel_PS1: system_mipsel_PS1:
begin begin
{
init_settings.optimizerswitches:=[
cs_opt_stackframe,
cs_opt_size, // makes smaller
cs_opt_uncertain,
cs_opt_peephole,
cs_opt_tailrecursion,
cs_opt_nodecse, // makes smaller - don't sets vars to 0
cs_opt_nodedfa,
cs_opt_loopstrength,
cs_opt_reorder_fields,
cs_opt_dead_values, // makes smaller
cs_opt_remove_empty_proc, // makes smaller
cs_opt_dead_store_eliminate,
cs_opt_forcenostackframe,
cs_opt_unused_para, // makes smaller
cs_opt_consts];
// dont work: cs_opt_regvar, cs_opt_constant_propagate
// dont compile: cs_opt_scheduler
// makes larger: cs_opt_autoinline
}
init_settings.optimizerswitches:=[];
init_settings.debugswitches:= [];
{ set default cpu type to MIPS1 with SoftFPU } { set default cpu type to MIPS1 with SoftFPU }
if not option.CPUSetExplicitly then if not option.CPUSetExplicitly then
init_settings.cputype:=cpu_mips1; init_settings.cputype:=cpu_mips1;
if not option.OptCPUSetExplicitly then if not option.OptCPUSetExplicitly then
init_settings.optimizecputype:=cpu_mips1; init_settings.optimizecputype:=cpu_none;
if not option.FPUSetExplicitly then if not option.FPUSetExplicitly then
begin begin
include(init_settings.moduleswitches,cs_fp_emulation); include(init_settings.moduleswitches,cs_fp_emulation);