[gcc(refs/users/mikael/heads/refactor_descriptor_v05)] Correction test matmul_bounds_6

[Mikael Morin via Gcc-cvs]

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

commit a13e53fb557420700ae8ecc4158e2b2481fd0f6e
Author: Mikael Morin <mik...@gcc.gnu.org>
Date:   Mon Apr 28 17:31:59 2025 +0200

    Correction test matmul_bounds_6

Diff:
---
 gcc/testsuite/gfortran.dg/matmul_bounds_6.f90 | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/gcc/testsuite/gfortran.dg/matmul_bounds_6.f90 
b/gcc/testsuite/gfortran.dg/matmul_bounds_6.f90
index 959b2cf15e39..79b9c2f864fa 100644
--- a/gcc/testsuite/gfortran.dg/matmul_bounds_6.f90
+++ b/gcc/testsuite/gfortran.dg/matmul_bounds_6.f90
@@ -16,8 +16,8 @@ program main
   if (any(c1/=res1)) STOP 2
 
   c2 = matmul(a,pack(b,[b>20.]))
-  if (size(c1,1) /= 3) STOP 3
-  if (any(c1/=res1)) STOP 4
+  if (size(c2,1) /= 3) STOP 3
+  if (any(c2/=res1)) STOP 4
 
   c3 = matmul(pack(b,[b<0.]),a)
   if (size(c3,1) /= 2) STOP 5