Public bug reported:
The problem description can be found in many places over the internet, e.g.
here:
http://numericalnoob.blogspot.fi/2012/08/fortran-allocatable-arrays-and-pointers.html
When debugging simple program
program test
integer, parameter :: ndata = 8, ndim = 2
real :: my_stack(ndata)
real, allocatable, target:: my_heap(:)
real, pointer:: my_ptr(:,:,:)
allocate(my_heap(ndata))
! read stuff
do i=1,ndata
my_stack(i) = real(i)
end do
my_heap = my_stack
my_ptr(1:ndim,1:ndim,1:ndim) => my_heap
write(*,*) my_stack
write(*,*) my_heap
write(*,*) my_ptr
end program test
With gdb from distro (GNU gdb (Ubuntu 7.7-0ubuntu3) 7.7) I get:
....
Breakpoint 1, test () at test.f90:13
13 write(*,*) my_stack
(gdb) p my_stack
$1 = (1, 2, 3, 4, 5, 6, 7, 8)
(gdb) p my_heap
$2 = (0)
(gdb) p my_ptr
$3 = (( ( 0) ) )
(gdb)
With properly compiled gdb on another computer (GNU gdb (GDB) SUSE
(7.5.1-0.7.29)) i get
....
Breakpoint 1, test () at test.f90:13
13 write(*,*) my_stack
(gdb) p my_stack
$1 = (1, 2, 3, 4, 5, 6, 7, 8)
(gdb) p my_heap
$2 = (1, 2, 3, 4, 5, 6, 7, 8)
(gdb) p my_ptr
$3 = (( ( 1, 2) ( 3, 4) ) ( ( 5, 6) ( 7, 8) ) )
(gdb)
** Affects: gdb (Ubuntu)
Importance: Undecided
Status: New
--
You received this bug notification because you are a member of Ubuntu
Bugs, which is subscribed to Ubuntu.
https://bugs.launchpad.net/bugs/1315634
Title:
gdb does not show heap arrays in fortran
To manage notifications about this bug go to:
https://bugs.launchpad.net/ubuntu/+source/gdb/+bug/1315634/+subscriptions
--
ubuntu-bugs mailing list
ubuntu-bugs@lists.ubuntu.com
https://lists.ubuntu.com/mailman/listinfo/ubuntu-bugs
