- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
Hi,
with the version 18.0.3 I get an ICE with the following lines of code. It is part of a code to hold a dynamic growing list of character items of specified length. Since I have only 18.0.3 installed, I couldn't check it with another compiler version.
module list type list_char(n) integer, len :: n = 4 integer, private :: counter = 0 character(len=n), private, allocatable :: array(:) contains procedure, nopass :: add => append_char !procedure, pass(arl) :: add => append_char !-> error end type contains subroutine append_char(arl,item) class(list_char) :: arl character(len=arl%n), intent(in) :: item ! character(len=arl%n), allocatable :: tarry(:) ! if (arl%counter .eq. 0) then if (allocated(arl%array)) deallocate(arl%array) ! ... ! ... endif end subroutine end module ! stub needed for compiling program listtest use list end program
Best regards,
Rene
Link Copied
1 Reply
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
Still fails in 19.0. Please report it at https://supporttickets.intel.com/?lang=en-US
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