Hello,
the following code leads to an internal compiler error:
module ifc_openmp_workshare_bug implicit none type t real, pointer :: u(:,:) end type t contains subroutine sub (z, x, y) real, intent(out) :: z(:,:) type(t), intent(in) :: x type(t), intent(in) :: y !$omp parallel workshare z = x%u * y%u !$omp end parallel workshare end subroutine sub end module ifc_openmp_workshare_bug
% ifort -V -c -fopenmp ifort_omp.f90 Intel(R) Fortran Compiler XE for applications running on IA-32, Version 15.0.5.223 Build 20150805 Copyright (C) 1985-2015 Intel Corporation. All rights reserved. FOR NON-COMMERCIAL USE ONLY Intel(R) Fortran 15.0-1818 010101_13492 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. compilation aborted for ifort_omp.f90 (code 1)
Thanks,
Harald