| /netbsd/external/gpl3/gcc.old/dist/gcc/fortran/ |
| H A D | arith.h | 35 int gfc_compare_expr (gfc_expr *, gfc_expr *, gfc_intrinsic_op);
55 gfc_expr *gfc_eq (gfc_expr *, gfc_expr *, gfc_intrinsic_op);
56 gfc_expr *gfc_ne (gfc_expr *, gfc_expr *, gfc_intrinsic_op);
57 gfc_expr *gfc_gt (gfc_expr *, gfc_expr *, gfc_intrinsic_op);
58 gfc_expr *gfc_ge (gfc_expr *, gfc_expr *, gfc_intrinsic_op);
59 gfc_expr *gfc_lt (gfc_expr *, gfc_expr *, gfc_intrinsic_op);
60 gfc_expr *gfc_le (gfc_expr *, gfc_expr *, gfc_intrinsic_op);
|
| H A D | matchexp.c | 110 next_operator (gfc_intrinsic_op t) in next_operator()
112 gfc_intrinsic_op u; in next_operator()
354 gfc_intrinsic_op i; in match_add_operand()
594 gfc_intrinsic_op i; in match_level_4()
809 gfc_intrinsic_op i; in match_level_5()
|
| H A D | arith.c | 1029 compare_real (gfc_expr *op1, gfc_expr *op2, gfc_intrinsic_op op) in compare_real()
1462 eval_intrinsic (gfc_intrinsic_op op, in eval_intrinsic()
1650 eval_type_intrinsic0 (gfc_intrinsic_op iop, gfc_expr *op) in eval_type_intrinsic0()
1717 eval_intrinsic_f2 (gfc_intrinsic_op op, in eval_intrinsic_f2()
1742 eval_intrinsic_f3 (gfc_intrinsic_op op, in eval_intrinsic_f3()
1860 gfc_eq (gfc_expr *op1, gfc_expr *op2, gfc_intrinsic_op op) in gfc_eq()
1867 gfc_ne (gfc_expr *op1, gfc_expr *op2, gfc_intrinsic_op op) in gfc_ne()
1874 gfc_gt (gfc_expr *op1, gfc_expr *op2, gfc_intrinsic_op op) in gfc_gt()
1881 gfc_ge (gfc_expr *op1, gfc_expr *op2, gfc_intrinsic_op op) in gfc_ge()
1888 gfc_lt (gfc_expr *op1, gfc_expr *op2, gfc_intrinsic_op op) in gfc_lt()
[all …]
|
| H A D | match.h | 57 match gfc_match_intrinsic_op (gfc_intrinsic_op *);
307 match gfc_match_generic_spec (interface_type *, char *, gfc_intrinsic_op *);
|
| H A D | gfortran.h | 168 enum gfc_intrinsic_op enum
1716 gfc_intrinsic_op op;
1957 gfc_intrinsic_op op;
2269 gfc_intrinsic_op op;
2936 const char *gfc_op2string (gfc_intrinsic_op);
3316 gfc_expr *gfc_get_operator_expr (locus *, gfc_intrinsic_op,gfc_expr *, gfc_expr *);
3484 bool gfc_check_operator_interface (gfc_symbol*, gfc_intrinsic_op, locus);
3486 gfc_intrinsic_op gfc_equivalent_op (gfc_intrinsic_op);
3599 gfc_intrinsic_op, bool,
|
| H A D | interface.c | 99 static gfc_intrinsic_op
100 fold_unary_intrinsic (gfc_intrinsic_op op) in fold_unary_intrinsic()
122 static gfc_intrinsic_op
140 gfc_intrinsic_op *op) in gfc_match_generic_spec()
144 gfc_intrinsic_op i; in gfc_match_generic_spec()
239 gfc_intrinsic_op op; in gfc_match_interface()
330 gfc_intrinsic_op op; in gfc_match_end_interface()
2059 gfc_intrinsic_op
2060 gfc_equivalent_op (gfc_intrinsic_op op) in gfc_equivalent_op()
2144 gfc_intrinsic_op other_op; in gfc_check_interfaces()
[all …]
|
| H A D | module.c | 527 gfc_intrinsic_op op; in gfc_match_use()
924 find_use_operator (gfc_intrinsic_op op) in find_use_operator()
1831 mio_intrinsic_op (gfc_intrinsic_op* op) in mio_intrinsic_op()
1842 *op = (gfc_intrinsic_op) atom_int; in mio_intrinsic_op()
2161 DECL_MIO_NAME (gfc_intrinsic_op) in DECL_MIO_NAME()
3595 = MIO_NAME (gfc_intrinsic_op) (e->value.op.op, intrinsics); in mio_expr()
4121 gfc_intrinsic_op realop; in mio_f2k_derived()
4127 realop = (gfc_intrinsic_op) op; in mio_f2k_derived()
4136 gfc_intrinsic_op op = GFC_INTRINSIC_BEGIN; /* Silence GCC. */ in mio_f2k_derived()
4923 else if (only_flag && find_use_operator ((gfc_intrinsic_op) rop) == NULL) in load_omp_udrs()
[all …]
|
| H A D | frontend-passes.c | 36 static bool optimize_comparison (gfc_expr *, gfc_intrinsic_op);
436 gfc_intrinsic_op op; in callback_reduction()
1876 gfc_intrinsic_op op = e->value.op.op; in optimize_op()
1997 optimize_comparison (gfc_expr *e, gfc_intrinsic_op op) in optimize_comparison()
3008 build_logical_expr (gfc_intrinsic_op op, gfc_expr *e1, gfc_expr *e2) in build_logical_expr()
3031 get_operand (gfc_intrinsic_op op, gfc_expr *e1, gfc_expr *e2) in get_operand()
3838 gfc_intrinsic_op op_times, op_plus; in inline_matmul_assign()
|
| H A D | dump-parse-tree.c | 1042 gfc_op2string ((gfc_intrinsic_op) op)); in show_f2k_derived()
1291 gfc_op2string ((gfc_intrinsic_op) n->u.reduction_op)); in show_omp_namelist()
3140 gfc_op2string ((gfc_intrinsic_op) op)); in show_namespace()
|
| /netbsd/external/gpl3/gcc/dist/gcc/fortran/ |
| H A D | arith.h | 35 int gfc_compare_expr (gfc_expr *, gfc_expr *, gfc_intrinsic_op);
55 gfc_expr *gfc_eq (gfc_expr *, gfc_expr *, gfc_intrinsic_op);
56 gfc_expr *gfc_ne (gfc_expr *, gfc_expr *, gfc_intrinsic_op);
57 gfc_expr *gfc_gt (gfc_expr *, gfc_expr *, gfc_intrinsic_op);
58 gfc_expr *gfc_ge (gfc_expr *, gfc_expr *, gfc_intrinsic_op);
59 gfc_expr *gfc_lt (gfc_expr *, gfc_expr *, gfc_intrinsic_op);
60 gfc_expr *gfc_le (gfc_expr *, gfc_expr *, gfc_intrinsic_op);
|
| H A D | matchexp.c | 110 next_operator (gfc_intrinsic_op t) in next_operator()
112 gfc_intrinsic_op u; in next_operator()
354 gfc_intrinsic_op i; in match_add_operand()
594 gfc_intrinsic_op i; in match_level_4()
809 gfc_intrinsic_op i; in match_level_5()
|
| H A D | matchexp.cc | 110 next_operator (gfc_intrinsic_op t) in next_operator()
112 gfc_intrinsic_op u; in next_operator()
354 gfc_intrinsic_op i; in match_add_operand()
594 gfc_intrinsic_op i; in match_level_4()
809 gfc_intrinsic_op i; in match_level_5()
|
| H A D | arith.c | 1029 compare_real (gfc_expr *op1, gfc_expr *op2, gfc_intrinsic_op op) in compare_real()
1462 eval_intrinsic (gfc_intrinsic_op op, in eval_intrinsic()
1650 eval_type_intrinsic0 (gfc_intrinsic_op iop, gfc_expr *op) in eval_type_intrinsic0()
1717 eval_intrinsic_f2 (gfc_intrinsic_op op, in eval_intrinsic_f2()
1742 eval_intrinsic_f3 (gfc_intrinsic_op op, in eval_intrinsic_f3()
1860 gfc_eq (gfc_expr *op1, gfc_expr *op2, gfc_intrinsic_op op) in gfc_eq()
1867 gfc_ne (gfc_expr *op1, gfc_expr *op2, gfc_intrinsic_op op) in gfc_ne()
1874 gfc_gt (gfc_expr *op1, gfc_expr *op2, gfc_intrinsic_op op) in gfc_gt()
1881 gfc_ge (gfc_expr *op1, gfc_expr *op2, gfc_intrinsic_op op) in gfc_ge()
1888 gfc_lt (gfc_expr *op1, gfc_expr *op2, gfc_intrinsic_op op) in gfc_lt()
[all …]
|
| H A D | arith.cc | 1028 compare_real (gfc_expr *op1, gfc_expr *op2, gfc_intrinsic_op op) in compare_real()
1501 eval_intrinsic (gfc_intrinsic_op op, in eval_intrinsic()
1692 eval_type_intrinsic0 (gfc_intrinsic_op iop, gfc_expr *op) in eval_type_intrinsic0()
1759 eval_intrinsic_f2 (gfc_intrinsic_op op, in eval_intrinsic_f2()
1784 eval_intrinsic_f3 (gfc_intrinsic_op op, in eval_intrinsic_f3()
1905 gfc_eq (gfc_expr *op1, gfc_expr *op2, gfc_intrinsic_op op) in gfc_eq()
1912 gfc_ne (gfc_expr *op1, gfc_expr *op2, gfc_intrinsic_op op) in gfc_ne()
1919 gfc_gt (gfc_expr *op1, gfc_expr *op2, gfc_intrinsic_op op) in gfc_gt()
1926 gfc_ge (gfc_expr *op1, gfc_expr *op2, gfc_intrinsic_op op) in gfc_ge()
1933 gfc_lt (gfc_expr *op1, gfc_expr *op2, gfc_intrinsic_op op) in gfc_lt()
[all …]
|
| H A D | match.h | 54 match gfc_match_intrinsic_op (gfc_intrinsic_op *);
318 match gfc_match_generic_spec (interface_type *, char *, gfc_intrinsic_op *);
|
| H A D | gfortran.h | 202 enum gfc_intrinsic_op enum
1971 gfc_intrinsic_op op;
2222 gfc_intrinsic_op op;
2558 gfc_intrinsic_op op;
3221 const char *gfc_op2string (gfc_intrinsic_op);
3607 gfc_expr *gfc_get_operator_expr (locus *, gfc_intrinsic_op,gfc_expr *, gfc_expr *);
3769 bool gfc_check_operator_interface (gfc_symbol*, gfc_intrinsic_op, locus);
3771 gfc_intrinsic_op gfc_equivalent_op (gfc_intrinsic_op);
3884 gfc_intrinsic_op, bool,
|
| H A D | interface.c | 99 static gfc_intrinsic_op
100 fold_unary_intrinsic (gfc_intrinsic_op op) in fold_unary_intrinsic()
122 static gfc_intrinsic_op
140 gfc_intrinsic_op *op) in gfc_match_generic_spec()
144 gfc_intrinsic_op i; in gfc_match_generic_spec()
239 gfc_intrinsic_op op; in gfc_match_interface()
330 gfc_intrinsic_op op; in gfc_match_end_interface()
2059 gfc_intrinsic_op
2060 gfc_equivalent_op (gfc_intrinsic_op op) in gfc_equivalent_op()
2144 gfc_intrinsic_op other_op; in gfc_check_interfaces()
[all …]
|
| H A D | interface.cc | 99 static gfc_intrinsic_op
100 fold_unary_intrinsic (gfc_intrinsic_op op) in fold_unary_intrinsic()
122 static gfc_intrinsic_op
140 gfc_intrinsic_op *op) in gfc_match_generic_spec()
144 gfc_intrinsic_op i; in gfc_match_generic_spec()
239 gfc_intrinsic_op op; in gfc_match_interface()
330 gfc_intrinsic_op op; in gfc_match_end_interface()
2071 gfc_intrinsic_op
2072 gfc_equivalent_op (gfc_intrinsic_op op) in gfc_equivalent_op()
2156 gfc_intrinsic_op other_op; in gfc_check_interfaces()
[all …]
|
| H A D | module.cc | 527 gfc_intrinsic_op op; in gfc_match_use()
924 find_use_operator (gfc_intrinsic_op op) in find_use_operator()
1872 mio_intrinsic_op (gfc_intrinsic_op* op) in mio_intrinsic_op()
1883 *op = (gfc_intrinsic_op) atom_int; in mio_intrinsic_op()
2219 DECL_MIO_NAME (gfc_intrinsic_op) in DECL_MIO_NAME()
3741 = MIO_NAME (gfc_intrinsic_op) (e->value.op.op, intrinsics); in mio_expr()
4267 gfc_intrinsic_op realop; in mio_f2k_derived()
4273 realop = (gfc_intrinsic_op) op; in mio_f2k_derived()
4282 gfc_intrinsic_op op = GFC_INTRINSIC_BEGIN; /* Silence GCC. */ in mio_f2k_derived()
5604 u = find_use_operator ((gfc_intrinsic_op) i); in read_module()
[all …]
|
| H A D | module.c | 527 gfc_intrinsic_op op; in gfc_match_use()
924 find_use_operator (gfc_intrinsic_op op) in find_use_operator()
1831 mio_intrinsic_op (gfc_intrinsic_op* op) in mio_intrinsic_op()
1842 *op = (gfc_intrinsic_op) atom_int; in mio_intrinsic_op()
2161 DECL_MIO_NAME (gfc_intrinsic_op) in DECL_MIO_NAME()
3595 = MIO_NAME (gfc_intrinsic_op) (e->value.op.op, intrinsics); in mio_expr()
4121 gfc_intrinsic_op realop; in mio_f2k_derived()
4127 realop = (gfc_intrinsic_op) op; in mio_f2k_derived()
4136 gfc_intrinsic_op op = GFC_INTRINSIC_BEGIN; /* Silence GCC. */ in mio_f2k_derived()
4923 else if (only_flag && find_use_operator ((gfc_intrinsic_op) rop) == NULL) in load_omp_udrs()
[all …]
|
| H A D | frontend-passes.c | 36 static bool optimize_comparison (gfc_expr *, gfc_intrinsic_op);
436 gfc_intrinsic_op op; in callback_reduction()
1876 gfc_intrinsic_op op = e->value.op.op; in optimize_op()
1997 optimize_comparison (gfc_expr *e, gfc_intrinsic_op op) in optimize_comparison()
3008 build_logical_expr (gfc_intrinsic_op op, gfc_expr *e1, gfc_expr *e2) in build_logical_expr()
3031 get_operand (gfc_intrinsic_op op, gfc_expr *e1, gfc_expr *e2) in get_operand()
3838 gfc_intrinsic_op op_times, op_plus; in inline_matmul_assign()
|
| H A D | frontend-passes.cc | 36 static bool optimize_comparison (gfc_expr *, gfc_intrinsic_op);
436 gfc_intrinsic_op op; in callback_reduction()
1876 gfc_intrinsic_op op = e->value.op.op; in optimize_op()
1997 optimize_comparison (gfc_expr *e, gfc_intrinsic_op op) in optimize_comparison()
3274 build_logical_expr (gfc_intrinsic_op op, gfc_expr *e1, gfc_expr *e2) in build_logical_expr()
3297 get_operand (gfc_intrinsic_op op, gfc_expr *e1, gfc_expr *e2) in get_operand()
4116 gfc_intrinsic_op op_times, op_plus; in inline_matmul_assign()
|
| H A D | dump-parse-tree.c | 1042 gfc_op2string ((gfc_intrinsic_op) op)); in show_f2k_derived()
1291 gfc_op2string ((gfc_intrinsic_op) n->u.reduction_op)); in show_omp_namelist()
3140 gfc_op2string ((gfc_intrinsic_op) op)); in show_namespace()
|
| H A D | dump-parse-tree.cc | 1069 gfc_op2string ((gfc_intrinsic_op) op)); in show_f2k_derived()
1363 gfc_op2string ((gfc_intrinsic_op) n->u.reduction_op)); in show_omp_namelist()
3474 gfc_op2string ((gfc_intrinsic_op) op)); in show_namespace()
|
| H A D | openmp.c | 1659 gfc_op2string ((gfc_intrinsic_op) rop));
2970 gfc_intrinsic_op op; in gfc_match_omp_declare_reduction()
4840 udr_name = gfc_op2string ((gfc_intrinsic_op)
5272 gfc_intrinsic_op op = expr2->value.op.op; in resolve_omp_atomic()
5273 gfc_intrinsic_op alt_op = INTRINSIC_NONE; in resolve_omp_atomic()
|