https://gcc.gnu.org/bugzilla/show_bug.cgi?id=127731

--- Comment #1 from Ivan Pribec <ivan.pribec at gmail dot com> ---
I forgot to share the output. 

The results I get with gfortran 16.2 are:

 expression:         2.00000000       3.00000000       4.00000000    
 sum:                9.00000000    
 associate:          2.00000000       3.00000000       4.00000000    
 actual argument:    2.00000000       3.00000000       4.00000000    
 CLASS(*) q => f():   2.00000000       3.00000000       4.00000000    
 REAL r => g():      2.00000000       4.00000000       6.00000000 

By the looks of it, a descriptor with the correct base pointer, but stride = 1,
is created, when it should be stride = 2.

Reply via email to