[flang] Handle correctly user defined assignment for allocatable component
In the Fortran standard 2018 section 10.2.1.3 (13), it is mentioned that all noncoarray allocatable component must follow this sequence of operations: 1) If the component of the variable is allocated, it is deallocated. 2) If the component of the value of expr is allocated, the corresponding component of the variable is allocated with the same dynamic type and type parameters as the component of the value of expr. If it is an array, it is allocated with the same bounds. The value of the component of the value of expr is then assigned to the corresponding component of the variable using defined assignment if the declared type of the component has a type-bound defined assignment consistent with the component, and intrinsic assignment for the dynamic type of that component otherwise. This patch updates the code to make use of the user defined assignment for allocatable component and make sure the component is allocated correctly. Reviewed By: klausler Differential Revision: https://reviews.llvm.org/D147797
Loading
Please sign in to comment