View previous topic :: View next topic |
Author |
Message |
sigment
Joined: 17 Dec 2007 Posts: 10
|
Posted: Sat Sep 28, 2024 6:49 am Post subject: Array Section Bug |
|
|
This demo won't compile with the array assignment line and without it the SHAPE of the section is wrong.
Code: | program section
real(8) :: A(3,2) = 42D0, C(2,2) = 0D0
print *, SHAPE(A(1:2,1:2)) ! FTN95 gives 3 2 instead of 2 2
C = A(1:2,1:2) ! FTN95: *** Error 331: Non-conformant array shapes in first rank of an array expression (2 and 3)
print *, C
end program |
Tried debug and release builds with FTN95 9.00.0 and then tried the 9.05.0 updates. (I am building with /ALT_KINDS.) |
|
Back to top |
|
 |
PaulLaidler Site Admin
Joined: 21 Feb 2005 Posts: 8120 Location: Salford, UK
|
Posted: Sat Sep 28, 2024 10:17 am Post subject: |
|
|
sigment
Thank you for the bug report. I have logged this as needing fixing. |
|
Back to top |
|
 |
PaulLaidler Site Admin
Joined: 21 Feb 2005 Posts: 8120 Location: Salford, UK
|
Posted: Fri Jan 31, 2025 8:02 am Post subject: |
|
|
This bug has now been fixed for the next release of FTN95. |
|
Back to top |
|
 |
|