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

Reply via email to