Searched refs:expr3 (Results 1 - 8 of 8) sorted by relevance
/haiku-buildtools/gcc/gcc/fortran/ |
H A D | trans-stmt.c | 794 if (code->expr3) 798 gfc_conv_expr (&argse, code->expr3); 992 if (code->expr3) 996 gfc_conv_expr (&argse, code->expr3); 1067 if (code->expr3 && flag_coarray == GFC_FCOARRAY_LIB) 1069 gcc_assert (code->expr3->expr_type == EXPR_VARIABLE); 1072 gfc_conv_expr (&argse, code->expr3); 5297 /* If an expr3 is present, then store the tree for accessing its 5301 available for expr3's type. */ 5302 tree expr3, expr3_vpt local [all...] |
H A D | resolve.c | 6943 if (code->expr3) 6946 if (!gfc_type_compatible (&e->ts, &code->expr3->ts)) 6949 "source-expr at %L", &e->where, &code->expr3->where); 6954 if (code->expr3->rank > 0 && !conformable_arrays (code->expr3, e)) 6958 if (code->expr3->ts.kind != e->ts.kind && !unlimited) 6962 &e->where, &code->expr3->where); 6967 if (code->expr3->ts.type == BT_DERIVED 6968 && ((codimension && gfc_expr_attr (code->expr3).lock_comp) 6969 || (code->expr3 [all...] |
H A D | match.c | 2916 new_st.expr3 = errmsg; 3111 new_st.expr3 = errmsg; 3299 new_st.expr3 = errmsg; 3902 new_st.expr3 = source; 3904 new_st.expr3 = mold;
|
H A D | check.c | 370 /* If expr2 and expr3 are constants, then check that the value is less than 375 gfc_expr *expr2, const char *arg3, gfc_expr *expr3) 379 if (expr2->expr_type == EXPR_CONSTANT && expr3->expr_type == EXPR_CONSTANT) 382 gfc_extract_int (expr3, &i3); 374 less_than_bitsize2(const char *arg1, gfc_expr *expr1, const char *arg2, gfc_expr *expr2, const char *arg3, gfc_expr *expr3) argument
|
H A D | trans-array.c | 4962 tree expr3_elem_size, tree *nelems, gfc_expr *expr3, 5134 SOURCE expression (expr3) we must use its element size. */ 5137 else if (expr3 != NULL) 5139 if (expr3->ts.type == BT_CLASS) 5142 gfc_expr *sz = gfc_copy_expr (expr3); 5152 tmp = gfc_typenode_for_spec (&expr3->ts); 5227 tree *nelems, gfc_expr *expr3) 5312 expr3_elem_size, nelems, expr3, expr); 4959 gfc_array_init_size(tree descriptor, int rank, int corank, tree * poffset, gfc_expr ** lower, gfc_expr ** upper, stmtblock_t * pblock, stmtblock_t * descriptor_block, tree * overflow, tree expr3_elem_size, tree *nelems, gfc_expr *expr3, gfc_expr *expr) argument 5225 gfc_array_allocate(gfc_se * se, gfc_expr * expr, tree status, tree errmsg, tree errlen, tree label_finish, tree expr3_elem_size, tree *nelems, gfc_expr *expr3) argument
|
H A D | gfortran.h | 2383 gfc_expr *expr1, *expr2, *expr3, *expr4; member in struct:gfc_code
|
H A D | frontend-passes.c | 2360 WALK_SUBEXPR (co->expr3);
|
/haiku-buildtools/isl/ |
H A D | isl_test.c | 3942 isl_ast_expr *expr, *expr1, *expr2, *expr3; local 3964 expr3 = isl_ast_expr_from_id(isl_id_alloc(ctx, "C", NULL)); 3965 expr = isl_ast_expr_sub(expr3, expr);
|
Completed in 198 milliseconds