[Bug fortran/40149] variable length still 6 ???

["plivings at arb dot ca dot gov" <gcc-bugzilla@gcc.gnu.org>]

------- Comment #3 from plivings at arb dot ca dot gov  2009-06-12 18:03 -------
Subject: RE:  variable length still 6 ???

Bud,

Thanks for your response to my earlier bug report, and sorry for not
informing you earlier that the bug was apparently related to the
computer OS-Compiler mismatch.  I had the OS-compiler changed to 64-bit
from 32-bit, and the problem disappeared.

Thanks again for your attention and time.
With best regards,
Paul

-----Original Message-----
From: bdavis at gcc dot gnu dot org [mailto:gcc-bugzilla@gcc.gnu.org] 
Sent: Friday, June 12, 2009 10:17 AM
To: Livingstone, Paul@ARB
Subject: [Bug fortran/40149] variable length still 6 ???



------- Comment #2 from bdavis at gcc dot gnu dot org  2009-06-12 17:17
-------
i created a compilable example from the code snippet given:

      INTEGER PBLJARRAYPT(341,341,1)
      INTEGER NCSP0,IARRAY2,I
      NCSP0 = 1
      IARRAY2 = 0
      DO I = 2, 341
         IARRAY2 = IARRAY2 + 1
         PBLJARRAYPT(I,I,NCSP0) = IARRAY2
      END DO
      PRINT*,'PBLJARRAYPT(2,2,1) = ',PBLJARRAYPT(2,2,1)
      PRINT*,'PBLJARRAYPT(3,3,1) = ',PBLJARRAYPT(3,3,1)
      PRINT*,'PBLJARRAYPT(341,341,1) = ',PBLJARRAYPT(341,341,1)

      END


When ran, it gives

 PBLJARRAYPT(2,2,1) =            1
 PBLJARRAYPT(3,3,1) =            2
 PBLJARRAYPT(341,341,1) =          340

which looks fine to me.

Unless more info is forthcoming on reproducing this bug, I think we
should
close it with no further action taken.  

It's only been open a month, doesn't hurt to let it sit for another :)

--bud


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=40149