** Changed in: gdb
Status: Unknown => Fix Released
** Changed in: gdb
Importance: Unknown => Critical
--
You received this bug notification because you are a member of Ubuntu
Touch seeded packages, which is subscribed to gdb in Ubuntu.
https://bugs.launchpad.net/bugs/1315634
Title:
gdb does not show heap arrays in fortran
Status in gdb:
Fix Released
Status in gdb package in Ubuntu:
Confirmed
Status in gdb package in Debian:
Confirmed
Bug description:
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)
To manage notifications about this bug go to:
https://bugs.launchpad.net/gdb/+bug/1315634/+subscriptions
--
Mailing list: https://launchpad.net/~touch-packages
Post to : touch-packages@lists.launchpad.net
Unsubscribe : https://launchpad.net/~touch-packages
More help : https://help.launchpad.net/ListHelp
