Dear gfortran experts...

The attached program runs OK, but `ptype`ing using gdb
on the deferred-length character array returns empty(?)
result, as the following (the results for integer and
real arrays are correct ):

(gdb) ptype intarr
type = integer(kind=4), allocatable (8)
(gdb) ptype realarr
type = real(kind=8), allocatable (8)
(gdb) ptype chararr
type = Type 
End Type 

Is this a bug?

Kazuyoshi
--
Kazuyoshi Furutaka
furut...@jb3.so-net.ne.jp
program arrays
  parameter(num=8)
  integer, allocatable :: intarr(:)
  real*8,  allocatable :: realarr(:)
  character(len=:), allocatable :: chararr(:)

  allocate(intarr(num))
  allocate(realarr(num))
  allocate(character(len=6) :: chararr(num))

  intarr(1)=9
  realarr(1)=9.0
  chararr(1)="ahoaho"
  print *, intarr(1)
  print *, realarr(1)
  print *, chararr(1)
end program arrays

Reply via email to