Home | History | Annotate | Download | only in fortran

Lines Matching defs:rkind

3578     int rkind, ikind, jkind;
3604 for (rkind = 0; rkind < NRKINDS; rkind ++)
3606 rtype = gfc_get_real_type (rkinds[rkind]);
3610 gfc_type_abi_kind (BT_REAL, rkinds[rkind]),
3612 gfor_fndecl_math_powi[rkind][ikind].real =
3615 TREE_READONLY (gfor_fndecl_math_powi[rkind][ikind].real) = 1;
3616 TREE_NOTHROW (gfor_fndecl_math_powi[rkind][ikind].real) = 1;
3619 ctype = gfc_get_complex_type (rkinds[rkind]);
3623 gfc_type_abi_kind (BT_REAL, rkinds[rkind]),
3625 gfor_fndecl_math_powi[rkind][ikind].cmplx =
3628 TREE_READONLY (gfor_fndecl_math_powi[rkind][ikind].cmplx) = 1;
3629 TREE_NOTHROW (gfor_fndecl_math_powi[rkind][ikind].cmplx) = 1;