[Bug fortran/40089] Public type with public component which has a private type

[burnus at gcc dot gnu dot org]

------- Comment #4 from burnus at gcc dot gnu dot org  2009-05-11 10:20 -------
>           && !gfc_check_access (c->ts.derived->attr.access,
>                                 c->ts.derived->ns->default_access))
>         {
> -         gfc_notify_std (GFC_STD_F2003, "Fortran 2003: the component '%s' "
> +         if (gfc_notify_std (GFC_STD_F2003, "Fortran 2003: the component '%s'
> "

Or shorter:

 if (....
     && !gfc_check_access
     && gfc_notify_std (...) == FAILURE)
   return FAILURE;

saves a { } pair and some indentation


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=40089