Lines Matching refs:rkind
3531 int rkind, ikind, jkind; in gfc_build_intrinsic_function_decls() local
3557 for (rkind = 0; rkind < NRKINDS; rkind ++) in gfc_build_intrinsic_function_decls()
3559 rtype = gfc_get_real_type (rkinds[rkind]); in gfc_build_intrinsic_function_decls()
3562 sprintf (name, PREFIX("pow_r%d_i%d"), rkinds[rkind], in gfc_build_intrinsic_function_decls()
3564 gfor_fndecl_math_powi[rkind][ikind].real = in gfc_build_intrinsic_function_decls()
3567 TREE_READONLY (gfor_fndecl_math_powi[rkind][ikind].real) = 1; in gfc_build_intrinsic_function_decls()
3568 TREE_NOTHROW (gfor_fndecl_math_powi[rkind][ikind].real) = 1; in gfc_build_intrinsic_function_decls()
3571 ctype = gfc_get_complex_type (rkinds[rkind]); in gfc_build_intrinsic_function_decls()
3574 sprintf (name, PREFIX("pow_c%d_i%d"), rkinds[rkind], in gfc_build_intrinsic_function_decls()
3576 gfor_fndecl_math_powi[rkind][ikind].cmplx = in gfc_build_intrinsic_function_decls()
3579 TREE_READONLY (gfor_fndecl_math_powi[rkind][ikind].cmplx) = 1; in gfc_build_intrinsic_function_decls()
3580 TREE_NOTHROW (gfor_fndecl_math_powi[rkind][ikind].cmplx) = 1; in gfc_build_intrinsic_function_decls()