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

11.1.035 gives a "catastrophic error"

abhimodak
New Contributor I
454 Views
The program below gives "catastrophic error". If the main program lines are uncommented, the location reported shifts to a line 38 (in main program) in place of a line 23 (in module). There is a indeed a warning that the reported location may not be the exact cause.

I am using Win64 XP with VS2005. The error is reported on both Win32 and Win64 versions of the compiler.

Abhi

----

Module BaseModule

Implicit None

Type BaseType
Integer :: i
Real :: r
Procedure(), Pointer, NOPASS :: SomeThing
Contains
Procedure :: Set
End Type BaseType

Contains

Subroutine Display
Implicit None
Print *, "Jai Ho..."
End Subroutine Display

Subroutine Set(Obj)
Implicit None
Class(BaseType), Intent(INOUT) :: Obj
Call Obj%Something
End Subroutine Set

End Module BaseModule

! Program Test
!
! Use BaseModule
!
! Implicit None
!
! Type(BaseType) :: Trial
!
! Trial%Something => Display
!
! Call Trial%Set
!
! End Program Test
0 Kudos
2 Replies
Steven_L_Intel1
Employee
454 Views
Thanks - I can reproduce this and will pass it on to the developers. Issue ID is DPD200137733.
0 Kudos
Steven_L_Intel1
Employee
454 Views
This problem is resolved in Update 2, available now from the Intel Registration Center.
0 Kudos
Reply