------------Source File test_args.F90--------------------
module test_args
contains
subroutine args(a,b,c,d,e,f,g,h)
implicit none
integer :: a,b,c,d,e,f,g,h
write(,) ‘<<<<<<<<<<<<<<<<>>>>>>>>>>>>>’
end subroutine
end module test_args
program test_debugger
use test_args
implicit none
integer :: a=10,b=20,c=30,d=40,e=50,f=60,g=70,h=80
call args(a,b,c,d,e,f,g,h)
end program test_debugger
$nvidia/hpc_sdk/Linux_x86_64/21.9/compilers/bin/pgfortran -g test_args.F90 -o test_args_pgfortran
$nvidia/hpc_sdk/Linux_x86_64/21.9/compilers/bin/cuda-gdb --args test_args_pgfortran
(cuda-gdb) break “test_args.F90:6”
(cuda-gdb) run
Starting program: /home/mrahman/dev/SOLVER-UDI/test/test_args_pgfortran
[Thread debugging using libthread_db enabled]
Using host libthread_db library “/lib/x86_64-linux-gnu/libthread_db.so.1”.
Breakpoint 2, test_args::args (a=10, b=20, c=30, d=40, e=50, f=60, g=4210840, h=4210844) at test_args.F90:6
6 write(*,*) '<<<<<<<<<<<<<<<<<Here is the hell>>>>>>>>>>>>>>'
(cuda-gdb)
!!!Clearly the values for g and h in the arguments are garbage!!!
Can anyone help me ?