From c82861588675daba0fdf004b5b471f314843ee13 Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Sat, 19 Oct 2024 11:00:24 +0200
Subject: [PATCH]   + enable strength reduction for -O3, probably an oversight
 for years that it was not included in -O3

---
 compiler/globtype.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/compiler/globtype.pas b/compiler/globtype.pas
index 8afb6d1cf7..32a2e1ce93 100644
--- a/compiler/globtype.pas
+++ b/compiler/globtype.pas
@@ -475,7 +475,7 @@ 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
+       genericlevel3optimizerswitches = [cs_opt_level3,cs_opt_constant_propagate,cs_opt_nodedfa,cs_opt_loopstrength
                                          {$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];