[Patch, Fortran, OOP] PR 43388: [F2008] ALLOCATE with MOLD=

[Tobias Burnus]

On 06/15/2010 03:39 AM, Janus Weil wrote:
> here goes the new version of the patch, regtested as always. Ok for trunk?

OK. Thanks for the patch. But I have three wishes:

a) Add a FIXME at

+      else if (e->ts.type == BT_CLASS)
+	init_e = gfc_default_initializer (&ts.u.derived->components->ts);

to note that instead of the base type the effective type should have
been used for the initialization; you can also refer to PR 44541.

b) Refer in PR 44541 to allocate_alloc_opt_10.f90 as this contains a
commented-out test case

c) In allocate_alloc_opt_10.f90 you can refer to PR 44541 in the FIXME
comment.

Tobias

> 2010-06-14  Janus Weil  <janus@gcc.gnu.org>
>
> 	PR fortran/43388
> 	* gfortran.h (gfc_expr): Add new member 'mold'.
> 	* match.c (gfc_match_allocate): Implement the MOLD tag.
> 	* resolve.c (resolve_allocate_expr): Ditto.
> 	* trans-stmt.c (gfc_trans_allocate): Ditto.
>
>
> 2010-06-14  Janus Weil  <janus@gcc.gnu.org>
>
> 	PR fortran/43388
> 	* gfortran.dg/allocate_alloc_opt_8.f90: New.
> 	* gfortran.dg/allocate_alloc_opt_9.f90: New.
> 	* gfortran.dg/allocate_alloc_opt_10.f90: New.
> 	* gfortran.dg/class_allocate_2.f03: Modified an error message.
>