http://gcc.gnu.org/bugzilla/show_bug.cgi?id=60066
Bug ID: 60066
Summary: Bad elemental invocation of non-scalar base object
Product: gcc
Version: 4.9.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
Assignee: unassigned at gcc dot gnu.org
Reporter: fmartinez at gmv dot com
Created attachment 32040
--> http://gcc.gnu.org/bugzilla/attachment.cgi?id=32040&action=edit
Array triggering the call to the elemental subroutine
Dear gfortran team.
The attached code compiles properly but the execution does not properly invoke
the elemental subroutine assertion_character that is a procedure bound to type
t_assertion_character. This happens in line 33 of
m_assertion_array_character.f90.
The attribute 'name' in t_assertion_character is not properly initialised to
the inpur value given in line 13 of main.f90.
When browsing the execution with the debugger, the subroutie
assertion_character is correctly invoked for each of the elements in the
ast%rast array. However, the value passed to the attribute 'name' is not
correctly passed to the subroutine assertion_character.
The implementation compiles and executes correctly with Intel fortran 14.
The same behaviour is observed with gfortran 4.7 and 4.8
Compiling with gfortran 4.6 the following message is issued (in case it may be
a hint):
m_assertion_array_character.f90:33.10:
call ast%rast%assertion_character( name )
1
Error: Non-scalar base object at (1) currently not implemented
Best regards,
Fran
