https://gcc.gnu.org/bugzilla/show_bug.cgi?id=103315
Bug ID: 103315
Summary: Gfortran DW_AT_Rank expression not emitting correct
rank value.
Product: gcc
Version: og10 (devel/omp/gcc-10)
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: debug
Assignee: unassigned at gcc dot gnu.org
Reporter: rupesh.potharla at amd dot com
Target Milestone: ---
I am working on to implement Assumed rank in gdb. Evaluating DW_AT_RANK
attribute expression provided by gcc is not emitting the correct rank value. Do
we have to manipulate the value returned by the expression in any way to get
the exact rank value?
----------------------------------------------------------------------------
PROGRAM arank
REAL :: a1(10)
call test_rank(a1)
CONTAINS
SUBROUTINE test_rank(a)
REAL :: a(..)
PRINT *, RANK(a)
END
END PROGRAM arank
------------------------------------------------------------------------------
gfortran -gdwarf-5 arank.f90 -o arank
------------------------------------------------------------------------------
DW_AT_rank (DW_OP_push_object_address, DW_OP_plus_uconst 0x1c,
DW_OP_deref)
