Searched refs:gfc_create_var (Results 1 - 20 of 20) sorted by relevance

/netbsd-current/external/gpl3/gcc.old/dist/gcc/fortran/
H A Dtrans-stmt.c314 size = gfc_create_var (gfc_array_index_type, NULL);
315 data = gfc_create_var (pvoid_type_node, NULL);
946 stat = gfc_create_var (integer_type_node, "stat");
953 lock_acquired = gfc_create_var (integer_type_node, "acquired");
1144 stat = gfc_create_var (integer_type_node, "stat");
1296 tree tmp_stat = gfc_create_var (integer_type_node, "stat");
1362 tree tmp_stat = gfc_create_var (integer_type_node, "stat");
1797 tmp = gfc_create_var (TREE_TYPE (TREE_TYPE (desc)), "class");
2114 ctree = gfc_create_var (dtmp, "class");
2341 saved_dovar = gfc_create_var (typ
[all...]
H A Dtrans-intrinsic.c310 var = gfc_create_var (type, "str");
998 res = gfc_create_var (integer_type_node, NULL);
1095 var = gfc_create_var (gfc_get_caf_vector_type (ar->dimen), "vector");
1238 tmp = gfc_create_var (gfc_get_caf_reference_type (), "caf_ref");
1729 res_var = gfc_create_var (type, "caf_res");
1822 res_var = gfc_create_var (type, "caf_res");
2497 m = gfc_create_var (type, NULL);
2498 ml = gfc_create_var (type, NULL);
2499 loop_var = gfc_create_var (integer_type_node, NULL);
2500 min_var = gfc_create_var (integer_type_nod
[all...]
H A Dtrans-io.c712 tree tmpvar = gfc_create_var (TREE_TYPE (TREE_TYPE (p->field)),
1052 var = gfc_create_var (st_parameter[IOPARM_ptype_open].type, "open_parm");
1172 var = gfc_create_var (st_parameter[IOPARM_ptype_close].type, "close_parm");
1227 var = gfc_create_var (st_parameter[IOPARM_ptype_filepos].type,
1313 var = gfc_create_var (st_parameter[IOPARM_ptype_inquire].type,
1510 var = gfc_create_var (st_parameter[IOPARM_ptype_wait].type,
1840 var = gfc_create_var (st_parameter[IOPARM_ptype_dt].type, "dt_parm");
H A Dtrans-expr.c73 desc = gfc_create_var (type, "desc");
79 tmp = gfc_create_var (TREE_TYPE (scalar), "scalar");
633 var = gfc_create_var (tmp, "class");
858 var = gfc_create_var (var, "class");
909 var = gfc_create_var (tmp, "class");
1098 var = gfc_create_var (tmp, "class");
1407 index = gfc_create_var (gfc_array_index_type, "S");
1876 var = gfc_create_var (TREE_TYPE (se->expr), NULL);
3564 var = gfc_create_var (tmp, "str");
3570 var = gfc_create_var (typ
[all...]
H A Dtrans.c96 gfc_create_var (tree type, const char *prefix) function
120 var = gfc_create_var (TREE_TYPE (expr), NULL);
570 tmpvar = gfc_create_var (logical_type_node, "print_warning");
642 res = gfc_create_var (prvoid_type_node, NULL);
1710 res = gfc_create_var (type, NULL);
H A Dtrans-openmp.c449 tree index = gfc_create_var (gfc_array_index_type, "S");
646 ptr = gfc_create_var (pvoid_type_node, NULL);
754 ptr = gfc_create_var (pvoid_type_node, NULL);
877 ptr = gfc_create_var (pvoid_type_node, NULL);
999 tree desta, srca, index = gfc_create_var (gfc_array_index_type, "S");
1111 ptr = gfc_create_var (pvoid_type_node, NULL);
2595 = gfc_create_var (gfc_array_index_type, NULL);
2634 tree var = gfc_create_var (gfc_array_index_type,
3920 tree accum = gfc_create_var (TREE_TYPE (rse.expr), NULL);
4238 count = gfc_create_var (typ
[all...]
H A Dtrans-array.c1075 tmp = gfc_create_var (tmp, "A");
1105 packed = gfc_create_var (build_pointer_type (tmp), "data");
1475 desc = gfc_create_var (type, "atmp");
1989 shadow_loopvar = gfc_create_var (type, "shadow_loopvar");
2076 tmp = gfc_create_var (tmptype, "data");
2665 first_len_val = gfc_create_var (gfc_charlen_type_node, "len");
4096 loop->loopvar[n] = gfc_create_var (gfc_array_index_type, "S");
4311 loop->loopvar[n] = gfc_create_var (gfc_array_index_type, "Q");
5882 var = gfc_create_var (TREE_TYPE (size), "size");
6069 var_overflow = gfc_create_var (integer_type_nod
[all...]
H A Dtrans.h478 tree gfc_create_var (tree, const char *);
H A Dtrans-common.c353 decl = gfc_create_var (union_type, "equiv");
H A Dtrans-decl.c4449 gfc_desc = gfc_create_var (TREE_TYPE (CFI_desc), "gfc_desc");
4451 gfc_desc_ptr = gfc_create_var (tmp, "gfc_desc_ptr");
4452 CFI_desc_ptr = gfc_create_var (pvoid_type_node, "CFI_desc_ptr");
6823 recurcheckvar = gfc_create_var (logical_type_node, "is_recursive");
/netbsd-current/external/gpl3/gcc/dist/gcc/fortran/
H A Dtrans-stmt.cc321 size = gfc_create_var (gfc_array_index_type, NULL);
322 data = gfc_create_var (pvoid_type_node, NULL);
980 stat = gfc_create_var (integer_type_node, "stat");
987 lock_acquired = gfc_create_var (integer_type_node, "acquired");
1178 stat = gfc_create_var (integer_type_node, "stat");
1332 tree tmp_stat = gfc_create_var (integer_type_node, "stat");
1398 tree tmp_stat = gfc_create_var (integer_type_node, "stat");
1834 tmp = gfc_create_var (TREE_TYPE (TREE_TYPE (desc)), "class");
2152 ctree = gfc_create_var (dtmp, "class");
2379 saved_dovar = gfc_create_var (typ
[all...]
H A Dtrans-intrinsic.cc315 var = gfc_create_var (type, "str");
1006 res = gfc_create_var (integer_type_node, NULL);
1103 var = gfc_create_var (gfc_get_caf_vector_type (ar->dimen), "vector");
1246 tmp = gfc_create_var (gfc_get_caf_reference_type (), "caf_ref");
1737 res_var = gfc_create_var (type, "caf_res");
1830 res_var = gfc_create_var (type, "caf_res");
2505 m = gfc_create_var (type, NULL);
2506 ml = gfc_create_var (type, NULL);
2507 loop_var = gfc_create_var (integer_type_node, NULL);
2508 min_var = gfc_create_var (integer_type_nod
[all...]
H A Dtrans-io.cc712 tree tmpvar = gfc_create_var (TREE_TYPE (TREE_TYPE (p->field)),
1078 var = gfc_create_var (st_parameter[IOPARM_ptype_open].type, "open_parm");
1198 var = gfc_create_var (st_parameter[IOPARM_ptype_close].type, "close_parm");
1253 var = gfc_create_var (st_parameter[IOPARM_ptype_filepos].type,
1339 var = gfc_create_var (st_parameter[IOPARM_ptype_inquire].type,
1536 var = gfc_create_var (st_parameter[IOPARM_ptype_wait].type,
1865 var = gfc_create_var (st_parameter[IOPARM_ptype_dt].type, "dt_parm");
H A Dtrans-expr.cc113 desc = gfc_create_var (type, "desc");
119 tmp = gfc_create_var (TREE_TYPE (scalar), "scalar");
716 var = gfc_create_var (tmp, "class");
836 *derived_array = gfc_create_var (TREE_TYPE (parmse->expr),
952 var = gfc_create_var (var, "class");
1003 var = gfc_create_var (tmp, "class");
1192 var = gfc_create_var (tmp, "class");
1501 index = gfc_create_var (gfc_array_index_type, "S");
1970 var = gfc_create_var (TREE_TYPE (se->expr), NULL);
3666 var = gfc_create_var (tm
[all...]
H A Dtrans.cc140 gfc_create_var (tree type, const char *prefix) function
164 var = gfc_create_var (TREE_TYPE (expr), NULL);
644 tmpvar = gfc_create_var (boolean_type_node, "print_warning");
715 res = gfc_create_var (prvoid_type_node, NULL);
1783 res = gfc_create_var (type, NULL);
H A Dtrans-array.cc1143 tmp = gfc_create_var (tmp, "A");
1173 packed = gfc_create_var (build_pointer_type (tmp), "data");
1543 desc = gfc_create_var (type, "atmp");
1562 tmp = gfc_create_var (TREE_TYPE (class_expr), "ctmp");
2085 shadow_loopvar = gfc_create_var (type, "shadow_loopvar");
2172 tmp = gfc_create_var (tmptype, "data");
2761 first_len_val = gfc_create_var (gfc_charlen_type_node, "len");
4200 loop->loopvar[n] = gfc_create_var (gfc_array_index_type, "S");
4415 loop->loopvar[n] = gfc_create_var (gfc_array_index_type, "Q");
5992 var = gfc_create_var (TREE_TYP
[all...]
H A Dtrans-decl.cc6985 tree cond_var = gfc_create_var (boolean_type_node, "do_copyin");
7009 idx = gfc_create_var (TREE_TYPE (rank), "idx");
7033 size_var = gfc_create_var (size_type_node, "size");
7066 idx = gfc_create_var (size_type_node, "arrayidx");
7068 tree shift = gfc_create_var (size_type_node, "shift");
7069 tree tmpidx = gfc_create_var (size_type_node, "tmpidx");
7074 tree dim = gfc_create_var (TREE_TYPE (rank), "dim");
7180 idx = gfc_create_var (TREE_TYPE (rank), "idx");
7307 idx = gfc_create_var (size_type_node, "arrayidx");
7309 tree shift = gfc_create_var (size_type_nod
[all...]
H A Dtrans.h478 tree gfc_create_var (tree, const char *);
H A Dtrans-openmp.cc538 tree index = gfc_create_var (gfc_array_index_type, "S");
748 ptr = gfc_create_var (pvoid_type_node, NULL);
939 ptr = gfc_create_var (pvoid_type_node, NULL);
1062 ptr = gfc_create_var (pvoid_type_node, NULL);
1184 tree desta, srca, index = gfc_create_var (gfc_array_index_type, "S");
1296 ptr = gfc_create_var (pvoid_type_node, NULL);
3229 = gfc_create_var (gfc_array_index_type, NULL);
3268 tree var = gfc_create_var (gfc_array_index_type,
4804 tree accum = gfc_create_var (TREE_TYPE (rse.expr), NULL);
5189 count = gfc_create_var (typ
[all...]
H A Dtrans-common.cc360 decl = gfc_create_var (union_type, "equiv");

Completed in 602 milliseconds