- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
Does this produce an error with the latest version of ifort(1)?
program demo_reduce
use, intrinsic :: iso_fortran_env, only : compiler_version, compiler_options
implicit none
real,allocatable :: arr(:)
print '(4a)', &
'This file was compiled by ', &
compiler_version(), &
' using the options ', &
compiler_options()
arr=[1.0, -1.0, 2.0, -2.0, 3.0 -3.0 ]
write(*,*)reduce(arr, my_mult)
write(*,*)reduce(arr, my_mult, mask=arr>0.0)
contains
pure function my_mult(a,b) result(c)
real,intent(in) :: a, b
real :: c
c=a*b
end function my_mult
end program demo_reduce
! bug.f90(6): catastrophic error: **Internal compiler error: internal abort**
! Please report this error along with the circumstances in
! which it occurred in a Software Problem Report. Note:
! File and line given may not be explicit cause of this error.
! This file was compiled by Intel(R) Fortran Intel(R) 64 Compiler
! Classic for applications running on Intel(R) 64, Version 2021.3.0 Build
! 20210609_000000 using the options
1 Solution
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
I tested it with 2021.6 ifort and there is an ice.
However the upcoming 2021.7 ifort (part of oneAPI HPC toolkit 2022.3 to be released soon) doesn't ICE.
Link Copied
2 Replies
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
I tested it with 2021.6 ifort and there is an ice.
However the upcoming 2021.7 ifort (part of oneAPI HPC toolkit 2022.3 to be released soon) doesn't ICE.
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
Thanks. That eliminates trying to post a bug report; testing it out more completely can wait till I get upgraded.


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