On Thu, Feb 15, 2018 at 09:03:55PM +0100, Janus Weil wrote:
>
> Regtests cleanly on x86_64-linux-gnu. Ok for trunk?
>
Looks good to me with a question below.
> Index: gcc/fortran/interface.c
> ===================================================================
> --- gcc/fortran/interface.c (revision 257672)
> +++ gcc/fortran/interface.c (working copy)
> @@ -4702,6 +4702,10 @@ check_dtio_arg_TKR_intent (gfc_symbol *fsym, bool
> gfc_error ("DTIO dummy argument at %L must be an "
> "ASSUMED SHAPE ARRAY", &fsym->declared_at);
>
> + if (type == BT_CHARACTER && fsym->ts.u.cl->length != NULL)
> + gfc_error ("DTIO character argument at %L must have assumed length",
> + &fsym->declared_at);
> +
If the above is a numbered constraint in the Standard,
can you add a comment of the form /* F03:C1111. */
above the if-statement.
--
Steve
