- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
The code below produces an internal compiler error, if the /debug:full option is enabled.
program main implicit none real :: foo(2,2) foo = 1.0 call testSub(foo) contains subroutine testSub(matrix) class(*), intent(inout) :: matrix(:,:) ! << This works ! class(*), intent(inout) :: matrix(2,2) ! << This fails select type(local => matrix) type is (real) end select end subroutine testSub end program
Compiler: Intel(R) Visual Fortran Compiler XE 15.0 Update 2 for Windows
Link Copied
2 Replies
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
Thanks for the nice example. Escalated as issue DPD200368346. I will update this thread when there is news.
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
Fixed for a major release later this year.
Reply
Topic Options
- Subscribe to RSS Feed
- Mark Topic as New
- Mark Topic as Read
- Float this Topic for Current User
- Bookmark
- Subscribe
- Printer Friendly Page