Issue |
104798
|
Summary |
Flang crashes when calling procedure dummy argument
|
Labels |
flang
|
Assignees |
|
Reporter |
everythingfunctional
|
I've documented the issue in [another repo](https://github.com/HPC-Bugs/reproducers/tree/main/compiler/Fortran/flang/mapped-object-invalid-permission), but the following example reproduces the issue.
```fortran
module example_mod
abstract interface
subroutine sub_i
end subroutine
end interface
contains
subroutine call_internal(string)
character(len=*), intent(in) :: string
call call_it(print_it)
contains
subroutine print_it
print *, string
end subroutine
end subroutine
subroutine call_it(sub)
procedure(sub_i) :: sub
call sub
end subroutine
end module
program example_prog
use example_mod
call call_internal("Hello")
end program
```
_______________________________________________
llvm-bugs mailing list
llvm-bugs@lists.llvm.org
https://lists.llvm.org/cgi-bin/mailman/listinfo/llvm-bugs