Home
last modified time | relevance | path

Searched refs:EXPR_CONSTANT (Results 1 – 25 of 72) sorted by relevance

123

/netbsd-src/external/gpl3/gcc/dist/gcc/fortran/
H A Dsimplify.cc83 if (result->expr_type != EXPR_CONSTANT) in range_check()
127 if (k->expr_type != EXPR_CONSTANT) in get_kind()
238 if (c->expr->expr_type != EXPR_CONSTANT in is_constant_array_expr()
258 if (c->expr->expr_type != EXPR_CONSTANT in is_constant_array_expr()
315 else if (e && e->expr_type == EXPR_CONSTANT) in init_result_expr()
522 && mask->expr_type == EXPR_CONSTANT in simplify_transformation_to_scalar()
578 && mask->expr_type == EXPR_CONSTANT in simplify_transformation_to_array()
717 && mask->expr_type != EXPR_CONSTANT) in simplify_transformation()
740 if (e->expr_type != EXPR_CONSTANT) in gfc_simplify_abs()
774 if (e->expr_type != EXPR_CONSTANT) in simplify_achar_char()
[all …]
H A Ddependency.cc66 if (expr->expr_type != EXPR_CONSTANT) in gfc_expr_is_one()
250 if (e1->expr_type == EXPR_CONSTANT in gfc_dep_compare_functions()
252 && e2->expr_type == EXPR_CONSTANT in gfc_dep_compare_functions()
332 if (e1->value.op.op2->expr_type == EXPR_CONSTANT in gfc_dep_compare_expr()
373 if (e2->value.op.op2->expr_type == EXPR_CONSTANT in gfc_dep_compare_expr()
382 if (e1->value.op.op2->expr_type == EXPR_CONSTANT in gfc_dep_compare_expr()
425 if (e1_left->expr_type == EXPR_CONSTANT in gfc_dep_compare_expr()
426 && e2_left->expr_type == EXPR_CONSTANT in gfc_dep_compare_expr()
437 if (e2->value.op.op2->expr_type == EXPR_CONSTANT in gfc_dep_compare_expr()
448 case EXPR_CONSTANT: in gfc_dep_compare_expr()
[all …]
H A Darray.cc436 if (as->lower[i]->expr_type == EXPR_CONSTANT in gfc_resolve_array_spec()
437 && as->upper[i]->expr_type == EXPR_CONSTANT in gfc_resolve_array_spec()
502 if (((*upper)->expr_type == EXPR_CONSTANT in match_array_element_spec()
534 if (((*upper)->expr_type == EXPR_CONSTANT in match_array_element_spec()
1727 if (start->expr_type != EXPR_CONSTANT || start->ts.type != BT_INTEGER) in expand_iterator()
1734 if (end->expr_type != EXPR_CONSTANT || end->ts.type != BT_INTEGER) in expand_iterator()
1741 if (step->expr_type != EXPR_CONSTANT || step->ts.type != BT_INTEGER) in expand_iterator()
2179 && ref->u.ss.start->expr_type == EXPR_CONSTANT in gfc_resolve_character_array_constructor()
2181 && ref->u.ss.end->expr_type == EXPR_CONSTANT) in gfc_resolve_character_array_constructor()
2184 if (p->expr->expr_type == EXPR_CONSTANT) in gfc_resolve_character_array_constructor()
[all …]
H A Dio.cc1328 if (!e || e->ts.type != BT_CHARACTER || e->expr_type != EXPR_CONSTANT) in check_format_string()
1525 if ((*result)->expr_type == EXPR_CONSTANT) in match_out_tag()
1665 if (e->expr_type == EXPR_CONSTANT in resolve_tag_format()
2192 if (open->access && open->access->expr_type == EXPR_CONSTANT) in check_open_constraints()
2206 if (open->action && open->action->expr_type == EXPR_CONSTANT) in check_open_constraints()
2240 if (open->asynchronous->expr_type == EXPR_CONSTANT) in check_open_constraints()
2258 if (open->blank->expr_type == EXPR_CONSTANT) in check_open_constraints()
2270 if (open->cc && open->cc->expr_type == EXPR_CONSTANT) in check_open_constraints()
2286 if (open->decimal->expr_type == EXPR_CONSTANT) in check_open_constraints()
2300 if (open->delim->expr_type == EXPR_CONSTANT) in check_open_constraints()
[all …]
H A Dexpr.cc154 e->expr_type = EXPR_CONSTANT; in gfc_get_constant_expr()
252 e->expr_type = EXPR_CONSTANT; in gfc_get_iokind_expr()
286 case EXPR_CONSTANT: in gfc_copy_expr()
449 case EXPR_CONSTANT: in free_expr0()
662 if (expr->expr_type != EXPR_CONSTANT) in gfc_extract_int()
715 if (expr->expr_type != EXPR_CONSTANT) in gfc_extract_hwi()
852 || dim->expr_type != EXPR_CONSTANT in gfc_copy_shape_excluding()
1083 case EXPR_CONSTANT: in gfc_is_constant_expr()
1383 || ar->as->upper[i]->expr_type != EXPR_CONSTANT in find_array_element()
1384 || ar->as->lower[i]->expr_type != EXPR_CONSTANT) in find_array_element()
[all …]
H A Dtrans-const.cc148 gcc_assert (expr->expr_type == EXPR_CONSTANT); in gfc_conv_string_init()
182 if (cl->length && cl->length->expr_type == EXPR_CONSTANT) in gfc_conv_const_charlen()
302 gcc_assert (expr->expr_type == EXPR_CONSTANT); in gfc_conv_constant_to_tree()
399 if (expr->expr_type != EXPR_CONSTANT) in gfc_conv_constant()
H A Dcheck.cc121 if (a->expr_type != EXPR_CONSTANT) in is_boz_constant()
760 if (expr->expr_type == EXPR_CONSTANT) in nonnegative_check()
781 if (expr->expr_type == EXPR_CONSTANT) in positive_check()
806 if (expr2->expr_type == EXPR_CONSTANT) in less_than_bitsize1()
859 if (expr->expr_type != EXPR_CONSTANT) in less_than_bitsizekind()
885 if (expr2->expr_type == EXPR_CONSTANT && expr3->expr_type == EXPR_CONSTANT) in less_than_bitsize2()
1082 if (dim->expr_type != EXPR_CONSTANT) in dim_corank_check()
1117 if (dim->expr_type != EXPR_CONSTANT) in dim_rank_check()
1206 if ((!ra->u.ss.start || ra->u.ss.start->expr_type == EXPR_CONSTANT) in gfc_var_strlen()
1207 && ra->u.ss.end->expr_type == EXPR_CONSTANT) in gfc_var_strlen()
[all …]
H A Dtarget-memory.cc98 if (e->expr_type == EXPR_CONSTANT) in gfc_element_size()
101 && e->ts.u.cl->length->expr_type == EXPR_CONSTANT in gfc_element_size()
302 gcc_assert (source->expr_type == EXPR_CONSTANT in gfc_target_encode_expr()
330 if (source->expr_type == EXPR_CONSTANT || source->ref == NULL) in gfc_target_encode_expr()
353 gcc_assert (c->expr->expr_type == EXPR_CONSTANT in gfc_target_encode_expr()
736 case EXPR_CONSTANT: in gfc_merge_initializers()
H A Dinterface.cc503 && l1->length->expr_type == EXPR_CONSTANT in compare_components()
504 && l2->length->expr_type == EXPR_CONSTANT in compare_components()
2304 if (e->expr_type == EXPR_CONSTANT) in maybe_dummy_array_arg()
2829 && sym->ts.u.cl->length->expr_type == EXPR_CONSTANT in get_sym_storage_size()
2846 if (sym->as->upper[i]->expr_type != EXPR_CONSTANT in get_sym_storage_size()
2847 || sym->as->lower[i]->expr_type != EXPR_CONSTANT in get_sym_storage_size()
2880 && e->ts.u.cl->length->expr_type == EXPR_CONSTANT in get_expr_storage_size()
2883 else if (e->expr_type == EXPR_CONSTANT in get_expr_storage_size()
2908 && ref->u.ss.start->expr_type == EXPR_CONSTANT) in get_expr_storage_size()
2915 || ref->u.ss.length->length->expr_type != EXPR_CONSTANT) in get_expr_storage_size()
[all …]
H A Dmisc.cc229 if (ex->expr_type == EXPR_CONSTANT) in gfc_typename()
246 || ex->ts.u.cl->length->expr_type != EXPR_CONSTANT) in gfc_typename()
H A Dfrontend-passes.cc547 || (*e)->ts.u.cl->length->expr_type != EXPR_CONSTANT)) in cfe_register_funcs()
639 if (length && length->expr_type == EXPR_CONSTANT) in constant_string_length()
666 && e->symtree->n.sym->ts.u.cl->length->expr_type == EXPR_CONSTANT) in constant_string_length()
769 if (e->expr_type == EXPR_CONSTANT || is_fe_temp (e)) in create_var()
1045 if (co->expr1 == NULL || co->expr1->expr_type == EXPR_CONSTANT) in convert_do_while()
1290 case EXPR_CONSTANT: in traverse_io_block()
1303 || start->value.op.op2->expr_type != EXPR_CONSTANT in traverse_io_block()
1355 case EXPR_CONSTANT: in traverse_io_block()
1817 if (c->expr->expr_type != EXPR_CONSTANT) in combine_array_constructor()
1944 if (e->ts.type != BT_CHARACTER || e->expr_type != EXPR_CONSTANT) in is_empty_string()
[all …]
H A Ddecl.cc290 if (new_var->expr->expr_type == EXPR_CONSTANT in var_element()
413 && (*result)->expr_type == EXPR_CONSTANT in match_data_constant()
470 if ((*result)->expr_type == EXPR_CONSTANT) in match_data_constant()
1097 else if ((*expr)->expr_type == EXPR_CONSTANT) in char_len_param_value()
1611 || cl->length->expr_type != EXPR_CONSTANT in gfc_verify_c_interop_param()
1631 else if (cl->length->expr_type != EXPR_CONSTANT in gfc_verify_c_interop_param()
1857 if (expr->expr_type != EXPR_CONSTANT) in gfc_set_constant_character_len()
2033 if (init->expr_type == EXPR_CONSTANT) in add_init_expr_to_sym()
2045 if (length->expr_type != EXPR_CONSTANT) in add_init_expr_to_sym()
2073 else if (sym->ts.u.cl->length->expr_type == EXPR_CONSTANT) in add_init_expr_to_sym()
[all …]
/netbsd-src/external/gpl3/gcc.old/dist/gcc/fortran/
H A Dsimplify.c83 if (result->expr_type != EXPR_CONSTANT) in range_check()
127 if (k->expr_type != EXPR_CONSTANT) in get_kind()
236 if (c->expr->expr_type != EXPR_CONSTANT in is_constant_array_expr()
283 else if (e && e->expr_type == EXPR_CONSTANT) in init_result_expr()
490 && mask->expr_type == EXPR_CONSTANT in simplify_transformation_to_scalar()
546 && mask->expr_type == EXPR_CONSTANT in simplify_transformation_to_array()
685 && mask->expr_type != EXPR_CONSTANT) in simplify_transformation()
708 if (e->expr_type != EXPR_CONSTANT) in gfc_simplify_abs()
742 if (e->expr_type != EXPR_CONSTANT) in simplify_achar_char()
804 if (x->expr_type != EXPR_CONSTANT) in gfc_simplify_acos()
[all …]
H A Ddependency.c65 if (expr->expr_type != EXPR_CONSTANT) in gfc_expr_is_one()
249 if (e1->expr_type == EXPR_CONSTANT in gfc_dep_compare_functions()
251 && e2->expr_type == EXPR_CONSTANT in gfc_dep_compare_functions()
331 if (e1->value.op.op2->expr_type == EXPR_CONSTANT in gfc_dep_compare_expr()
372 if (e2->value.op.op2->expr_type == EXPR_CONSTANT in gfc_dep_compare_expr()
381 if (e1->value.op.op2->expr_type == EXPR_CONSTANT in gfc_dep_compare_expr()
424 if (e1_left->expr_type == EXPR_CONSTANT in gfc_dep_compare_expr()
425 && e2_left->expr_type == EXPR_CONSTANT in gfc_dep_compare_expr()
436 if (e2->value.op.op2->expr_type == EXPR_CONSTANT in gfc_dep_compare_expr()
447 case EXPR_CONSTANT: in gfc_dep_compare_expr()
[all …]
H A Darray.c429 if (as->lower[i]->expr_type == EXPR_CONSTANT in gfc_resolve_array_spec()
430 && as->upper[i]->expr_type == EXPR_CONSTANT in gfc_resolve_array_spec()
495 if (((*upper)->expr_type == EXPR_CONSTANT in match_array_element_spec()
527 if (((*upper)->expr_type == EXPR_CONSTANT in match_array_element_spec()
956 || bound1->expr_type != EXPR_CONSTANT in compare_bounds()
957 || bound2->expr_type != EXPR_CONSTANT in compare_bounds()
1715 if (start->expr_type != EXPR_CONSTANT || start->ts.type != BT_INTEGER) in expand_iterator()
1722 if (end->expr_type != EXPR_CONSTANT || end->ts.type != BT_INTEGER) in expand_iterator()
1729 if (step->expr_type != EXPR_CONSTANT || step->ts.type != BT_INTEGER) in expand_iterator()
2167 && ref->u.ss.start->expr_type == EXPR_CONSTANT in gfc_resolve_character_array_constructor()
[all …]
H A Dio.c1328 if (!e || e->ts.type != BT_CHARACTER || e->expr_type != EXPR_CONSTANT) in check_format_string()
1525 if ((*result)->expr_type == EXPR_CONSTANT) in match_out_tag()
1665 if (e->expr_type == EXPR_CONSTANT in resolve_tag_format()
2192 if (open->access && open->access->expr_type == EXPR_CONSTANT) in check_open_constraints()
2206 if (open->action && open->action->expr_type == EXPR_CONSTANT) in check_open_constraints()
2240 if (open->asynchronous->expr_type == EXPR_CONSTANT) in check_open_constraints()
2258 if (open->blank->expr_type == EXPR_CONSTANT) in check_open_constraints()
2270 if (open->cc && open->cc->expr_type == EXPR_CONSTANT) in check_open_constraints()
2286 if (open->decimal->expr_type == EXPR_CONSTANT) in check_open_constraints()
2300 if (open->delim->expr_type == EXPR_CONSTANT) in check_open_constraints()
[all …]
H A Dexpr.c154 e->expr_type = EXPR_CONSTANT; in gfc_get_constant_expr()
252 e->expr_type = EXPR_CONSTANT; in gfc_get_iokind_expr()
286 case EXPR_CONSTANT: in gfc_copy_expr()
448 case EXPR_CONSTANT: in free_expr0()
654 if (expr->expr_type != EXPR_CONSTANT) in gfc_extract_int()
707 if (expr->expr_type != EXPR_CONSTANT) in gfc_extract_hwi()
844 || dim->expr_type != EXPR_CONSTANT in gfc_copy_shape_excluding()
1075 case EXPR_CONSTANT: in gfc_is_constant_expr()
1373 || ar->as->upper[i]->expr_type != EXPR_CONSTANT in find_array_element()
1374 || ar->as->lower[i]->expr_type != EXPR_CONSTANT) in find_array_element()
[all …]
H A Dtrans-const.c148 gcc_assert (expr->expr_type == EXPR_CONSTANT); in gfc_conv_string_init()
182 if (cl->length && cl->length->expr_type == EXPR_CONSTANT) in gfc_conv_const_charlen()
302 gcc_assert (expr->expr_type == EXPR_CONSTANT); in gfc_conv_constant_to_tree()
399 if (expr->expr_type != EXPR_CONSTANT) in gfc_conv_constant()
H A Dcheck.c121 if (a->expr_type != EXPR_CONSTANT) in is_boz_constant()
760 if (expr->expr_type == EXPR_CONSTANT) in nonnegative_check()
781 if (expr->expr_type == EXPR_CONSTANT) in positive_check()
806 if (expr2->expr_type == EXPR_CONSTANT) in less_than_bitsize1()
859 if (expr->expr_type != EXPR_CONSTANT) in less_than_bitsizekind()
885 if (expr2->expr_type == EXPR_CONSTANT && expr3->expr_type == EXPR_CONSTANT) in less_than_bitsize2()
1082 if (dim->expr_type != EXPR_CONSTANT) in dim_corank_check()
1117 if (dim->expr_type != EXPR_CONSTANT) in dim_rank_check()
1204 if ((!ra->u.ss.start || ra->u.ss.start->expr_type == EXPR_CONSTANT) in gfc_var_strlen()
1205 && ra->u.ss.end->expr_type == EXPR_CONSTANT) in gfc_var_strlen()
[all …]
H A Dtarget-memory.c98 if (e->expr_type == EXPR_CONSTANT) in gfc_element_size()
101 && e->ts.u.cl->length->expr_type == EXPR_CONSTANT in gfc_element_size()
303 gcc_assert (source->expr_type == EXPR_CONSTANT in gfc_target_encode_expr()
331 if (source->expr_type == EXPR_CONSTANT || source->ref == NULL) in gfc_target_encode_expr()
354 gcc_assert (c->expr->expr_type == EXPR_CONSTANT in gfc_target_encode_expr()
736 case EXPR_CONSTANT: in gfc_merge_initializers()
H A Dinterface.c503 && l1->length->expr_type == EXPR_CONSTANT in compare_components()
504 && l2->length->expr_type == EXPR_CONSTANT in compare_components()
2280 if (e->expr_type == EXPR_CONSTANT) in maybe_dummy_array_arg()
2762 && sym->ts.u.cl->length->expr_type == EXPR_CONSTANT in get_sym_storage_size()
2779 if (sym->as->upper[i]->expr_type != EXPR_CONSTANT in get_sym_storage_size()
2780 || sym->as->lower[i]->expr_type != EXPR_CONSTANT in get_sym_storage_size()
2813 && e->ts.u.cl->length->expr_type == EXPR_CONSTANT in get_expr_storage_size()
2816 else if (e->expr_type == EXPR_CONSTANT in get_expr_storage_size()
2841 && ref->u.ss.start->expr_type == EXPR_CONSTANT) in get_expr_storage_size()
2848 || ref->u.ss.length->length->expr_type != EXPR_CONSTANT) in get_expr_storage_size()
[all …]
H A Dmisc.c227 if (ex->expr_type == EXPR_CONSTANT) in gfc_typename()
244 || ex->ts.u.cl->length->expr_type != EXPR_CONSTANT) in gfc_typename()
H A Dfrontend-passes.c547 || (*e)->ts.u.cl->length->expr_type != EXPR_CONSTANT)) in cfe_register_funcs()
639 if (length && length->expr_type == EXPR_CONSTANT) in constant_string_length()
666 && e->symtree->n.sym->ts.u.cl->length->expr_type == EXPR_CONSTANT) in constant_string_length()
769 if (e->expr_type == EXPR_CONSTANT || is_fe_temp (e)) in create_var()
1045 if (co->expr1 == NULL || co->expr1->expr_type == EXPR_CONSTANT) in convert_do_while()
1290 case EXPR_CONSTANT: in traverse_io_block()
1303 || start->value.op.op2->expr_type != EXPR_CONSTANT in traverse_io_block()
1355 case EXPR_CONSTANT: in traverse_io_block()
1817 if (c->expr->expr_type != EXPR_CONSTANT) in combine_array_constructor()
1944 if (e->ts.type != BT_CHARACTER || e->expr_type != EXPR_CONSTANT) in is_empty_string()
[all …]
H A Darith.c1265 if (op->expr_type == EXPR_CONSTANT) in reduce_unary()
1309 if (c->expr->expr_type == EXPR_CONSTANT) in reduce_binary_ac()
1349 if (c->expr->expr_type == EXPR_CONSTANT) in reduce_binary_ca()
1431 if (op1->expr_type == EXPR_CONSTANT && op2->expr_type == EXPR_CONSTANT) in reduce_binary()
1434 if (op1->expr_type == EXPR_CONSTANT && op2->expr_type == EXPR_ARRAY) in reduce_binary()
1437 if (op1->expr_type == EXPR_ARRAY && op2->expr_type == EXPR_CONSTANT) in reduce_binary()
1599 if (op1->expr_type != EXPR_CONSTANT in eval_intrinsic()
1605 && op2->expr_type != EXPR_CONSTANT in eval_intrinsic()
H A Ddecl.c290 if (new_var->expr->expr_type == EXPR_CONSTANT in var_element()
413 && (*result)->expr_type == EXPR_CONSTANT in match_data_constant()
470 if ((*result)->expr_type == EXPR_CONSTANT) in match_data_constant()
1097 else if ((*expr)->expr_type == EXPR_CONSTANT) in char_len_param_value()
1562 if (!cl || !cl->length || cl->length->expr_type != EXPR_CONSTANT in gfc_verify_c_interop_param()
1778 if (expr->expr_type != EXPR_CONSTANT) in gfc_set_constant_character_len()
1951 if (init->expr_type == EXPR_CONSTANT) in add_init_expr_to_sym()
1963 if (length->expr_type != EXPR_CONSTANT) in add_init_expr_to_sym()
1991 else if (sym->ts.u.cl->length->expr_type == EXPR_CONSTANT) in add_init_expr_to_sym()
2006 if (init->expr_type == EXPR_CONSTANT) in add_init_expr_to_sym()
[all …]

123