[flang][debug] Wrong signature for functions with complex return type.

[abidh]

See the following example. The type of the fn as shown by GDB is wrong. It shows integer as return type.

complex function fn(a)
    complex, intent(in) :: a
    fn = a
end function

program function_calls
    implicit none
    interface
        complex function fn(a)
            complex, intent(in) :: a
        end function
    end interface
    complex :: b, c
    c = fn(b)
    print *, c
end program

(gdb) ptype fn
type = integer (complex)

[llvmbot]

@llvm/issue-subscribers-debuginfo

Author: Abid Qadeer (abidh)

See the following example. The type of the `fn` as shown by GDB is wrong. It shows integer as return type.

complex function fn(a)
    complex, intent(in) :: a
    fn = a
end function

program function_calls
    implicit none
    interface
        complex function fn(a)
            complex, intent(in) :: a
        end function
    end interface
    complex :: b, c
    c = fn(b)
    print *, c
end program

(gdb) ptype fn
type = integer (complex)

[llvmbot]

@llvm/issue-subscribers-flang-ir

Author: Abid Qadeer (abidh)

See the following example. The type of the `fn` as shown by GDB is wrong. It shows integer as return type.

complex function fn(a)
    complex, intent(in) :: a
    fn = a
end function

program function_calls
    implicit none
    interface
        complex function fn(a)
            complex, intent(in) :: a
        end function
    end interface
    complex :: b, c
    c = fn(b)
    print *, c
end program

(gdb) ptype fn
type = integer (complex)