Programming

Hello
I am using gfortran and I intended to do thiis:

Code:

      Module variables
     character(len=:), dimension(:),  allocatable, array
     end module variables

    Sub test
    use variables
    integer (max_len)
    max_len=len_trim("something here")
    if(.not.allocated(array)) &
    allocate(character = max_len :: array(3))
   array = (/'jonas', 'sssssssssssssss','q' /) 
   end sub test

gfortran compilation gives this errors:

Code:

  - max_len can not be used in this context: 
     allocate(character = max_len :: array(3))    &

  - Different character lenghts in array constructor:
      array = (/'jonas', 'sssssssssssssss','q' /)

I solved this using a number instead of max_len for the first error;
The second error can only be solved if all strings have the same lenght but this is not desired.

with a different compiler no error is displayed.

Moderator's Comments:

Please use code tags

One compiler may store an array of pointers to C-esque null terminated character arrays, so length is not an issue. Another might allocate the array as a block of storage, and making it scan the intializers for max length is asking a lot for FORTRAN. The second require you dimension the array with sufficient space (like for 3 string arrays of 20 characters) for any initializer before you initialize the space. My feel is tha FORTRAN is much more of a "know your compiler" universe than C/C++, where you can predict where every byte is on every implementation.