Re: [PATCH,fortran] Add pre-defined macros for different available types

[Steve Kargl]

> +    }
> +
> +  for (int_info = gfc_integer_kinds; int_info->kind != 0; int_info++)
> +    {
> +      if (int_info->kind == 1)
> +     cpp_define (cpp_in, "__GFC_INT_1__=1");
> +      if (int_info->kind == 2)
> +     cpp_define (cpp_in, "__GFC_INT_2__=1");
> +      if (int_info->kind == 8)
> +     cpp_define (cpp_in, "__GFC_INT_8__=1");
> +      if (int_info->kind == 8)

yes, that's suppose to be 16.

> +     cpp_define (cpp_in, "__GFC_INT_16__=1");
> +    }
> +
> +  for (real_info = gfc_real_kinds; real_info->kind != 0; real_info++)
> +    {
> +      if (real_info->kind == 10)
> +     cpp_define (cpp_in, "__GFC_REAL_10__=1");
> +      if (real_info->kind == 16)
> +     cpp_define (cpp_in, "__GFC_REAL_16__=1");
>      }