On Tue, 24 Sep 2019 12:12:04 +0100 Mark Eggleston <mark.eggles...@codethink.co.uk> wrote:
> >> @@ -411,7 +411,7 @@ gfc_post_options (const char **pfilename) > >> && flag_max_stack_var_size != 0) > >> gfc_warning_now (0, "Flag %<-fno-automatic%> overwrites > >> %<-fmax-stack-var-size=%d%>", > >> flag_max_stack_var_size); > >> - else if (!flag_automatic && flag_recursive) > >> + else if (!flag_automatic && flag_recursive && warn_overwrite_recursive) > >> gfc_warning_now (0, "Flag %<-fno-automatic%> overwrites > >> %<-frecursive%>"); > >> else if (!flag_automatic && flag_openmp) > >> gfc_warning_now (0, "Flag %<-fno-automatic%> overwrites > >> %<-frecursive%> implied by " > >> > > Doesn't look right to me. Do you want > > gfc_warning_now (OPT_Woverwrite_recursive, "Flag ... > > instead? > Done. by "instead" i mean you to leave the if unchanged. thanks,