Intel® Fortran Compiler
Build applications that can scale for the future with optimized code designed for Intel® Xeon® and compatible processors.

ICE with output argument

Daniel_Dopico
New Contributor I
405 Views

This code throws an ICE in IFX and IFORT. Some versions of the compilers have also problems with a subroutine and intent(out) argument.

PROGRAM MAIN
IMPLICIT NONE
TYPE:: base_type
INTEGER:: i=0
END TYPE base_type
CLASS(base_type),POINTER:: e
REAL(8),ALLOCATABLE,DIMENSION(:,:)::f

f=f_test(e)

CONTAINS

FUNCTION f_test(e) RESULT(o)
IMPLICIT NONE
CLASS(base_type),POINTER::e
REAL(8),DIMENSION(3,e%i):: o

o=0.d0

END FUNCTION f_test

END PROGRAM MAIN

 

0 Kudos
2 Replies
Daniel_Dopico
New Contributor I
398 Views

I got confirmation with some colleagues and filled a support request on this ICE.

Devorah_H_Intel
Moderator
329 Views

@Daniel_Dopico wrote:

I got confirmation with some colleagues and filled a support request on this ICE.


Thank you for reporting this to us. I have escalated this to compiler engineering for a fix.

0 Kudos
Reply