Skip to content

Commit 8da0180

Browse files
committed
Add new Intel 18 and 19 bug test case
1 parent 6f965bf commit 8da0180

File tree

2 files changed

+18
-0
lines changed

2 files changed

+18
-0
lines changed

intel-bugs/CMakeLists.txt

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -5,6 +5,7 @@ include(testing)
55

66
project(intel-bugs Fortran)
77

8+
add_compiler_test(SOURCES intel-20191228.f90)
89
add_compiler_test(SOURCES intel-20190909.f90 COMPILE_ONLY)
910
add_compiler_test(SOURCES intel-20190903b.f90 COMPILE_ONLY)
1011
add_compiler_test(SOURCES intel-20190903.f90 COMPILE_ONLY)

intel-bugs/intel-20191228.f90

Lines changed: 17 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,17 @@
1+
!! INTERNAL COMPILER ERROR
2+
!!
3+
!! Affects both 18.0.5 and 19.0.5. No error if string is not allocatable.
4+
!!
5+
!! $ ifort --version
6+
!! ifort (IFORT) 19.0.5.281 20190815
7+
!!
8+
!! $ ifort intel-20191228.f90
9+
!! intel-20191228.f90(4): 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.
10+
!! compilation aborted for intel-20191228.f90 (code 1)
11+
12+
character(:), allocatable :: string
13+
string = 'fubar'
14+
associate (substring => string(3:))
15+
if (substring /= 'bar') stop 1
16+
end associate
17+
end

0 commit comments

Comments
 (0)