[Patch, fortran] PR27122 - requirements for defined operators

Paul Thomas paulthomas2@wanadoo.fr
Tue Apr 18 05:12:00 GMT 2006


Paul,,

>  /* See if function is already resolved.  */
>--- 1237,1252 ----
>    need_full_assumed_size--;
>  
>    if (sym && sym->ts.type == BT_CHARACTER
>! 	&& sym->ts.cl
>! 	&& sym->ts.cl->length == NULL)
>! 	&& !sym->attr.dummy
>! 	&& !sym->attr.contained)
>      {
>        /* Internal procedures are taken care of in resolve_contained_fntype.  */
>!       gfc_error ("Function '%s' is declared CHARACTER(*) and cannot "
>! 		 "be used at %L since it is not a dummy argument",
>! 		 sym->name, &expr->where);
>!       return FAILURE;
>      }
>  
>  
>
The bracket after NULL is, of course, extraneous and resulted from a bit 
of "tidying up" before submission.

Cheers

Paul



More information about the Gcc-patches mailing list