IV45872: INTERNAL ERROR WITH USE IN EXTERNAL FUNCTION
Fixes are available
XL Fortran for AIX Fix Pack 11 (May 2015 PTF) for 14.1
XL Fortran for AIX Fix Pack 12 (August 2015 Update) for 14.1
XL Fortran for AIX Fix Pack 15 (April 2016 Update) for 14.1
XL Fortran for AIX Fix Pack 16 (July 2016 Update) for 14.1
XL Fortran for AIX Fix Pack 17 (November 2016 Update) for 14.1
XL Fortran for AIX Fix Pack 18 (February 2017 Update) for 14.1
XL Fortran for AIX Fix Pack 19 (August 2017 Update) for 14.1
Closed as program error.
Fortran code with a USE statement in an external function is encountering an internal compiler error in the xlfentry component of the comiler. ==== TEST CASE ==== Code with USE usage similar to: MODULE module_1 CONTAINS SUBROUTINE mysub(parent) USE module_domain TYPE(domain),POINTER :: parent END SUBROUTINE mysub END MODULE module_1 LOGICAL FUNCTION myfunc() USE module_1 myfunc = .TRUE. END FUNCTION myfunc $ xlf90_r -c module_dm.f90 ** module_1 === End of Compilation 1 === xlf90_r: 1501-230 (S) Internal compiler error; please contact your Service Representative. For more information visit: http://www.ibm.com/support/docview.wss?uid=swg21110810 1501-511 Compilation failed for file module_dm.f90. $
USERS AFFECTED: Clients making use of the USE statement maybe affected by this issue. PROBLEM DESCRIPTION: When a USE statement appears inside an external function, and the USE module contains derived type definitions written a certain way and involving types accessed via USE only statements, an internal compiler error occurs.
The compiler has been fixed to avoid the internal compiler error for the above case.
Reported component name
XL FORTRAN FOR
Reported component ID
Last modified date
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
Fixed component name
XL FORTRAN FOR
Fixed component ID
Applicable component levels
Translate this page: