/netbsd-src/external/gpl3/gcc/dist/gcc/fortran/ |
H A D | trans-const.cc | 184 cl->backend_decl = gfc_conv_mpz_to_tree (cl->length->value.integer, in gfc_conv_const_charlen() 203 gfc_conv_mpz_to_tree (mpz_t i, int kind) in gfc_conv_mpz_to_tree() function 316 return gfc_conv_mpz_to_tree (expr->value.integer, expr->ts.kind); in gfc_conv_constant_to_tree()
|
H A D | trans-const.h | 22 tree gfc_conv_mpz_to_tree (mpz_t, int);
|
H A D | trans-types.cc | 1242 return gfc_conv_mpz_to_tree (expr->value.integer, gfc_index_integer_kind); in gfc_conv_array_bound() 1667 tmp = gfc_conv_mpz_to_tree (stride, gfc_index_integer_kind); in gfc_get_nodesc_array_type() 1675 tmp = gfc_conv_mpz_to_tree (expr->value.integer, in gfc_get_nodesc_array_type() 1697 tmp = gfc_conv_mpz_to_tree (expr->value.integer, in gfc_get_nodesc_array_type() 1724 tmp = gfc_conv_mpz_to_tree (expr->value.integer, in gfc_get_nodesc_array_type() 1732 tmp = gfc_conv_mpz_to_tree (expr->value.integer, in gfc_get_nodesc_array_type() 1743 gfc_conv_mpz_to_tree (offset, gfc_index_integer_kind); in gfc_get_nodesc_array_type() 1751 gfc_conv_mpz_to_tree (stride, gfc_index_integer_kind); in gfc_get_nodesc_array_type() 1788 range = gfc_conv_mpz_to_tree (stride, gfc_index_integer_kind); in gfc_get_nodesc_array_type()
|
H A D | trans-io.cc | 582 val = gfc_conv_mpz_to_tree (gfc_integer_kinds[i].pedantic_min_int, 4); in set_parameter_value_chk() 591 val = gfc_conv_mpz_to_tree (gfc_integer_kinds[i].huge, 4); in set_parameter_value_chk() 643 val = gfc_conv_mpz_to_tree (gfc_integer_kinds[i].pedantic_min_int, 4); in set_parameter_value_inquire() 648 val = gfc_conv_mpz_to_tree (gfc_integer_kinds[i].huge, 4); in set_parameter_value_inquire()
|
H A D | target-memory.cc | 201 return native_encode_expr (gfc_conv_mpz_to_tree (integer, kind), in encode_integer()
|
H A D | ChangeLog-2004 | 719 * trans-const.c (gfc_conv_mpz_to_tree): Use mpz_export. 974 * trans-const.c (gfc_conv_mpz_to_tree): Change call to 983 gfc_conv_mpz_to_tree, gfc_conv_constant_to_tree): Likewise. 1002 * trans-const.c (gfc_conv_mpz_to_tree): Fix 64-bit shift warning. 1028 * trans-const.c (gfc_conv_mpz_to_tree): Use mpz_getlimbn instead 1201 gfc_init_constants, gfc_conv_mpz_to_tree,
|
H A D | trans-array.cc | 2241 tmp2 = gfc_conv_mpz_to_tree (size, gfc_index_integer_kind); in gfc_trans_array_constructor_value() 2848 s->loop->to[n] = gfc_conv_mpz_to_tree (expr->shape[s->dim[n]], in trans_array_constructor() 2873 loop->to[0] = gfc_conv_mpz_to_tree (size, gfc_index_integer_kind); in trans_array_constructor() 5371 tmp = gfc_conv_mpz_to_tree (i, gfc_index_integer_kind); in set_loop_bounds() 6350 index = gfc_conv_mpz_to_tree (c->offset, gfc_index_integer_kind); in gfc_conv_array_initializer() 6362 tmp2 = gfc_conv_mpz_to_tree (maxval, gfc_index_integer_kind); in gfc_conv_array_initializer() 6366 tmp1 = gfc_conv_mpz_to_tree (maxval, gfc_index_integer_kind); in gfc_conv_array_initializer() 6369 tmp1 = gfc_conv_mpz_to_tree (c->offset, gfc_index_integer_kind); in gfc_conv_array_initializer()
|
H A D | trans-intrinsic.cc | 1001 huge = gfc_conv_mpz_to_tree (gfc_integer_kinds[i].huge, gfc_c_int_kind); in gfc_conv_intrinsic_exponent() 3913 arg1 = gfc_conv_mpz_to_tree (gfc_integer_kinds[0].pedantic_min_int, in conv_intrinsic_system_clock() 3916 arg1 = gfc_conv_mpz_to_tree (gfc_integer_kinds[1].pedantic_min_int, in conv_intrinsic_system_clock() 5396 nonempty = gfc_conv_mpz_to_tree (asize, gfc_index_integer_kind); in gfc_conv_intrinsic_minmaxloc() 5414 tmp = gfc_conv_mpz_to_tree (gfc_integer_kinds[n].huge, in gfc_conv_intrinsic_minmaxloc() 6154 tmp = gfc_conv_mpz_to_tree (gfc_integer_kinds[n].huge, expr->ts.kind); in gfc_conv_intrinsic_minmaxval() 6200 nonempty = gfc_conv_mpz_to_tree (asize, gfc_index_integer_kind); in gfc_conv_intrinsic_minmaxval() 9973 huge = gfc_conv_mpz_to_tree (gfc_integer_kinds[n].huge, in conv_intrinsic_ieee_scalb()
|
H A D | trans-stmt.cc | 3082 low = gfc_conv_mpz_to_tree (cp->low->value.integer, in gfc_trans_integer_select() 3112 high = gfc_conv_mpz_to_tree (cp->high->value.integer, in gfc_trans_integer_select()
|
H A D | ChangeLog-2007 | 3616 gfc_conv_mpz_to_tree for case values, so as to avoid picking up 4024 * trans-const.c (gfc_conv_mpz_to_tree): Use mpz_get_double_int. 4485 * trans-const.c (gfc_conv_mpz_to_tree): Allow integer constants
|
H A D | ChangeLog-2003 | 499 * trans-const.c (gfc_conv_mpz_to_tree): Fix bug, parameter for
|
H A D | ChangeLog-2014 | 2090 (gfc_conv_mpz_to_tree): Likewise.
|
H A D | ChangeLog-2005 | 2805 * trans-const.c (gfc_conv_mpz_to_tree): Fix comment.
|
/netbsd-src/external/gpl3/gcc.old/dist/gcc/fortran/ |
H A D | trans-const.c | 184 cl->backend_decl = gfc_conv_mpz_to_tree (cl->length->value.integer, in gfc_conv_const_charlen() 203 gfc_conv_mpz_to_tree (mpz_t i, int kind) in gfc_conv_mpz_to_tree() function 316 return gfc_conv_mpz_to_tree (expr->value.integer, expr->ts.kind); in gfc_conv_constant_to_tree()
|
H A D | trans-const.h | 22 tree gfc_conv_mpz_to_tree (mpz_t, int);
|
H A D | trans-types.c | 1213 return gfc_conv_mpz_to_tree (expr->value.integer, gfc_index_integer_kind); in gfc_conv_array_bound() 1615 tmp = gfc_conv_mpz_to_tree (stride, gfc_index_integer_kind); in gfc_get_nodesc_array_type() 1623 tmp = gfc_conv_mpz_to_tree (expr->value.integer, in gfc_get_nodesc_array_type() 1645 tmp = gfc_conv_mpz_to_tree (expr->value.integer, in gfc_get_nodesc_array_type() 1672 tmp = gfc_conv_mpz_to_tree (expr->value.integer, in gfc_get_nodesc_array_type() 1680 tmp = gfc_conv_mpz_to_tree (expr->value.integer, in gfc_get_nodesc_array_type() 1691 gfc_conv_mpz_to_tree (offset, gfc_index_integer_kind); in gfc_get_nodesc_array_type() 1699 gfc_conv_mpz_to_tree (stride, gfc_index_integer_kind); in gfc_get_nodesc_array_type() 1736 range = gfc_conv_mpz_to_tree (stride, gfc_index_integer_kind); in gfc_get_nodesc_array_type()
|
H A D | trans-io.c | 582 val = gfc_conv_mpz_to_tree (gfc_integer_kinds[i].pedantic_min_int, 4); in set_parameter_value_chk() 591 val = gfc_conv_mpz_to_tree (gfc_integer_kinds[i].huge, 4); in set_parameter_value_chk() 643 val = gfc_conv_mpz_to_tree (gfc_integer_kinds[i].pedantic_min_int, 4); in set_parameter_value_inquire() 648 val = gfc_conv_mpz_to_tree (gfc_integer_kinds[i].huge, 4); in set_parameter_value_inquire()
|
H A D | target-memory.c | 202 return native_encode_expr (gfc_conv_mpz_to_tree (integer, kind), in encode_integer()
|
H A D | trans-array.c | 2145 tmp2 = gfc_conv_mpz_to_tree (size, gfc_index_integer_kind); in gfc_trans_array_constructor_value() 2752 s->loop->to[n] = gfc_conv_mpz_to_tree (expr->shape[s->dim[n]], in trans_array_constructor() 2777 loop->to[0] = gfc_conv_mpz_to_tree (size, gfc_index_integer_kind); in trans_array_constructor() 5264 tmp = gfc_conv_mpz_to_tree (i, gfc_index_integer_kind); in set_loop_bounds() 6233 index = gfc_conv_mpz_to_tree (c->offset, gfc_index_integer_kind); in gfc_conv_array_initializer() 6245 tmp2 = gfc_conv_mpz_to_tree (maxval, gfc_index_integer_kind); in gfc_conv_array_initializer() 6249 tmp1 = gfc_conv_mpz_to_tree (maxval, gfc_index_integer_kind); in gfc_conv_array_initializer() 6252 tmp1 = gfc_conv_mpz_to_tree (c->offset, gfc_index_integer_kind); in gfc_conv_array_initializer() 8001 tmp = gfc_conv_mpz_to_tree (minus_one, gfc_index_integer_kind); in gfc_conv_expr_descriptor()
|
H A D | trans-intrinsic.c | 993 huge = gfc_conv_mpz_to_tree (gfc_integer_kinds[i].huge, gfc_c_int_kind); in gfc_conv_intrinsic_exponent() 3915 arg1 = gfc_conv_mpz_to_tree (gfc_integer_kinds[0].pedantic_min_int, in conv_intrinsic_system_clock() 3918 arg1 = gfc_conv_mpz_to_tree (gfc_integer_kinds[1].pedantic_min_int, in conv_intrinsic_system_clock() 5252 nonempty = gfc_conv_mpz_to_tree (asize, gfc_index_integer_kind); in gfc_conv_intrinsic_minmaxloc() 5270 tmp = gfc_conv_mpz_to_tree (gfc_integer_kinds[n].huge, in gfc_conv_intrinsic_minmaxloc() 6023 tmp = gfc_conv_mpz_to_tree (gfc_integer_kinds[n].huge, expr->ts.kind); in gfc_conv_intrinsic_minmaxval() 6069 nonempty = gfc_conv_mpz_to_tree (asize, gfc_index_integer_kind); in gfc_conv_intrinsic_minmaxval() 9849 huge = gfc_conv_mpz_to_tree (gfc_integer_kinds[n].huge, in conv_intrinsic_ieee_scalb()
|
H A D | trans-stmt.c | 3044 low = gfc_conv_mpz_to_tree (cp->low->value.integer, in gfc_trans_integer_select() 3074 high = gfc_conv_mpz_to_tree (cp->high->value.integer, in gfc_trans_integer_select()
|