[gcc(refs/users/mikael/heads/refactor_descriptor_v05)] Correction regression class_result_9

[Mikael Morin]

https://gcc.gnu.org/g:e24134923cd81c35d6c21dd1053a43144897d595

commit e24134923cd81c35d6c21dd1053a43144897d595
Author: Mikael Morin <mikael@gcc.gnu.org>
Date:   Sat May 3 22:31:40 2025 +0200

    Correction regression class_result_9

Diff:
---
 gcc/fortran/trans-array.cc | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/gcc/fortran/trans-array.cc b/gcc/fortran/trans-array.cc
index fd15c3eec0f2..e1c21fb6308f 100644
--- a/gcc/fortran/trans-array.cc
+++ b/gcc/fortran/trans-array.cc
@@ -2811,6 +2811,10 @@ gfc_add_loop_ss_code (gfc_loopinfo * loop, gfc_ss * ss, bool subscript,
 		      tree spacing = gfc_conv_descriptor_spacing_get (tmp, tree_dim);
 		      spacing = gfc_evaluate_now (spacing, &outer_loop->pre);
 		      info->spacing[dim] = spacing;
+
+		      tree lbound = gfc_conv_descriptor_lbound_get (tmp, tree_dim);
+		      lbound = gfc_evaluate_now (lbound, &outer_loop->pre);
+		      info->lbound[dim] = lbound;
 		    }
 	      }
 	    else