Home
last modified time | relevance | path

Searched refs:rkind (Results 1 – 15 of 15) sorted by relevance

/netbsd-src/external/gpl3/gcc/dist/libgfortran/m4/
H A Dmisc_specifics.m423 foreach(`ikind', `(4, 8, 16)', `foreach(`rkind', `(4, 8, 10, 16)', `
24 `#if defined (HAVE_GFC_REAL_'rkind`) && defined (HAVE_GFC_INTEGER_'ikind`)'
25 elemental function _gfortran_specific__nint_`'ikind`_'rkind (parm)
26 real (kind=rkind) , intent (in) :: parm
27 integer (kind=ikind) :: _gfortran_specific__nint_`'ikind`_'rkind
28 _gfortran_specific__nint_`'ikind`_'rkind = nint (parm)
/netbsd-src/external/gpl3/gcc.old/dist/libgfortran/m4/
H A Dmisc_specifics.m423 foreach(`ikind', `(4, 8, 16)', `foreach(`rkind', `(4, 8, 10, 16)', `
24 `#if defined (HAVE_GFC_REAL_'rkind`) && defined (HAVE_GFC_INTEGER_'ikind`)'
25 elemental function _gfortran_specific__nint_`'ikind`_'rkind (parm)
26 real (kind=rkind) , intent (in) :: parm
27 integer (kind=ikind) :: _gfortran_specific__nint_`'ikind`_'rkind
28 _gfortran_specific__nint_`'ikind`_'rkind = nint (parm)
/netbsd-src/external/gpl3/gcc.old/dist/gcc/
H A Dgimple-fold.c1289 get_range_strlen_tree (tree arg, bitmap *visited, strlen_range_kind rkind, in get_range_strlen_tree() argument
1313 return get_range_strlen (TREE_OPERAND (aop0, 0), visited, rkind, in get_range_strlen_tree()
1317 && rkind == SRK_LENRANGE) in get_range_strlen_tree()
1335 if (rkind == SRK_INT_VALUE) in get_range_strlen_tree()
1361 if (!val && rkind == SRK_LENRANGE) in get_range_strlen_tree()
1364 return get_range_strlen (TREE_OPERAND (arg, 0), visited, rkind, in get_range_strlen_tree()
1507 || (rkind != SRK_STRLEN in get_range_strlen_tree()
1538 if (rkind == SRK_LENRANGE) in get_range_strlen_tree()
1574 if (rkind != SRK_STRLEN) in get_range_strlen_tree()
1593 return rkind == SRK_LENRANGE || !integer_all_onesp (val); in get_range_strlen_tree()
[all …]
H A Dgimplify.c7272 const char *rkind; in oacc_default_clause() local
7304 rkind = "kernels"; in oacc_default_clause()
7324 rkind = ctx->region_type == ORT_ACC_PARALLEL ? "parallel" : "serial"; in oacc_default_clause()
7354 DECL_NAME (lang_hooks.decls.omp_report_decl (decl)), rkind); in oacc_default_clause()
7355 inform (ctx->location, "enclosing OpenACC %qs construct", rkind); in oacc_default_clause()
/netbsd-src/external/cddl/osnet/dist/lib/libdtrace/common/
H A Ddt_parser.c348 uint_t rkind = ctf_type_kind(rfp, rbase); in dt_type_promote() local
355 assert(rkind == CTF_K_INTEGER || rkind == CTF_K_ENUM); in dt_type_promote()
362 if (rkind == CTF_K_ENUM) { in dt_type_promote()
1056 uint_t lkind = 0, rkind = 0; // XXX: gcc in dt_node_is_ptrcompat() local
1102 rkind = ctf_type_kind(rfp, rbase); in dt_node_is_ptrcompat()
1104 if (rkind == CTF_K_POINTER) { in dt_node_is_ptrcompat()
1107 } else if (rkind == CTF_K_ARRAY && in dt_node_is_ptrcompat()
1120 lkind = rkind; in dt_node_is_ptrcompat()
1125 rkind = lkind; in dt_node_is_ptrcompat()
1139 (rkind == CTF_K_POINTER || rkind == CTF_K_ARRAY) && in dt_node_is_ptrcompat()
[all …]
/netbsd-src/external/gpl3/binutils/dist/libctf/
H A Dctf-types.c1288 uint32_t lkind, rkind; in ctf_type_compat() local
1298 rkind = ctf_type_kind (rfp, rtype); in ctf_type_compat()
1307 if (((lkind == CTF_K_ENUM) && (rkind == CTF_K_INTEGER)) || in ctf_type_compat()
1308 ((rkind == CTF_K_ENUM) && (lkind == CTF_K_INTEGER))) in ctf_type_compat()
1311 if (lkind != rkind) in ctf_type_compat()
/netbsd-src/external/gpl3/binutils.old/dist/libctf/
H A Dctf-types.c1279 uint32_t lkind, rkind; in ctf_type_compat() local
1289 rkind = ctf_type_kind (rfp, rtype); in ctf_type_compat()
1298 if (((lkind == CTF_K_ENUM) && (rkind == CTF_K_INTEGER)) || in ctf_type_compat()
1299 ((rkind == CTF_K_ENUM) && (lkind == CTF_K_INTEGER))) in ctf_type_compat()
1302 if (lkind != rkind) in ctf_type_compat()
/netbsd-src/external/cddl/osnet/dist/common/ctf/
H A Dctf_types.c606 uint_t lkind, rkind; in ctf_type_compat() local
615 rkind = ctf_type_kind(rfp, rtype); in ctf_type_compat()
617 if (lkind != rkind || in ctf_type_compat()
/netbsd-src/external/gpl3/gcc/dist/gcc/
H A Dgimple-fold.cc1537 get_range_strlen_tree (tree arg, bitmap visited, strlen_range_kind rkind, in get_range_strlen_tree() argument
1561 return get_range_strlen (TREE_OPERAND (aop0, 0), visited, rkind, in get_range_strlen_tree()
1565 && rkind == SRK_LENRANGE) in get_range_strlen_tree()
1583 if (rkind == SRK_INT_VALUE) in get_range_strlen_tree()
1609 if (!val && rkind == SRK_LENRANGE) in get_range_strlen_tree()
1612 return get_range_strlen (TREE_OPERAND (arg, 0), visited, rkind, in get_range_strlen_tree()
1755 || (rkind != SRK_STRLEN in get_range_strlen_tree()
1786 if (rkind == SRK_LENRANGE) in get_range_strlen_tree()
1822 if (rkind != SRK_STRLEN) in get_range_strlen_tree()
1841 return rkind == SRK_LENRANGE || !integer_all_onesp (val); in get_range_strlen_tree()
[all …]
H A Dgimplify.cc7617 const char *rkind; in oacc_default_clause() local
7649 rkind = "kernels"; in oacc_default_clause()
7669 rkind = ctx->region_type == ORT_ACC_PARALLEL ? "parallel" : "serial"; in oacc_default_clause()
7699 DECL_NAME (lang_hooks.decls.omp_report_decl (decl)), rkind); in oacc_default_clause()
7700 inform (ctx->location, "enclosing OpenACC %qs construct", rkind); in oacc_default_clause()
H A DChangeLog-201831 strlen_range_kind instead of type+fuzzy. Pass rkind down to
32 get_range_strlen. Check the rkind enum value instead of
/netbsd-src/external/gpl3/gcc.old/dist/gcc/fortran/
H A Dtrans-decl.c3531 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()
[all …]
/netbsd-src/external/gpl3/gcc/dist/gcc/fortran/
H A Dtrans-decl.cc3578 int rkind, ikind, jkind; in gfc_build_intrinsic_function_decls() local
3604 for (rkind = 0; rkind < NRKINDS; rkind ++) in gfc_build_intrinsic_function_decls()
3606 rtype = gfc_get_real_type (rkinds[rkind]); in gfc_build_intrinsic_function_decls()
3610 gfc_type_abi_kind (BT_REAL, rkinds[rkind]), in gfc_build_intrinsic_function_decls()
3612 gfor_fndecl_math_powi[rkind][ikind].real = in gfc_build_intrinsic_function_decls()
3615 TREE_READONLY (gfor_fndecl_math_powi[rkind][ikind].real) = 1; in gfc_build_intrinsic_function_decls()
3616 TREE_NOTHROW (gfor_fndecl_math_powi[rkind][ikind].real) = 1; in gfc_build_intrinsic_function_decls()
3619 ctype = gfc_get_complex_type (rkinds[rkind]); in gfc_build_intrinsic_function_decls()
3623 gfc_type_abi_kind (BT_REAL, rkinds[rkind]), in gfc_build_intrinsic_function_decls()
3625 gfor_fndecl_math_powi[rkind][ikind].cmplx = in gfc_build_intrinsic_function_decls()
[all …]
/netbsd-src/external/gpl3/gcc/dist/gcc/config/alpha/
H A Dalpha.cc9558 enum reloc_kind rkind; member
9647 al->rkind = rflag ? KIND_CODEADDR : KIND_LINKAGE; in alpha_use_linkage()
9659 if (link->rkind == KIND_CODEADDR) in alpha_write_one_linkage()
/netbsd-src/external/gpl3/gcc.old/dist/gcc/config/alpha/
H A Dalpha.c9553 enum reloc_kind rkind; member
9642 al->rkind = rflag ? KIND_CODEADDR : KIND_LINKAGE; in alpha_use_linkage()
9654 if (link->rkind == KIND_CODEADDR) in alpha_write_one_linkage()