This is the mail archive of the fortran@gcc.gnu.org mailing list for the GNU Fortran project.
Index Nav: | [Date Index] [Subject Index] [Author Index] [Thread Index] | |
---|---|---|
Message Nav: | [Date Prev] [Date Next] | [Thread Prev] [Thread Next] |
Other format: | [Raw text] |
2013/7/30 Janus Weil <janus@gcc.gnu.org>: >>> The attached new version should do the right thing now. At least it >>> shows the correct dump for the original test case as well as yours. It >>> is currently being regtested. >> >> unfortunately it shows a couple of runtime problems with type-bound operators: >> >> FAIL: gfortran.dg/class_defined_operator_1.f03 -O0 execution test >> FAIL: gfortran.dg/typebound_operator_13.f03 -O0 execution test >> FAIL: gfortran.dg/typebound_operator_7.f03 -O0 execution test >> FAIL: gfortran.dg/typebound_operator_8.f03 -O0 execution test >> FAIL: gfortran.dg/typebound_operator_9.f03 -O0 execution test > > The attached update fixes it, and thus should hopefully be > regression-free. It also renames 'gfc_class_null_initializer' to > 'gfc_class_initializer', since it now also does other initializations > beside EXPR_NULL. > > Will do another regtest to make sure it's clean. No failures observed. As a test case I'm using now Tobias' extended version (attached). New ChangeLog below. Ok for trunk? Cheers, Janus 2013-07-30 Janus Weil <janus@gcc.gnu.org> PR fortran/57306 * class.c (gfc_class_null_initializer): Rename to 'gfc_class_initializer'. Treat non-NULL init-exprs. * gfortran.h (gfc_class_null_initializer): Update prototype. * trans-decl.c (gfc_get_symbol_decl): Treat class pointers. * trans-expr.c (gfc_conv_initializer): Ditto. (gfc_trans_subcomponent_assign): Renamed gfc_class_null_initializer. 2013-07-30 Janus Weil <janus@gcc.gnu.org> PR fortran/57306 * gfortran.dg/pointer_init_8.f90: New.
Attachment:
pr57306_v4.diff
Description: Binary data
Attachment:
pointer_init_8.f90
Description: Binary data
Index Nav: | [Date Index] [Subject Index] [Author Index] [Thread Index] | |
---|---|---|
Message Nav: | [Date Prev] [Date Next] | [Thread Prev] [Thread Next] |