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;