The structure of things

Something I came across whilst writing the code for my post in Support=>Time, was that if I incorrectly had the following in one of my modules:

Module Animal_hdr

Type stColours Integer*1, Pointer i1Colour(:) End Type stColours

Type stStripes Type(stColours), Pointer :: pstStripe(:, 😃 EndType stStripes

Type stZebras Type(stLion), Pointer :: pstZebra(:, 😃 Integer*4 :: iOffsetLargeX, iOffsetLargeY EndType stZebras

End Module Animal_hdr

then the project would still build. It appeared to not have detected that there is no such definition as stLion. The project builds, but unsurprisingly 'bombs' upon execution when I attempt to allocate the arrays 😮)

Marz

Nothing? Is it a known issue? Am I just being silly with this or something?

Marz

This is a compiler fault and I have logged it for investigation.

Quoted from PaulLaidler This is a compiler fault and I have logged it for investigation.

Hello Paul,

Do you remember this? I have just spent more than an entire day (literally) searching for why an assignment of one structure to another did nothing but laugh and mock me. Well, it was because I had a teeny-tiny header-file similar to:

Module System_Mare_hdr

Type stMare Integer*4 :: Count Type(stGrrr), Pointer :: pstGrrr(:) End Type stMare

End Module System_Mare_hdr

Which the IDE and Co. apparently considered, and then went about its merry business without such as a 'ya know what ....'

Type Grrr is 'of course' defined in another header-file.

I don't really have a question to ask, in fact right now I dare not type one - lol However, some useful feedback on the matter would be useful.

Regards Marz

PS: I have downloaded and I am running 6.35.0

I will see if I can speed this one up.

I can confirm that there is a bug here. FTN95 should complain that stLoin has not been defined. It will complain later when you try to use stLoin so this is not show-stopping. However, I have logged this as some thing that needs to be fixed.

Hi there,

Thanks for the reply.

However, I have again just spent an entire day (actually only 12hrs straight so far - I have spent 3 days tracking it down before now) trying to track down an issue that I suspect is related to this.

When my code has this 'error' in it, it usually exhibits behavior such as not populating structures properly in other areas of the code (anticipate memory corruption/alignment issue because of it).

The upshot of this is that even though I am not using the offending structure in the place my code fails, my code still will not run 😦

Any updates on the progress of fixing this is very much appreciated.

TIA

Marz

There is no progress so far. It is on a list that we are working through. However, this is not a significant issue and ought not to limit your development process.

This has now been fixed for the next release.