PATCH: PR fortran/42517: -fcheck=recursion does not work with -fopenmp

Steve Kargl sgk@troutmask.apl.washington.edu
Tue Jan 5 14:50:00 GMT 2010


On Tue, Jan 05, 2010 at 03:19:26PM +0100, Tobias Burnus wrote:
> 
> +  /* Implied -frecursive; implemented as -fmax-stack-var-size=-1.  */

This comment looks wrong

> +  if (gfc_option.flag_max_stack_var_size == -2 && gfc_option.flag_openmp
> +      && gfc_option.flag_automatic)

given the -2 here.

> +    {
> +      gfc_option.flag_recursive = 1;
> +      gfc_option.flag_max_stack_var_size = -1;
> +    }
> +

-- 
Steve



More information about the Fortran mailing list