https://gcc.gnu.org/bugzilla/show_bug.cgi?id=70397
--- Comment #4 from vehre at gcc dot gnu.org --- Author: vehre Date: Tue Mar 29 16:54:24 2016 New Revision: 234528 URL: https://gcc.gnu.org/viewcvs?rev=234528&root=gcc&view=rev Log: gcc/fortran/ChangeLog: 2016-03-29 Andre Vehreschild <ve...@gcc.gnu.org> PR fortran/70397 * trans-expr.c (gfc_class_len_or_zero_get): Add function to return a constant zero tree, when the class to get the _len component from is not unlimited polymorphic. (gfc_copy_class_to_class): Use the new function. * trans.h: Added interface of new function gfc_class_len_or_zero_get. gcc/testsuite/ChangeLog: 2016-03-29 Andre Vehreschild <ve...@gcc.gnu.org> PR fortran/70397 * gfortran.dg/unlimited_polymorphic_25.f90: New test. * gfortran.dg/unlimited_polymorphic_26.f90: New test. Added: trunk/gcc/testsuite/gfortran.dg/unlimited_polymorphic_25.f90 trunk/gcc/testsuite/gfortran.dg/unlimited_polymorphic_26.f90 Modified: trunk/gcc/fortran/ChangeLog trunk/gcc/fortran/trans-expr.c trunk/gcc/fortran/trans.h trunk/gcc/testsuite/ChangeLog
