Searched refs:gfc_get_constant_expr (Results 1 - 24 of 24) sorted by relevance

/netbsd-current/external/gpl3/gcc.old/dist/gcc/fortran/
H A Darith.c423 result = gfc_get_constant_expr (BT_LOGICAL, op1->ts.kind, &op1->where);
436 result = gfc_get_constant_expr (BT_LOGICAL, gfc_kind_max (op1, op2),
450 result = gfc_get_constant_expr (BT_LOGICAL, gfc_kind_max (op1, op2),
464 result = gfc_get_constant_expr (BT_LOGICAL, gfc_kind_max (op1, op2),
478 result = gfc_get_constant_expr (BT_LOGICAL, gfc_kind_max (op1, op2),
593 result = gfc_get_constant_expr (op1->ts.type, op1->ts.kind, &op1->where);
625 result = gfc_get_constant_expr (op1->ts.type, op1->ts.kind, &op1->where);
659 result = gfc_get_constant_expr (op1->ts.type, op1->ts.kind, &op1->where);
693 result = gfc_get_constant_expr (op1->ts.type, op1->ts.kind, &op1->where);
730 result = gfc_get_constant_expr (op
[all...]
H A Dsimplify.c424 return gfc_get_constant_expr (type, kind, where);
439 gfc_get_constant_expr (type, kind, where),
714 result = gfc_get_constant_expr (BT_INTEGER, e->ts.kind, &e->where);
719 result = gfc_get_constant_expr (BT_REAL, e->ts.kind, &e->where);
725 result = gfc_get_constant_expr (BT_REAL, e->ts.kind, &e->where);
817 result = gfc_get_constant_expr (x->ts.type, x->ts.kind, &x->where);
822 result = gfc_get_constant_expr (x->ts.type, x->ts.kind, &x->where);
851 result = gfc_get_constant_expr (x->ts.type, x->ts.kind, &x->where);
856 result = gfc_get_constant_expr (x->ts.type, x->ts.kind, &x->where);
934 result = gfc_get_constant_expr (BT_REA
[all...]
H A Dtarget-memory.c384 gfc_expr *e = gfc_get_constant_expr (result->ts.type, result->ts.kind,
514 e = gfc_get_constant_expr (cmp->ts.type, cmp->ts.kind, &result->where);
528 gfc_expr *e = gfc_get_constant_expr (cmp->ts.type, cmp->ts.kind,
H A Dfrontend-passes.c651 res = gfc_get_constant_expr (BT_INTEGER, gfc_charlen_int_kind,
810 p = gfc_get_constant_expr (BT_INTEGER, gfc_default_integer_kind,
815 q = gfc_get_constant_expr (BT_INTEGER, gfc_index_integer_kind,
2303 a->expr = gfc_get_constant_expr (BT_INTEGER, gfc_default_integer_kind,
2498 n = gfc_get_constant_expr (BT_INTEGER, ex->ts.kind, &ex->where);
3062 inline_limit = gfc_get_constant_expr (BT_REAL, gfc_default_real_kind,
3533 res = gfc_get_constant_expr (BT_INTEGER,
3960 zero_e = gfc_get_constant_expr (BT_REAL, expr1->ts.kind,
3968 zero_e = gfc_get_constant_expr (BT_COMPLEX, expr1->ts.kind,
4705 next->expr = gfc_get_constant_expr (typ
[all...]
H A Dprimary.c200 e = gfc_get_constant_expr (BT_INTEGER, kind, where);
219 e = gfc_get_constant_expr (BT_REAL, kind, where);
234 e = gfc_get_constant_expr (BT_COMPLEX, kind, &real->where);
336 e = gfc_get_constant_expr (BT_HOLLERITH, gfc_default_character_kind,
1237 res = gfc_get_constant_expr (BT_CHARACTER, e->ts.kind, &e->where);
H A Dexpr.c144 gfc_get_constant_expr (bt type, int kind, locus *where) function
149 gfc_internal_error ("gfc_get_constant_expr(): locus %<where%> cannot be "
202 e = gfc_get_constant_expr (BT_CHARACTER, kind,
217 p = gfc_get_constant_expr (BT_INTEGER, kind,
233 p = gfc_get_constant_expr (BT_LOGICAL, kind,
1860 *newp = gfc_get_constant_expr (BT_REAL, tmp->ts.kind, &tmp->where);
1872 *newp = gfc_get_constant_expr (BT_REAL, tmp->ts.kind, &tmp->where);
4664 init_expr = gfc_get_constant_expr (ts->type, ts->kind, where);
H A Ddata.c496 expr = gfc_get_constant_expr (BT_COMPLEX, lvalue->ts.kind,
H A Dopenmp.c1032 = gfc_get_constant_expr (BT_INTEGER,
1415 step = gfc_get_constant_expr (BT_INTEGER,
1955 = gfc_get_constant_expr (BT_INTEGER,
6177 el->expr = gfc_get_constant_expr (BT_INTEGER,
H A Dgfortran.h3318 gfc_expr *gfc_get_constant_expr (bt, int, locus *);
H A Ddecl.c2086 e = gfc_get_constant_expr (BT_INTEGER, k, &sym->declared_at);
10737 result = gfc_get_constant_expr (BT_INTEGER, gfc_c_int_kind, &where);
H A Dresolve.c5015 gfc_get_constant_expr (BT_INTEGER, gfc_index_integer_kind,
5229 gfc_expr *len = gfc_get_constant_expr (BT_INTEGER, gfc_charlen_int_kind,
H A Dtrans-expr.c1004 e->ts.u.cl->length = gfc_get_constant_expr (BT_INTEGER,
/netbsd-current/external/gpl3/gcc/dist/gcc/fortran/
H A Darith.cc422 result = gfc_get_constant_expr (BT_LOGICAL, op1->ts.kind, &op1->where);
435 result = gfc_get_constant_expr (BT_LOGICAL, gfc_kind_max (op1, op2),
449 result = gfc_get_constant_expr (BT_LOGICAL, gfc_kind_max (op1, op2),
463 result = gfc_get_constant_expr (BT_LOGICAL, gfc_kind_max (op1, op2),
477 result = gfc_get_constant_expr (BT_LOGICAL, gfc_kind_max (op1, op2),
592 result = gfc_get_constant_expr (op1->ts.type, op1->ts.kind, &op1->where);
624 result = gfc_get_constant_expr (op1->ts.type, op1->ts.kind, &op1->where);
658 result = gfc_get_constant_expr (op1->ts.type, op1->ts.kind, &op1->where);
692 result = gfc_get_constant_expr (op1->ts.type, op1->ts.kind, &op1->where);
729 result = gfc_get_constant_expr (op
[all...]
H A Dsimplify.cc456 return gfc_get_constant_expr (type, kind, where);
471 gfc_get_constant_expr (type, kind, where),
746 result = gfc_get_constant_expr (BT_INTEGER, e->ts.kind, &e->where);
751 result = gfc_get_constant_expr (BT_REAL, e->ts.kind, &e->where);
757 result = gfc_get_constant_expr (BT_REAL, e->ts.kind, &e->where);
849 result = gfc_get_constant_expr (x->ts.type, x->ts.kind, &x->where);
854 result = gfc_get_constant_expr (x->ts.type, x->ts.kind, &x->where);
883 result = gfc_get_constant_expr (x->ts.type, x->ts.kind, &x->where);
888 result = gfc_get_constant_expr (x->ts.type, x->ts.kind, &x->where);
966 result = gfc_get_constant_expr (BT_REA
[all...]
H A Dtarget-memory.cc384 gfc_expr *e = gfc_get_constant_expr (result->ts.type, result->ts.kind,
514 e = gfc_get_constant_expr (cmp->ts.type, cmp->ts.kind, &result->where);
528 gfc_expr *e = gfc_get_constant_expr (cmp->ts.type, cmp->ts.kind,
H A Dfrontend-passes.cc651 res = gfc_get_constant_expr (BT_INTEGER, gfc_charlen_int_kind,
810 p = gfc_get_constant_expr (BT_INTEGER, gfc_default_integer_kind,
815 q = gfc_get_constant_expr (BT_INTEGER, gfc_index_integer_kind,
2304 a->expr = gfc_get_constant_expr (BT_INTEGER, gfc_default_integer_kind,
2739 n = gfc_get_constant_expr (BT_INTEGER, ex->ts.kind, &ex->where);
3330 inline_limit = gfc_get_constant_expr (BT_REAL, gfc_default_real_kind,
3811 res = gfc_get_constant_expr (BT_INTEGER,
4238 zero_e = gfc_get_constant_expr (BT_REAL, expr1->ts.kind,
4246 zero_e = gfc_get_constant_expr (BT_COMPLEX, expr1->ts.kind,
4985 next->expr = gfc_get_constant_expr (typ
[all...]
H A Dprimary.cc200 e = gfc_get_constant_expr (BT_INTEGER, kind, where);
219 e = gfc_get_constant_expr (BT_REAL, kind, where);
234 e = gfc_get_constant_expr (BT_COMPLEX, kind, &real->where);
336 e = gfc_get_constant_expr (BT_HOLLERITH, gfc_default_character_kind,
1216 res = gfc_get_constant_expr (BT_CHARACTER, e->ts.kind, &e->where);
H A Dexpr.cc144 gfc_get_constant_expr (bt type, int kind, locus *where) function
149 gfc_internal_error ("gfc_get_constant_expr(): locus %<where%> cannot be "
202 e = gfc_get_constant_expr (BT_CHARACTER, kind,
217 p = gfc_get_constant_expr (BT_INTEGER, kind,
233 p = gfc_get_constant_expr (BT_LOGICAL, kind,
1876 *newp = gfc_get_constant_expr (BT_REAL, tmp->ts.kind, &tmp->where);
1888 *newp = gfc_get_constant_expr (BT_REAL, tmp->ts.kind, &tmp->where);
4686 init_expr = gfc_get_constant_expr (ts->type, ts->kind, where);
H A Ddata.cc516 expr = gfc_get_constant_expr (BT_COMPLEX, lvalue->ts.kind,
H A Dgfortran.h3609 gfc_expr *gfc_get_constant_expr (bt, int, locus *);
H A Dopenmp.cc1612 = gfc_get_constant_expr (BT_INTEGER,
2310 step = gfc_get_constant_expr (BT_INTEGER,
2964 = gfc_get_constant_expr (BT_INTEGER,
8976 el->expr = gfc_get_constant_expr (BT_INTEGER,
H A Ddecl.cc2168 e = gfc_get_constant_expr (BT_INTEGER, k, &sym->declared_at);
10819 result = gfc_get_constant_expr (BT_INTEGER, gfc_c_int_kind, &where);
H A Dresolve.cc5101 gfc_get_constant_expr (BT_INTEGER, gfc_index_integer_kind,
5312 gfc_expr *len = gfc_get_constant_expr (BT_INTEGER, gfc_charlen_int_kind,
H A Dtrans-expr.cc1098 e->ts.u.cl->length = gfc_get_constant_expr (BT_INTEGER,

Completed in 702 milliseconds