View previous topic :: View next topic |
Author |
Message |
wahorger

Joined: 13 Oct 2014 Posts: 1257 Location: Morrison, CO, USA
|
Posted: Sat Jul 20, 2019 2:54 pm Post subject: Compiler fails to find errors in TYPE (WIN32) |
|
|
I stumbled across this quite by accident as I was adjusting the members of a TYPE.
The following code compiles without error with the data in the TYPE (bad, not expected), but fails if the data is outside of the TYPE (good, expected).
Code: |
type:: my_struct
character*16,pointer:: abcd
character*16:: defg
end type
type (my_struct):: wxyz
character*16,pointer:: abcd
character*16:: defg
character*16,target:: my_data
wxyz%abcd => my_data ! should work
wxyz%defg => my_data ! should fail error 422 - The left hand side of the pointer assignment does not have the POINTER attribute
abcd => my_data ! should work
defg => my_data ! fails with error 422 - The left hand side of the pointer assignment does not have the POINTER attribute
end
|
|
|
Back to top |
|
 |
wahorger

Joined: 13 Oct 2014 Posts: 1257 Location: Morrison, CO, USA
|
Posted: Tue Jul 23, 2019 1:28 pm Post subject: |
|
|
Dropped through the cracks, perhaps? |
|
Back to top |
|
 |
PaulLaidler Site Admin
Joined: 21 Feb 2005 Posts: 8208 Location: Salford, UK
|
Posted: Tue Jul 23, 2019 4:38 pm Post subject: |
|
|
Thanks. No, it's just that I have been out of office for a few days.
I have made a note that this needs fixing. |
|
Back to top |
|
 |
PaulLaidler Site Admin
Joined: 21 Feb 2005 Posts: 8208 Location: Salford, UK
|
Posted: Thu Jul 25, 2019 3:48 pm Post subject: |
|
|
This failure has now been fixed for the next release of FTN95. |
|
Back to top |
|
 |
|