View previous topic :: View next topic |
Author |
Message |
MarzAttax
Joined: 15 Jun 2006 Posts: 46
|
Posted: Mon Nov 19, 2012 6:31 pm Post subject: 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 :o)
Marz |
|
Back to top |
|
|
MarzAttax
Joined: 15 Jun 2006 Posts: 46
|
Posted: Tue Nov 20, 2012 3:02 pm Post subject: |
|
|
Nothing?
Is it a known issue?
Am I just being silly with this or something?
Marz |
|
Back to top |
|
|
PaulLaidler Site Admin
Joined: 21 Feb 2005 Posts: 7925 Location: Salford, UK
|
Posted: Tue Nov 20, 2012 5:30 pm Post subject: |
|
|
This is a compiler fault and I have logged it for investigation. |
|
Back to top |
|
|
MarzAttax
Joined: 15 Jun 2006 Posts: 46
|
Posted: Sat Jul 20, 2013 1:06 pm Post subject: Re: |
|
|
PaulLaidler wrote: | 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 |
|
Back to top |
|
|
PaulLaidler Site Admin
Joined: 21 Feb 2005 Posts: 7925 Location: Salford, UK
|
Posted: Sat Jul 20, 2013 4:41 pm Post subject: |
|
|
I will see if I can speed this one up. |
|
Back to top |
|
|
PaulLaidler Site Admin
Joined: 21 Feb 2005 Posts: 7925 Location: Salford, UK
|
Posted: Sat Jul 27, 2013 7:24 am Post subject: |
|
|
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. |
|
Back to top |
|
|
MarzAttax
Joined: 15 Jun 2006 Posts: 46
|
Posted: Sat Feb 08, 2014 1:09 am Post subject: |
|
|
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 |
|
Back to top |
|
|
PaulLaidler Site Admin
Joined: 21 Feb 2005 Posts: 7925 Location: Salford, UK
|
Posted: Sat Feb 08, 2014 9:27 am Post subject: |
|
|
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. |
|
Back to top |
|
|
PaulLaidler Site Admin
Joined: 21 Feb 2005 Posts: 7925 Location: Salford, UK
|
Posted: Thu Mar 20, 2014 11:29 am Post subject: |
|
|
This has now been fixed for the next release. |
|
Back to top |
|
|
|